Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
440to444
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
440to444
440to444
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

schleife geht net

schleife geht net
18.06.2004 11:29:15
Rene
hallo zusammen
kann mir jemand helfen
die schleife soll alle sheets nach "muster (2)" durchsuchen
und falls gefunden umbenennen aber es geht net
dim sh as worksheet
For Each sh In ThisWorkbook
If sh.Name = "muster (2)" Then
Sheets("Muster (2)").Name = i
End If
Next sh
gruß rene und danke vorab

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: schleife geht net
Ramses
Hallo
woher auch. Kann nicht gehen.
Woher nimmst du die Variable "i" und was beinhaltet diese ?

Sub Change_Name()
Dim i as Integer
For i = 1 to worksheets.count
If worksheets(i).Name = "Muster (2)" Then
Workheets(i).Name = i
end If
Next i
End Sub

Allerdings taucht hier das Problem auf, wenn es bereits ein Worksheet mit dem gleichen Namen gibt.
Da musst du allenfalls eine Fehlerroutine einbauen
Gruss Rainer
AW: schleife geht net
18.06.2004 11:41:02
Rene
hallo ramses
i ist vorher schon deklariert gewesen
aber das was du geschrieben hast reicht mir schon
1000 dank
gruß rene
Anzeige
Merci:-) Geschlossen o.T.
Ramses
...

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige