Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1160to1164
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
Inhaltsverzeichnis

Programm bricht ab, läuft aber im debugger weiter

Programm bricht ab, läuft aber im debugger weiter
Hendrik
Hallo zusammen!
Vor ein paar Wochen habe ich meine ersten VBA-Schritte getan und kämpfe seitdem mit dem einen oder anderen Problem. Mein aktuelles Problem ist das folgende: Das Programm soll eine Datei spechern, anschließend unter neuem Namen speichern und ein paar Sachen eintragen. Leider bricht das Programm immer wieder an der fett markierten Stelle im Code ab (Laufzeitfehler 1004). Drücke ich im Debugger auf fortfahren, läuft es problemlos bis zum Ende durch. Woran könnte das liegen.
Vielen Dank im Voraus,
Hendrik
Dim v_New_Filename As String
Dim v_Old_Filename As String
Dim v_Directory As String
v_Old_Filename = ActiveWorkbook.Name
v_New_Filename = "schedule_and_staffing_next_week.xls"
v_old_directory = ActiveWorkbook.Path
ActiveWorkbook.Save
ChDir v_old_directory
ActiveWorkbook.SaveAs Filename:=v_New_Filename
CalendarWeek = ActiveWorkbook.Sheets("navigation").Range("E10") + 1
ActiveWorkbook.Sheets("navigation").Range("E10").Value = CalendarWeek
ActiveWorkbook.Sheets("Schedule_filling").Cells(3, 6).Value = CalendarWeek
ActiveWorkbook.Sheets("Production_schedule_list").Cells(2, 2).Value = CalendarWeek
Application.ScreenUpdating = False
Call UnprotectAllSheets

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Programm bricht ab, läuft aber im debugger weiter
11.06.2010 06:28:19
Hajo_Zi
Hallo Hendrik,
Mir fällt da nicht so was richtiges ein.
Die Variable hast Du schon definiert?
Es gibt nch zufällig ein Makro dss den gleichen Namen hat?

AW: Programm bricht ab, läuft aber im debugger weiter
11.06.2010 13:52:32
Hendrik
Hallo Hajo,
vielen Dank erstmal für die Antwort. Ich habe inzwischen mit einem Kollegen gesprochen, der mich auf den richtigen Weg gebracht hat: Die Zellen waren schreibgeschüzt!
Einfach das Makro "UnprotectAllSheets" vorziehen, und es läuft reibungslos!
So einfach war's!
Viele Grüße,
Hendrik
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige