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

• #35558 oke senior tag

  Új Válasz 2017-06-27 10:31:58 #35558

  Ú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

  

  oke

  senior tag

  Sziasztok!

  Készítettem egy szűrést/törlést makrórögzítéssel. A lényege, hogy egy adott oszlop alapján törölje a kijelölt sorokat.
  Mivel a használni kívánt exelek sorai eltérnek, így ha lefuttatom nem mindig az 2 sortól (fejléc utáni) kezdi a kijelölést. Hogy kellene átírnom ezt a részt emiatt, illetve hogy mindig annyit töröljön, amennyi van a kijelölésben - ugye ez is változó:

  ActiveSheet.Range("$A$1:$K$46468").AutoFilter Field:=10, Criteria1:=Array( _
"Körte", "Alma", "Dinnye"), Operator:=xlFilterValues
Rows("235:235").Select
Range("G235").Activate
Range(Selection, Selection.End(xlDown)).Select
Selection.Delete Shift:=xlUp]

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