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

• #39151 Fferi50 Topikgazda butch3r #39150

  Új Válasz 2018-09-19 19:55:22 #39151

  Ú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 butch3r #39150 üzenetére

  Szia!

  Sub ertekado()
Dim sh As Worksheet, sr As Integer
For Each sh In Worksheets
For sr = 7 To 123 Step 4
sh.Range("C" & sr & ":N" & sr).Value = sh.Range("C" & sr & ":N" & sr).Value
Next
Next
End Sub

  Üdv.

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