Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
332to336
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
332to336
332to336
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Meldung bei Abspeichern: Variable nicht definiert

Meldung bei Abspeichern: Variable nicht definiert
10.11.2003 13:40:37
Richard M.
Hallo,
ich habe ein VBA-Tool geschrieben, mit dem ich alle Kommentare aus einem VBA-Code einer anderen Excel-Datei entfernen kann. Der gecleante Code soll nun mittels Workbooks("xxx").SaveAs FileName:="yyy.xls" auf der Festplatte gespeichert werden. Nun meldet sich der VBA-Editor mit der Meldung, dass eine Variable nicht definiert sei, sie ist es aber. Mein Tool stoppt daraufhin.
Öffnet man nun die Datei yyy.xls auf der Festplatte - die trotz Fehlermeldung - erzeugt wurde, so läßt sich diese nun ohne Fehlermeldung kompilieren.

Was kann die Ursache sein? Kann man die Compilerüberprüfung beim Abspeichern irgendwie übergehen?

Danke im Voraus
Richard

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Meldung bei Abspeichern: Variable nicht definiert
10.11.2003 13:43:44
Hajo_Zi
Hallo Richard

1. die meisten haben hier keine Glaskugel
2. die meisten haben keinen Heiligenschein
3. die meisten können nicht auf Deinen Rechner schauen

für alle diese Leute ist die Antwort schneller erstellt, wenn Du den relevanten Code postest.

Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP SBE.


Anzeige
AW: Meldung bei Abspeichern: Variable nicht definiert
10.11.2003 13:53:50
Richard M.
Hi,
das ist der Code zum Löschen:


Sub Delete_Comments(actWBook As String, actSheet As String)
Dim i As Integer, j As Integer, Index As Integer, ipos As Integer
Dim OnlyComment As Boolean
Application.StatusBar = "Delete_Comments"
Index = 0
For i = 1 To Workbooks(actWBook).VBProject.VBComponents.Count
If Workbooks(actWBook).VBProject.VBComponents.Item(i).Name = actSheet Then
Index = i
Exit For
End If
Next i
If Index = 0 Then Exit Sub
With Workbooks(actWBook).VBProject.VBComponents.Item(Index).CodeModule
For i = .CountOfLines To 1 Step -1
OnlyComment = True
ipos = InStr(.Lines(i, 1), "'")
If ipos > 0 Then
For j = 1 To ipos - 1
If Mid(.Lines(i, 1), j, 1) <> " " Then OnlyComment = False
Next j
If OnlyComment Then
'if line contains only comments
.DeleteLines (i)
Else
'if line contains code and comments
.InsertLines i, Left(.Lines(i, 1), ipos - 1)
.DeleteLines (i + 1)
End If
End If
Next i
For i = .CountOfLines To 1 Step -1
If Len(.Lines(i, 1)) = 0 Then
.DeleteLines (i)
End If
Next i
End With
Application.StatusBar = ""
End Sub


das Speichern des Dokuments erfolgt mit:

Application.DisplayAlerts = False
Workbooks(DBFile).SaveAs FileName:=DBPath & "\uhu.xls"
Workbooks(DBFile).Close
Application.DisplayAlerts = True

Beim Befehl SaveAs kommt dann die besagt Meldung

Richard
Anzeige
AW: Meldung bei Abspeichern: Variable nicht definiert
10.11.2003 13:58:13
Hajo_Zi
Hallo Richard

kein neuer Stand. Wo wird das erste Makro aufgerufen??

Wo ist die Variable DBPath und DBFile definiert

Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro


AW: Meldung bei Abspeichern: Variable nicht definiert
10.11.2003 14:16:31
Richard M.
Hallo,
so wird die Delete-Prozedur aufgerufen:


Sub Maintest()
Dim dbfile As String
dbfile = "input.xls"
Workbooks.Open "C:\" & dbfile
Delete_Comments "input.xls", "Alarms"
Application.DisplayAlerts = False
Workbooks(dbfile).SaveAs FileName:="C:\output.xls"
Workbooks(dbfile).Close
Application.DisplayAlerts = True
End Sub


Gruss
Richard
Anzeige
AW: Meldung bei Abspeichern: NOCH OFFEN
10.11.2003 14:20:54
Hajo_Zi
Hallo Richard

