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

• #4171 Delila_1 veterán Gabcsika #4169

  Új Válasz 2008-12-09 08:16:12 #4171

  Ú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 Gabcsika #4169 üzenetére

  Ez a rövid makró kitörli azokat a sorokat, ahol az A oszlopban üres cellát talál.

  For sor = Range("A65536").End(xlUp).Row To 1 Step -1
  Cells(sor, 1).Select
  If Cells(sor, 1) = "" Then Selection.EntireRow.Delete
  Next

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