Új hozzászólás Aktív témák

• #30641 gyga senior tag Delila_1 #30626

  Új Válasz 2016-02-18 09:55:00 #30641

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  gyga

  senior tag

  válasz Delila_1 #30626 üzenetére

  Szia.
  Kicsit térjünk vissza hozzá. Melyik paramétert kell módosítanom ahhoz hogy ne a C oszlopra szűrjön hanem pl X oszlopra?
  Sheets("Munka2").Range("A:X").ClearContents
  ActiveSheet.Range("$A:$X").AutoFilter Field:=24, Criteria1:="<>0"
  usor = Range("A" & Rows.Count).End(xlUp).Row
  Range("A1:X" & usor).Copy Sheets("Munka2").Range("A1")
  ActiveSheet.Range("$A:$X").AutoFilter Field:=24

  Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column < 24 Then Masolas
  End Sub
  És még valami másoláskor csak értéket vigyen át a munka2re képletet és hivatkozásokat ne.

Új hozzászólás Aktív témák