es ist ein Teil meiner Fragen Beantwortet. Ich könnte jetzt warten bis der andere Teil auch Benatwortet wird. Aber das ist mir zu Aufwendig. Ich bin raus.

Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro


34 Forumthreads zu ähnlichen Themen

Variable für Diagramm nicht definiert
greenhorn

Hallo,
ich habe ein (für euch sicher simples) Problem.
Das kommt bei mir im Editor:

wo muss ich die Variable definieren? Es handelt sich um ein Diagramm.
christian
20.08.2008 10:39:00
Thread-ID: 1003126
15 Beiträge
Anzeige
Variable nicht definiert bei: 'vbext_pp_locked' ?!
Andreas

Hallo Herber Fans,
ich habe eine Prozedur, die im Aktiven Workbook einen Code in ein die VBA Umgebung eines Worksheets packen soll. Wen das Ziel (Aktive) Workbook einen VBA Projektschutz hat, soll eine Meldung kommen, daß diese Aktion nicht ausgeführt werden kann.
Dafür habe ich die Zei...
24.03.2009 15:28:01
Thread-ID: 1063387
3 Beiträge
Fehler: Variable nicht definiert
ing.grohn

Hallo Forum,
folgenden Sequenz hat bisher immer funktioniert.
Jetzt meldet VBA: Fehler bei compilieren, Variable nicht definiert!
Private Sub CommandButton22_Click() Dim Zeile As String Dim Laenge As Integer Dim Posi As Integer Set frm4 = UserForm4 ' Was...
06.09.2009 13:04:24
Thread-ID: 1100857
6 Beiträge
Anzeige
Variable nicht definiert
Heinz

Hallo Leute
Habe plötzlich ein Problem bei "Calendar1"
Bis jetzt ist es immer problemlos gegangen.Jetzt kommt plötzlich n"Variable nicht definiert"
Könnte mir bitte jemand helfen.
Gruß
Heinz
Private Sub ListBox1_Click() If ListBox1.Value "" And Calendar1.Value "" Then...
11.10.2010 02:28:32
Thread-ID: 1181647
3 Beiträge
Variable nicht definiert
René

Hallo liebe Excelgemeinde,
ich möchte beim Öffnen einer Arbeitsmappe alle Daten löschen die älter als ein Monat sind. Das funktioniert auch wenn ich das Makro über eine Schaltfläche händisch starte. Aber wenn ich es in die Workbook Open schreibe kommt in der Zeile x = 2 Variable nicht defin...
09.05.2011 10:37:00
Thread-ID: 1213592
6 Beiträge
VBA zu Tabelle - Variablenwerte kommen nicht an
Perry

Hallo!
Mein Problem stellt sich folgendermaßen dar:
Habe eine Arbeitsmappe mit mehreren Worksheets - das erste ist eine Übersicht, die zusammenfassend angeben soll, wie oft bestimmte Ausdrücke in den nachfolgenden Worksheets vorkommen.
Das Zusammenzählen, wie oft die gesuchten Ausdr...
03.07.2011 19:12:26
Thread-ID: 1220730
2 Beiträge
Fehler: Variable nicht definiert
Peter

Hallo zusammen,
ich bekomme beim Start eines Makros die Fehlermeldung "Variable nicht definiert". Was ist im Code falsch? Das Makro starte ich über ein Formular (Name des Formulars: "Master") per "Call ABCMakro". Der Code für das Makro "ABCMakro" steht in einem Modul namens "ABC".
Danke...
12.08.2011 10:46:56
Thread-ID: 1225810
4 Beiträge
xlOpenXLMWorkbook --> Variable nicht definiert
Peter

Guten Tag
Ich verwende nachstehenden Code, um xls-Dateien auf xlsm-Dateien umzustellen. Das klappt. Nun möchte ich auch xls-Dateien auf xlsx-Dateien umstellen. Da erhalte ich eine VBA-Fehlermeldung "Fehler beim Kompilieren: Variable nicht definiert" und markiert wird xlOpenXLMWorkbook
M...
19.10.2011 10:05:43
Thread-ID: 1234475
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
14
4
2
5
2
2
5
1
3
2
7
9
8
6
15
6
1
25
14
6
3
15
8
1
1