Office: (Office 2019) Hilfe wie Löst man ein Makro über einem anderen Makro aus ....

welches sich in der anderen Arbeitsmappe Befindet.

Hallo ...habe gerade den Vollen Stress - Ich möchte von Arbeitsmappe 1 in den Arbeitsmappen 2 - 3 jeweils das gleiche Makro auslösen.
Mein Vorgehen war ich öffne die Arbeitsmappe 2 drücke versuchte auf die Autoform zu klicken um das Makro auszulösen Geht aber nicht.
Ich möchte ja nicht in Arbeitsmappe 1 in den Button das Makro schreiben was erst in der Arbeitsmappe 2 ausgelöst werden soll. Gibt es hierfür einen Befehl ???

Sub GleichschenkligesDreieck2_Klicken()
'
' GleichschenkligesDreieck2_Klicken Makro
'

'
Range("FD23").Select
Workbooks.Open Filename:= _
"C:\Users\WAXI\Desktop\xxxxxxxxxxxxxxxxxxxxxxsdsdsddssddsdsdsxdsxdssdds.xlsm"

Sub Wolke2_Klicken()
'
' Wolke2_Klicken Makro
'

'
Range("E14:E39").Select
Selection.Copy
Range("E15").Select
ActiveSheet.PasteSpecial Format:=3, Link:=1, DisplayAsIcon:=False, _
IconFileName:=False
Range("E14").Select
ActiveCell.FormulaR1C1 = "614"
Range("E13").Select
ActiveCell.FormulaR1C1 = "-3"
Range("F14").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=RC[-1]+R[-1]C[-1]"
Range("F15").Select
End Sub


ActiveWorkbook.Save
ActiveWindow.Close
End Sub

wie gesagt der Rote Teil sollte ausgelöst werden ( steht nur hier dazwischen )den will ich aber nicht in eintragen in dem Button.



Diese Berechnungen sind nicht real nur zum Testen - Prinzip bleibt ja gleich.

 

Ich habe nun neuerliche Test Mappen erstellt und komme nicht weiter wo ist der Fehler bitte ?

Mappe A1 soll in Mappe B 1 das Makro auslösen speichern Schließen.

 

Hallo,

wenn du dich ernsthaft mit Makros beschäftigen möchtest, solltest du als erstes damit beginnen, dich von der Verwendung der Select-Anweisungen verabschieden. Die sind völlig überflüssig. Für dein konkretes Problem würde es helfen, deine Datei zu kennen.

 

die select Anweisung weil ich es aufgezeichnet habe - und die Zwei Testdatein sind im von Prinzip her das Gleiche - zudem würde keine Echte Datei hier sich laden lassen da jede 14 MB hat jeweiliges Macro an die 110 Zeilen umfasst und jeweils 8 Tabellen durchrechnet. Wie gesagt es geht mir ums Öffnen > Auslösen Schließen und das Öffnen der Nächsten Datei.

die Formel mit Applikation Run funzt nicht in dem Fall

 

Hallo BlueMoon,

diese Aussage:

ist der Grund, warum ich mir gerne die Dateien ansehe, um die es geht. Vierzehn MB für eine Datei, ein Makro mit hundertzehn Zeilen sowie acht Tabellenblätter, das deutet für mich auf ein Strukturproblem hin, bei dem man zuerst ansetzen sollte.

 

Stimmt nicht es werden nur 8 Tabelle blätter berechnet aber du weißt nicht wie viele Zeilen und Spalten ( hinzu kommen zwei Archive die alle Grunddaten zwischenspeichern Daten -Speicherung seit 1983 Mai Jeder Tag ein Berechnungsfaktor - Mehrere Kalender ( unterschiedlicher Kulturen ) Aber wenn du keine Lösung auf Grund der Musterdatei erstellen kannst - brauchen wir ja nicht hin her schreiben.

 

Hallo,

das was ich kann, und das, was ich zu tun bereit bin, kann durchaus erheblich von einander abweichen. Für dich der Hinweis, das ein Forum nicht dazu da ist, Auftragsarbeiten zu vergeben. Das geht an anderen Stellen und kostet (viel) Geld.

 

@BlueMoon37 Vorschlag zur Güte:

Bau doch mal zwei einfache Arbeitsmappen (jeweils nur ein Sheet), schreibe Dein Makro als PseudoCode (was hättest Du den gerne) in die erste Arbeitsmappe und zeige es hier.

Du wirst als Antwort sicher keine endgültige Lösung für Dein genanntes Thema bekommen, aber vielleicht ein Rezept, wie man solch ein Problem löst. Das hilft dann auch für künftige Projekte.

Grüße

 

Habe das nochmals neu erstellt mit Belanglosen Makro! UND in etwa so könnte sollte es funktionieren - aber es braucht was gescheiteres als
Workbook_Open()
und ausführen
allerdings ist das was ich Baute gerade nicht von Vorteil hab es getestet am Großen Rechner und der Hinkt dabei bereits

 

Hallo,

so ganz erschließt es sich für mich nicht, was du da vorhast. Wozu von der einen Datei aus eine andere öffnen, um da Werte heraus zu ziehen? Idealerweise hat man alles, was man benötigt, in einer Datei zusammen gefasst.

 

@KD Nur so als Idee: eine Abteilung arbeitet auf der einen Datengrundlage, eine andere auf einer anderen und irgendwann soll aus beiden Prozessen ein Ergebnis gezogen werden ...

 

Application.Run()
Schau mal hier nach:
VBA-Makro in externer Arbeitsmappe aufrufen – Excel-Inside Solutions

ach ja, vermute mal, du wirst im Trust Center vorher die Einstellung treffen müssen, dass du dem VBA-Projektmodell vertrauen willst