Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 17:41:19
Link erstellen mit Formel oder VBA?
23.04.2024 17:00:22
Summe und Ausgabe
23.04.2024 16:27:34
Excel Starthinweis - Arbeitsmappenleistung überprüfen ...
23.04.2024 16:15:16
Mittels VBA vordefinierte Kommentare in Zellen einfügen?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1328to1332
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1328to1332
1328to1332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

mit einem Makro ein anderes Makro ausführen

mit einem Makro ein anderes Makro ausführen
30.08.2013 09:56:32
Herbert
Guten Morgen,
wie kann ich mit einem Makro ein (oder mehrere) anderes Makro ausführen?
Zugleich sollte dieses Makro nicht nur im aktuellen Tabellenblatt, sondern in allen Tabellenblättern der Datei ausgeführt werden.

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Call makro2 owT
30.08.2013 10:01:46
JACKD
owt = ohne weiteren Text

AW: mit einem Makro ein anderes Makro ausführen
30.08.2013 10:09:33
Doris
Hallo,
hier ein kurzes Bsp. zum Aufruf von Makros test1 und test2.
sub test0()
call test1
call test2
end sub
Sub Test1()
end sub
Sub Test1()
end sub
Hoff das hilft weiter.
Gruß Doris

AW: mit einem Makro ein anderes Makro ausführen
30.08.2013 10:36:11
Herbert
hallo Doris,
vielen Dank für die schnelle Antwort. Beim aktuellen Tabellenblatt klappt das.
Ich will aber dass das Makro in allen Tabellenblättern ausgeführt wird.
Beispiel: Makro1 blendet im aktuellen Blatt verschieden Spalten aus. Mit Makro 2 soll das Makro 1 in allen Tabellenblättern ausgeführt werden.

Anzeige
... in allen Blättern ...
30.08.2013 10:34:33
Erich
Hi Herbert,
ein Makro wird nicht "in einem Tabellenblatt" ausgeführt. (Kann ja sein, dass es gar nichts zu tun hat mit Blättern,
sondern nur eine MsgBox ausgibt oder Eigenschaften der Arbeitsmappe ändert oder ...)
Hier mal ein Beispiel, wie man ein Makro in einer Schleife so aufrufen kann,
dass alle Blätter einer Mappe bearbeitet werden: 

Option Explicit
Sub Hauptmakro()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
Untermakro ws
' oder
Call Untermakro(ws)
Next ws
End Sub
Sub Untermakro(wks As Worksheet)
With wks
.Cells(1, 1).Value = Now
.Cells(1, 2).Value = .Name
End With
End Sub
Ob man "Call" hinschreibt oder es weglässt, ist Geschmackssache.
Wenn man "Call" schreibt, muss man den/die Paramneter in Klammern setzen.
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich

Anzeige
oder innerhalb eines Makros
30.08.2013 10:43:17
Erich
Hi Herbert,
manchmal lohnt es sich nicht, die Berarbeitung in ein Untermakro auszulagern.
Dann geht es einfacher so: 

Option Explicit
Sub EinMakro()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
With ws
.Cells(1, 1).Value = Now
.Cells(1, 2).Value = .Name
End With
Next ws
End Sub
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich

AW: oder innerhalb eines Makros
01.09.2013 09:05:25
Erich.G
hallo Erich,
genauso sollte es sein. Setzt ich allerdings meine Daten ein, dann funktioniert es nicht mehr.
Hab mal die Beispieldatei hochgeladen.
https://www.herber.de/bbs/user/87109.xlsm
Kannst du mir helfen?
vielen Dank im voraus.

Anzeige
AW: oder innerhalb eines Makros
01.09.2013 13:37:16
Erich
Hi Herbert,
warum postest du deine Frage jetzt als "Erich.G"? Das ist meinem Usernamen "Erich G." sehr ähnlich...
Hier habe ich etwas Ähnliches gesehen:
https://www.herber.de/forum/archiv/1216to1220/1217832_Alle_Blaetter_eines_Workbook_zoomen.html#1217837
So könnte das bei dir funzen: 

Sub EinMakro()
Dim sh_Alt As Object, wks As Worksheet
Application.ScreenUpdating = False
Application.EnableEvents = False
On Error GoTo XErr
Set sh_Alt = ActiveSheet
For Each wks In ActiveWorkbook.Worksheets
With wks
.Unprotect
.Range("I:I,K:K,N:O").EntireColumn.Hidden = True
With .Range("A1").Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 12611584
.TintAndShade = 0
.PatternTintAndShade = 0
End With
.Activate
ActiveWindow.Zoom = 75
.Protect DrawingObjects:=True, Contents:=True, _
Scenarios:=True, AllowFiltering:=True
End With
Next wks
sh_Alt.Activate
XErr:
Application.EnableEvents = True
Application.ScreenUpdating = True
Resume XEnd
XEnd:
End Sub
Ich bin jetzt mal für zwei, drei Wochen weg...
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich

