Office: Makro in der Symbolleiste funktioniert nicht mehr

Hallo zusammen,

ich hab da mal eine Frage =)

Ich hab in Visual Basic ein "Programm" geschrieben in dem ich zuerst Daten aus 2 unterschiedlichen Excel-Dateien (A und B) in eine andere Excel Datei (C) kopiere.
Anschliessend habe ich ein UserForm für die Tabelle C geschrieben und komplett gefüllt.
ich habe das Userform über ein autostart in ein makro eingebunden, sodass ich dies in die Symbolleiste einfügen konnte.
Das hat alles wunderbar geklappt. Nur wenn ich jetzt meine 3 Dateien nehme an einen anderen Ort auf dem PC kopiere dann funktioniert das Makro in der Symbolleiste nicht mehr sondern bringt mir folgenden Fehler:
"Eine Datei mit dem NAmen 'Lieferantenbewertung.xls' ist bereits geöffnet. Es können keine zwei Dokumente mit dem selben Namen geöffnet werde, selbst wenn sich die Dokumente in unterschiedlichen Ordnern befinden. Schliessen Sie entweder das erste Dokument, um das zweite zu öffnen, oder benennen Sie eines der Dokumente um."
Komischerweise ist aber nur eine Excel Datei offen!!!
Kopiere ich meine 3 Dateien wieder zurück an den "Anfangsort" funktioniert das Makro einwandfrei.

Ich hoffe es kann mir jemand weiterhelfen.

Sollte ich mich bissl wirr ausgedrückt haben dann einfach nachfrage, ist nämlich ein klein bissl kompliziert zum ausdrücken =)

Liebe Grüsse
Martina

 

Hallo Martina,

nur wenige sehen Deine Datei und können Dir Helfen.

Gruß Hajo

 

Hallo Hajo,

an der Datei selber kann es nicht liegen, denn wenn ich das Makro manuell über Extras-Makro-Makros-"autostart" ausführen anwähle funktioniert es. Es muss also irgendwie an der Symbolleiste mit dem zugewiesenen Makro liegen.
Denn wenn ich auf mein Symbol zum Start des Makros klicke geht er erst gar nicht in den Visual Basic Code rein sondern bricht schon vorher ab =(

Liebe Grüsse Martina

 

Hallo Martina,

also habe ich falschg vermutet das Du die Symbolleiste in einer Datei hast. Dann habe ich leider keinen Ansatz. Meine Gründe afür habe ich ja schon im ersten Beitrag geschrieben.

Gruß Hajo

 

Hallo Hajo,

ich habe die Symbolleiste nicht in der Datei drin stehen.
Ich bin einfach hingegangen, habe im Excel eine Symbolleiste hinzugefügt, dem ein Menü zugeordnet und ein Makro zugewiesen.
Alles manuell. Hab jetzt herausgefunden, dass wenn ich meine Dateie verschiebe, dass der Pfad für das zugewiesene Makro der alte bleibt.
Kann ich das irgendwie dynamisch machen?
Zum Beispiel mein Makro über ein anderes in die Symbolleiste einfügen???

Liebe Grüsse
Martina

 

Hallo Martina,

nach dieser Aussage

bin ich davon ausgegangen das die in der Datei ist. Anders habe ich das noch nicht gesehen. Mein angesprochenes Problem vom ersten Beitrag besteht immer noch. Nur wenige sehen Deine Datei und Deinen Code. Da Du dies ncht abstellen möchtest, bin ich raus. Ich wünsche Dir noch viel Erfolg bei Deiner Problemlösung.

Gruß Hajo

 

Hier ist mein Code.
Leider ist er bissl grösser deswegen hab ich ihn in .txt Dateien abgespeicher und nicht hier rein kopiert =)

Liebe Grüsse
Martina

 

Hallo zusammen,

ich hab mein Problem grad eben selber gelöst =)
hab nun das Makro über ein anderes Makro in die Symbolleiste integriert.
Falls jemand das gleiche Problem hat ist hier der Code:

Public Sub prcCreateButton()
Dim myCommandBar As CommandBar
Dim myCommandBarButton As CommandBarButton
Set myCommandBar = Application.CommandBars("Worksheet Menu Bar")
Set myCommandBarButton = myCommandBar.Controls.Add(Type:=msoControlButton, _
Before:=myCommandBar.Controls.Count + 1, Temporary:=True)
With myCommandBarButton
.BeginGroup = True
.Caption = "Lieferantenbewertung"
.FaceId = 283
.OnAction = "autostart"
.Style = msoButtonIconAndCaption
.TooltipText = "Berechnung starten"
.Tag = "Berechnen"
End With
Set myCommandBar = Nothing
Set myCommandBarButton = Nothing
End Sub

Liebe Grüsse
Martina