belegte Variablen nach Schließen leer... :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2003] belegte Variablen nach Schließen leer...

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

maxseidel
Besserwisser

Anmeldedatum: 12.03.2008
Beiträge: 67

Verfasst am: 22.07.2008, 12:33

Hallo liebe Helfer,

Auszug aus dem alten Code:

Public Pfad As String

Sub CommandButton1_Click()
Unload Me
Pfad = InputBox("Bitte geben Sie den neuen Dateipfad ein.")
...
.Range("A2").FormulaLocal = "=WENN('" & Pfad & "[SAP_Bau150.xls]Tabelle1'!A2="""";"""";'" & Pfad & "[SAP_Bau150.xls]Tabelle1'!A2)"
...
End Sub

Sub CommandButton2_Click()
...
.Range("A2").FormulaLocal = "=WENN('" & Pfad & "[SAP_Bau150.xls]Tabelle1'!A2="""";"""";'" & Pfad & "[SAP_Bau150.xls]Tabelle1'!A2)"
...
End Sub

Hier hat der Benutzer die Option, den Dateipfad in eine Inputbox einzugeben. Der Dateiname bleibt jedoch gleich. Es funktioniert. Wenn er den CommandButton2_Click() anklickt geht es trotzdem, obwohl die Variable Pfad scheinbar leer ist...?

Auszug aus dem neuen Code:

Public Pfad As String
Public dn As String

Sub CommandButton1_Click()
Unload Me
Pfad = InputBox("Bitte geben Sie den neuen Dateipfad ein.")
dn = InputBox("Bitte geben Sie den Dateinamen der Datenbasis ein.")
...
.Range("A2").FormulaLocal = "=WENN('" & Pfad & "\[" & dn & "]Tabelle1'!A2="""";"""";'" & Pfad & "\[" & dn & "]Tabelle1'!A2)"
...
End Sub

Sub CommandButton2_Click()
...
.Range("A2").FormulaLocal = "=WENN('" & Pfad & "\[" & dn & "]Tabelle1'!A2="""";"""";'" & Pfad & "\[" & dn & "]Tabelle1'!A2)"
...
End Sub

Hier soll der Benutzer den Dateipfad (Variable Pfad) und Dateinamen (Variable dn) eingeben können. Die erste Sub funktioniert auch, aber die 2. Sub nicht. Wenn er keinen Pfad und Dateinamen eingegeben hat, dann kommt ein Fehler.
Irgend wann am Anfang muss der Benutzer ja den CommandButton1_Click() anklicken, um den Pfad und den Dateinamen zu hinterlegen. Dieser müsste dann immer verfügbar sein, d.h. wenn der Benutzer den CommandButton2_Click() macht, dann müssen diese ehemals eingegebenen Variablen zur Verfügung stehen.
Wie kann ich das machen? Das Ziel ist ja, dass ich sowohl Pfad als auch Dateiname ändern kann. Also der neue Code ist interessant und muss funktionieren.

LG und Danke im Voraus.

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Zelleninhalte abgleichen nach Doppelten	Knuddl	Microsoft Excel Hilfe	7	19.11.2008, 10:42
	Tabelle nach Seitenumbruch in 2. Zeile	OmaWetterwachs	Microsoft Word Hilfe	0	19.11.2008, 09:43
	Nach start sofort absturz	hadieb	Microsoft Outlook Hilfe	6	13.11.2008, 14:18
	Bedingte Formatierung nach Datum	amstuzmarco	Microsoft Excel Hilfe	2	05.11.2008, 15:03
	Nach maximieren von Word muss es wied...	einsteinium	Microsoft Word Hilfe	0	25.10.2008, 19:27

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de