Anzeige
AW: oder innerhalb eines Makros
04.09.2013 22:09:14
herbert
hallo Erich,
das mit dem Namen war ein Fehler von mir. Bin noch ziemlich neu hier und dachte, da gehört der Name des letzten Absenders rein. Aber jetzt weiß ich es.
Vielen Dank für dein Makro. Genauso sollte es sein und es klappt einwandfrei.
Nochmal vielen Dank
viele Grüße
Herbert

AW: ... in allen Blättern ...
30.08.2013 10:44:48
Herbert
hallo Erich,
vielen Dank. Ich werde es am Wochenende ausprobieren und dir sagen ob´s klappt.
Ich hoffe ich bekomm´s hin, da meine VBA-Kenntnisse relativ bescheiden sind.
viele Grüße

306 Forumthreads zu ähnlichen Themen

mehrere Makros in ein Makro kopieren
jenny

Hey, wie kann ich mehrere Makros in ein Makro kopieren?
Angenommen ich hab Makro 01 und 02 und will die in ein Makro kopieren, dass Update heisst. Funktioniert das:
Sub Update Sub01 End Sub
Sub02
..
End Sub
End Sub
Also kann ich einfach bei editieren das ganze...
01.10.2008 19:00:57
Thread-ID: 1013736
2 Beiträge
Anzeige
Makros nacheinander ausführen
Philipp

Hallo Leute, dies ist mein erster Eintrag in einem Excel-Forum ever, also hallo erstmal! ;-)
Ich hoffe auf Eure Hilfe zu einem VBA Problem. Habe schon ähnliche Einträge in anderen Foren gefunden, jedoch keine lösung, die bei mir funktioniert.
Problem ist folgendes:
Ich habe verschie...
18.06.2009 11:33:36
Thread-ID: 1082519
3 Beiträge
Makro in neue Arbeitsmappe ausführen
Fred

Hallo zusammen
Ich komme mal wieder nicht weiter. Ich habe unten ein Makro zusammen gestrickt was auch prima funktioniert und weiss jetzt nur nicht wie ich es anstellen soll das im hintergrund eine vorhandene Arbeitsmappe geöffnet wird dann in der Mappe ein neues Tabellenblatt mit dem unten...
07.07.2009 17:11:23
Thread-ID: 1086973
5 Beiträge
Anzeige
Makro warnung obwohl kein Makro vorhanden...
Torsten

Hallo zusammen,
ich habe in einer Exceldatein mal ein Marko gehabt. In der Zwischenzeit habe ich das Marko gelöscht, die Warnmeldung, dass die Datei Makros enthält, kommt aber immer noch.
Kann man das irgendwie abschalten?
Grüsse
Torsten
07.08.2009 08:37:53
Thread-ID: 1094191
8 Beiträge
Makro in Makro schreiben lassen ?
alexander

Hallo,
mein Problem:
Ich habe ein Makro zur Massenpflege von verschiedenen Dateien erstellt. Nun möchte ich aber, das mir das Makro beim abändern der einzelnen Dateien einen bestimmten Code (ein weiteres Makro) in die Tabellenblattmodule der einzelnen Dateien schreibt. Sprich, das die v...
10.08.2009 10:16:27
Thread-ID: 1094632
24 Beiträge
vba Code ausführen, bei Wechsel zu Excel
Karsten

Hallo und guten Abend,
ich wechsel von einer Internetseite mit der Tastenkombination Alt Tab zu Excel.
Bislang habe ich den vba Code einem Button zugewiesen und über diesen ausgeführt.
Nun soll dieser vba Code ausgeführt werden, wenn Excel den Focus erhält, wenn das entsprechende Ar...
14.08.2009 21:53:59
Thread-ID: 1096096
6 Beiträge
Formel per Makro einfügen - Ausführen fehlerhaft
Dennis

Hallo Gemeinde,
nachdem mir gestern hier so toll geholfen wurde, bin ich mir sicher, dass ihr mir auch bei dem Problem helfen könnt :)
Also, ich füge per Makro eine Formel (=SUMMEWENN(AI:AI;A11;AR:AR)) in Tabellenblatt 1 ein, ein paar mal untereinander (A11 variiert dabei). Funktionier...
09.09.2009 15:28:39
Thread-ID: 1101555
5 Beiträge
Makros beim Speichern eliminieren
Chris

Hallo Excelianer
Also, folgendes Problem
Ich habe eine Datei, die per Makro einige Berechnungen ausführt. Am Ende der ganzen Berechnungen speichert sich die Datei mit SaveAs. Das heisst: Das Tool an sich wird nicht überschrieben.
Die "SaveAs"-Datei ist eine reine Werte-Datei. Mein...
16.09.2009 16:39:45
Thread-ID: 1103283
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
6
2
4
2
7
23
5
4
2
4
2
3
10
5
3
1
3
11
2
6
15
4
3
5