Teneriffa Süd Abflug
Gibt es mehrere Prozeduren in einem Modul, kann man mit Hilfe dieses Kombifelds leicht zwischen ihnen navigieren. Außerdem gibt es in diesem Kombifeld noch den Eintrag (Deklarationen). Der Deklarationsbereich ist der Teil eines Moduls, der sich vor der ersten Prozedur befindet. Hier können verschiedene Dinge eingetragen werden, die für das gesamte Modul gelten. Gelegentlich kommen wir darauf zurück. Um nun unsere Prozedur zu starten, schreiben wir ins Direktfenster Hallo und drücken Enter: Hallo Hallo Welt! Wie führe ich mehrere Makros mithilfe einer Schaltfläche in Excel aus?. Eine Sub-Prozedur wird also mit Sub eingeleitet, gefolgt von einem Namen, den man selbst frei bestimmt, und endet mit End Sub. Ein Name... muss mit einem Buchstaben beginnen darf kein Leerzeichen enthalten, und keines der folgenden Zeichen:.! @&$# darf max. 255 Zeichen lang sein (sollte einerseits möglichst kurz und andererseits möglichst selbsterklärend sein) darf kein von VBA verwendetes Schlüsselwort sein (wie z. B. Sub oder Debug) VBA berücksichtigt Groß-/Kleinschreibung nicht, behält jedoch die Schreibweise bei, mit der der Name deklariert wurde.
:-) zwischen Himmel und Erde ist nicht immer alles erklärbar:-) manchmal braucht es auch eine gewisse Ambivalenz, damit es zur Zufiedenheit Beider läuft... hmmm,... und bei einigen findet sich sowas, gar als Hassliebe wieder - auch eine Ambivalenz ich gehe mal den Bildschim streicheln^^ *dies ist nur ein offtopic-Beitrag - muss auch manchmal sein* Eine Antwort auf diesen Beitrag verfassen (mit Zitat / Zitat des Beitrags) IP erstellt am: 18. Wie kann man dasselbe Makro in Excel auf mehreren Arbeitsblättern gleichzeitig ausführen?. 2006 12:52 <-- editieren / zitieren --> Unities abgeben: Hallo Leute, Danke das Ihr Euch die Mühe gemacht habt und das Beispiel nachgebaut habt, nur leider bekomme ich meine Makros nicht hin. Ich habe Euch in der Anlage meine Textdatei und die Module (welche ich in meiner unter Module habe) angehängt. Im Modul1 müßtet Ihr den Pfad für die Textdatei an Euren Speicherplatz anpassen. Modul1 alleine funktioniert Modul2 alleine funktioniert Modul4 alleine funktioniert aber Modul3 (sollte 1 und 4 hintereinander ausführen, funktioniert nicht) Wenn Ihr Euch das Ding mal ansehen könntet DANKE!!!!!!!!
CommandButton1_Click 03. 2017, 08:50 # 6 ActiveX-Steuerelemente? Tut mir Leid ich bin total schlecht in VBA.. habe auch nur mit sehr viel Mühe die Makros erstellt... Die sehen für jedes Blatt jeweils so aus: Sub Test() Dim a As Long, i As Long reenUpdating = False a = 5 For i = 1 To 10000 With Worksheets(1) If (i, "B") = "Holz" Then Worksheets(3)(a, 1) = Worksheets(1)(i, 1) Worksheets(3)(a, 2) = Worksheets(1)(i, 2) Worksheets(3)(a, 3) = Worksheets(1)(i, 3) Worksheets(3)(a, 4) = Worksheets(1)(i, 4) Worksheets(3)(a, 5) = Worksheets(1)(i, 5) a = a + 1 Else End If End With Next i reenUpdating = True 03. VBA - Mehrere Makros gleichzeitig ausführen - MS-Office-Forum. 2017, 09:08 # 7 In diesem Fall verwendest du ein Formular-Steuerelement (steht alles dran wenn man diese Steuerelemente einfügt). Ich würde dir da empfehlen, ein gemeinsames extra Makro für alle Tabellenblätter zu schreiben, nur musst du dazu in einer Schleife über alle Tabellenblätter laufen und dich dabei auf das betreffende Tabellenblatt beziehen: Sub TestAlle() Dim wksTab As Worksheet ' Schleife über alle Tabellenblätter For Each wksTab In Worksheets ' Name <> Name des 1.
2003 16:45:02 herzlichen Dank... klappt wunderbar. Gruss, Stefan von: ronny Geschrieben am: 09. 2003 16:44:20 Du brauchst nur die Makro nacheinander auflisten. Sub test() makro1 makro2 makro3 Excel-Beispiele zum Thema " mehrere Makros per Makro nacheinander starten" Suche über mehrere Tabellen Mehrere Schaltflächen für ein Makro Suchbegriff über mehrere Tabellenblätter suchen.
12. 2015 Im Click_Ereignis des Buttons (ActiveX-Steuerelement) Die Makros werden so mit einem Klick nacheinander abgearbeitet. Code: Private Sub CommandButton1_Click() NameMakro1 NameMakro2 NameMakro3...... End Sub 03. 2017, 08:34 # 4 Threadstarter Hallo Beverly, auf dem zweiten Blatt ist ein Button eingebaut durch den die Werte in der Haupttabelle (Arbeitsblatt 1) nach einem bestimmten Wert gefiltert und in die Tabelle auf diesem Blatt kopiert werden. Auf den folgenden Arbeitsblättern sieht es genauso aus, mit dem Unterschied dass dort nach anderen Werten gesucht wird. Nun möchte ich die Sache vereinfachen falls jemanden kein Bedarf oder keine Lust hat in jedes Blatt einzelnd zu gehen und dort den Button zu betätigen, sodass man mit einem Klick alle Tabellen mit ihren Werten füllt. Ist das einigermaßen verständlich? :S 03. 2017, 08:46 # 5 ich nehme an, es handelt sich um ActiveX-Steuerelemente? Da diese Prozeduren standardmäßig als Private deklariert sind, musst du sie umbenennen in Public - dann kannst du sie aufrufen mittels Worksheets("Tabelle2").
Tabellenblattes If <> Worksheets(1) Then ' Bezug auf das laufende Tabellenblatt With wksTab (a, 1) = Worksheets(1)(i, 1) (a, 2) = Worksheets(1)(i, 2) (a, 3) = Worksheets(1)(i, 3) (a, 4) = Worksheets(1)(i, 4) (a, 5) = Worksheets(1)(i, 5) Next wksTab 03. 2017, 10:13 # 8 Hm.. irgendwie verstehe ich das nicht ganz:/ Der Wert "Holz" wird ja nur in der zweiten Tabelle gesucht. In den folgenden wird jedesmal nach einem anderen Wert gefiltert.. Der Code den ich hier geschickt habe bezieht sich nur auf diese eine Tabelle - in den anderen ist er zwar vom Aufbau gleich aber es wird nach anderen Werten gesucht und natürlich dementsprechend auch in das dazugehörige Blatt übertragen. Irgendwie klappt das mit deinem Code nicht, dass alles gleichzeitig ausgelöst wird.... wahrscheinlich habe ich was falsch gemacht 03. 2017, 10:29 # 9 Ich hatte doch gefragt, ob die Makros für alle Tabellen geich sind - das sind sie aber offensichtlich nicht, wenn nicht in allen nach "Holz" gesucht werden soll. Nach welchen anderen Suchbegriffen soll denn außerdem gesucht werden und in welcher Reihenfolge und bezogen auf welche Tabellenblattnummer?
/SW-Entwickler Beiträge: 1227 Registriert: 19. 08. 2004 Büro: Win10 Enterprise 64bit, Office Professional Plus 2013 - Privat: Linux Mint 15, LibreOffice erstellt am: 18. 2006 13:41 <-- editieren / zitieren --> Unities abgeben: Nur für piston erstellt am: 18. 2006 14:08 <-- editieren / zitieren --> Unities abgeben: Hallo, wiedereinmal vielen Dank für Eure Bemühungen!!! Jetzt habe ich aber erst bemerkt woran es wirklich scheitert: Das Problem ist das Marko 3 zum Ausführen von 1+4. Wenn man versucht das Makro 3 über einen Shortcut (in meinem Fall: Strg+Shift+H) auszuführen wird nur das Makro 1 ausgeführt. Wenn ich den Shortcut auf Strg+H ändere, bzw. einfach über Makro ausführen gehe, funktioniert es?!? Damit wäre mein Problem gelöst, obwohl es doch einwenig eigenartig ist, das die Ausführung eines Makros vom verwendeten Shortcut beeinflußt wird. DANKE! DANKE! DANKE! lG Piston Eine Antwort auf diesen Beitrag verfassen (mit Zitat / Zitat des Beitrags) IP erstellt am: 18. 2006 14:22 <-- editieren / zitieren --> Unities abgeben: Nur für piston Hallo Piston, mal so ganz ins hell-blaue hinein: Zitat:... obwohl es doch einwenig eigenartig ist, das die Ausführung eines Makros vom verwendeten Shortcut beeinflußt wird.