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

• #42382 Delila_1 veterán tgumis #42381

  Új Válasz 2019-12-05 06:57:03 #42382

  Ú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 tgumis #42381 üzenetére

  Sub Torles()
Dim sor As Integer, usor As Integer
usor = Range("Táblázat1").Rows.Count

For sor = usor To 2 Step -1
Range("Táblázat1").Select
Selection.ListObject.ListRows(sor).Delete
Next
End Sub

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