[b]Option Explicit
'Globale Variable, da außerhalb der Prozedur "SheetName_umbenennnen()" deklariert
Public SheetName As String
Sub SheetName_umbenennnen()
'InputBox zur Eingabe des neuen Namens
SheetName = InputBox("Bitte neuen Blattnamen eintragen")
'Wenn kein Name angegeben, Prozedur beenden
If SheetName = "" Then Exit Sub
'1.Tabellenblatt der Arbeitsmappe umbenennnen
Sheets(1).Name = SheetName & "-6"
End Sub[/b]
Abfrage auf ABBRUCH in InputBox
user3 04.05.2007 - 165 Hits - 11 Antworten
VBA InputBox Problem
Larrikin 13.06.2007 - 40 Hits - 2 Antworten
VBA - Inputbox
Tomschi 14.10.2007 - 170 Hits - 3 Antworten
Globale Variable im Formular Anzeigen
AndiS 28.02.2008 - 109 Hits -
Access 2003 Globale Variablen
ZapT 30.05.2008 - 97 Hits - 2 Antworten