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

• #5811 Delila_1 veterán Delila_1 #5809

  Új Válasz 2009-12-10 16:40:22 #5811

  Ú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 Delila_1 #5809 üzenetére

  Az előbb félbeszéltem (írtam).

  Sub Valami()
  For i = 1 To ThisWorkbook.Worksheets.Count
  If ThisWorkbook.Worksheets(i).Name <> "Ellenőrzés" Then _
  Sheets(i).Cells(1) = "Kutyafüle"
  MsgBox Sheets(i).Name
  Next
  End Sub

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