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

• #52651 Delila_1 veterán oke #52648

  Új Válasz 2024-05-19 15:47:27 #52651

  Ú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

  

  Delila_1

  veterán

  válasz oke #52648 üzenetére

  Rögzítettem egy makrót, ahol a Táblázat1 B oszlopában vannak a törlendő cellák (Field:=2, Adat címmel).
  Szűri a 2 értékre, törli azokat, majd megszünteti a szűrést. Ilyen egyszerű.

  Sub Makró1()
    ActiveSheet.ListObjects("Táblázat1").Range.AutoFilter Field:=2, Criteria1:= _
      "=0", Operator:=xlOr, Criteria2:="=#HIÁNYZÓ"
    Range("Táblázat1[Adat]").ClearContents
    ActiveSheet.ListObjects("Táblázat1").Range.AutoFilter Field:=2
    Range("Táblázat1[#Headers]").Select
End Sub

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