Makros, die einen bergabeparameter haben, erscheinen nicht in der Ausswahlliste, weil beim Start ber die Auswahlliste kein Parameter bergeben werden kann. das sieht im Code dann so aus: Code: Sub Makro1(DummyParameter as Boolean) '--- hier der normale Makrocode End Sub Sub Start() Call Makro1(True) das wre fr dich wahrschienlich die einfachste Lsung, denn damit lsst sich fr jedes Makro individuell steueren, ob es in der Auswahlliste erscheint oder nicht. Gru Daniel
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. VBA-Forum - Das Forum zu Microsoft VBA. 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").
Siehe Screenshot: 3. Setzen Sie dann den Cursor auf das Makro des ersten Teils und drücken Sie F5 Taste, um den Code auszuführen, und Ihr Makrocode wird einzeln auf ein Blatt angewendet.
03. 2017, 10:38 # 10 Sorry dann habe ich mich wohl falsch ausgedrückt... Es gibt die eine erste Haupttabelle in der über 200 Zeilen gespeichert sind. Es folgen ca. 20 weitere Tabellenblätter mit eigenen Tabellen. In jeder Tabelle ist ein Button. VBA - Mehrere Makros gleichzeitig ausführen - MS-Office-Forum. Wenn ich diesen anklicke wird die Haupttabelle in Spalte 1 nach einem gesuchten Begriff durchsucht und alle gefundenen Zeilen werden in die Zieltabelle kopiert. Es sind jedesmal andere Begriffe und es gibt wie gesagt über 20 Tabellen. Ich hatte gehofft ich kann in Form eines neuen Makros alle anderen Makros ausühren und dann ein Button in der Haupttabelle erstellen auf das ich dieses Makro platziere. Dann sollten beim Anklicken alle Makros ausgeführt werden... sprich alle Tabellen sollten sich mit ihren spezifischen Zeilen füllen. Scheint aber gar nicht so einfach zu sein wie ich gehofft hatte für mich als VBA Laie... 03. 2017, 11:14 # 11 Wie hast du die Makros dem Button in jedem Tabellenblatt zugewiesen: hast du einen Doppelklick darauf gemacht oder einen Rechtsklick und dann "Makro zuweisen" benutzt?
Normalerweise kann man in solch einem Fall einfach im AlleMakro die Namen der einzelnen TeilMakros untereinander schreiben, d. h. nacheinander aufrufen - also nach diesem Prinzip: Sub Alle_Makro() Jan Feb Mrz '.... Aber: du willst ja die Daten aus allen Tabellenblättern untereinander schreiben, in deinen Teil-Makros jedoch beginnt die Zählung der 1. Zielzeile IMMER WIEDER mit a = 5, d. du würdest die Daten also jeweils überschreiben. Aus diesem Grund kannst du die Teil-Makros nicht einfach nacheinander aufrufen. Versuche es mal so: Sub AlleUebertragen() Dim lngErste As Long, i As Long Dim arrSuche() Dim intZaehler As Integer Dim lngLetzte As Long Dim varSuche As Variant ' letzte belegte Zeile in Spalte A der 1.