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

• #40737 Fferi50 Topikgazda RAiN91 #40735

  Új Válasz 2019-04-12 20:15:15 #40737

  Ú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

  

  Fferi50

  Topikgazda

  válasz RAiN91 #40735 üzenetére

  Szia!

  Az üres cellákat a Range.SpecialCells(xlCellTypeBlanks) metódussal kaphatod meg.
  Pl.
  set ures=Range("A1").CurrentRegion.Columns(5).SpecialCells(xlCellTypeBlanks).EntireRow
  A törlés pedig
  ures.Delete

  Persze az egész mehet egy lépésben is, a változó hozzárendelése nélkül.

  Üdv.

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