Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
780to784
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
780to784
780to784
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Arbeitsblattkopie nach Zelleintrag benennen

Arbeitsblattkopie nach Zelleintrag benennen
12.07.2006 20:07:02
Fritz
Hallo Excelfreunde,
ich möchte - sofern in einer Tabelle die Zelle C5 eine Zahl enthält die Tabelle kopieren und die Kopie nach dem Wert in der Zelle C5 benennen.
Vielen Dank für eure Hilfe
Mfg
Fritz

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Arbeitsblattkopie nach Zelleintrag benennen
12.07.2006 20:39:16
Beni
Hallo Fritz,
kopiert das aktive Sheet und stellt es an den Schluss.
Gruss Beni

Sub Arbeitsblattkopie()
ActiveSheet.Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = Range("C5").Value
End Sub

AW: Arbeitsblattkopie nach Zelleintrag benennen
12.07.2006 21:03:28
Fritz
Hallo Beni,
vielen Dank für Deine Unterstützung.
Ich würde den Code gerne dahingehend verändert haben, dass
1. falls die Zelle C5 keine Zahl enthält überhaupt nichts geschieht
2. falls die Zelle C5 eine Zahl enthält und eine Tabelle mit diesem Namen (= Zahl) in der Datei schon existiert, ein entsprechender Hinweis "Arbeitsblatt "x" existiert schon" angezeigt wird.
Könntest Du mir bei der Umsetzung dieser Vorhaben noch Hilfe geben?
mfg
Fritz
Anzeige
AW: Arbeitsblattkopie nach Zelleintrag benennen
12.07.2006 21:38:45
Beni
Hallo Fritz,
Gruss Beni

Sub Arbeitsblattkopie()
If Not IsEmpty(Range("C5")) Then
For sh = 1 To Sheets.Count
If Sheets(sh).Name = CStr(Range("C5")) Then
MsgBox "Arbeitsblatt " & Sheets(sh).Name & " existiert schon"
Exit Sub
End If
Next sh
ActiveSheet.Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = Range("C5").Value
End If
End Sub

AW: Arbeitsblattkopie nach Zelleintrag benennen
12.07.2006 21:42:19
Fritz
Hallo Beni,
Super!! Genau so hat ich mir das vorgestellt.
Vielen Dank.
Gruß
Fritz

173 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige