Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
276to280
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
276to280
276to280
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Am Ende eines Makro, den nächsten Makro aufrufen

Am Ende eines Makro, den nächsten Makro aufrufen
03.07.2003 08:24:06
Gunter
Hallo,
ich habe einen Makro "A". Ich möchte, wenn dieser abgelaufen ist, das sofort Makro "B" gestartet wird.
Wie lautet hierzu der Befehl??
Gunter

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Am Ende eines Makro, den nächsten Makro aufrufen
03.07.2003 10:20:38
grüni
hallo,
setzt in die letzte Zeile des 1 makros
"call" und dann dein Makroname des 2 Makro
mfg Grüni

AW: Am Ende eines Makro, den nächsten Makro aufrufen
03.07.2003 08:38:16
heinerv
Hallo Gunter
einfach den Namen des Makros als letzte Zeile in Makro "A" schreiben.
Gruß
heinerv

AW: Am Ende eines Makro, den nächsten Makro aufrufen
03.07.2003 08:25:45
heinerv
Hallo Gunter
einfach den Namen des Makros als letzte Zeile in Makro "A" schreiben.
Gruß
heinerv

AW: Am Ende eines Makro, den nächsten Makro aufrufen
03.07.2003 08:43:52
Gunter
Hallo Heiner,
hier ist mein Makro "A"

Sub go_auto_today()
Application.ScreenUpdating = False
For Each a In ActiveSheet.Range("B4:FZ4") 'Bereich des Datums
If a = Date Then
Spalte = a.Column
Exit For
End If
Next
On Error Resume Next
Application.Goto ActiveSheet.Cells(4, Spalte), True
If Err.Number <> 0 Then
MsgBox ("Das aktuelle Datum (HEUTE) wurde nicht gefunden.")
End If
Application.ScreenUpdating = True
bereich  <== Das ist der Name von Makro "B"
End Sub

Wenn ich das so eingebe, startet Makro B nicht. Was mache ich falsch??
Gunter

Anzeige
AW: Am Ende eines Makro, den nächsten Makro aufrufen
03.07.2003 08:49:51
heinerv
Hallo Gunter,
wo ist das zweite Makro abgelegt?
Du kannst an folgendem Beispiel den Aufruf nachvollziehen:

Sub test()
test1
End Sub



Sub test1()
MsgBox "ja"
End Sub

Gruß
heinerv

AW: Am Ende eines Makro, den nächsten Makro aufrufen
03.07.2003 09:20:07
RAnton
Hallo Gunter,
wo liegt denn dein Makro bereich und wie hast du es deklariert?
Gruß
RAnton

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige