Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
364to368
364to368
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA: Wie Prozedur im aktiven Worksheets aufrufen?

Forumthread: VBA: Wie Prozedur im aktiven Worksheets aufrufen?

VBA: Wie Prozedur im aktiven Worksheets aufrufen?
19.01.2004 08:34:01
Chris
Hallo,
in verscheidenen Worksheets habe ich in der jeweiligen Prozedur WS_Init einen individuelle Code stehen, den ich unabhängig von Ereignissen aus diversen anderen Prozeduren aufrufen möchte.
Meine Versuche
call ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).WS_Init
oder
call ActiveSheet.CodeName.WS_Init
oder
call ActiveSheet.WS_Init
führen leider nicht zur Ausführung der Prozedur.
Hat jemand einen Lösungsansatz?
Danke im voraus!
Chris
Nun möchte ich die Initialisierungsprozedur aus
von "außerhalb" aufrufen (nicht nur bei
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Wie Prozedur im aktiven Worksheets aufrufen?
19.01.2004 08:51:26
Markus
Hallo,
was wäre denn, wenn Du den CODE in ein Modul schreibst, dann solltest Du doch IMHO von allen Orten aus callen können ....?
Markus
AW: Für mich keine zufriedenstellende Lösung
19.01.2004 08:57:52
Chris
AW an Markus:
Die Ausführung erfolgt Arbeitsblatt-bezogen. Um universell zu bleiben und die Übersicht zu behalten, soll der Code nicht in ein zentrales Modul ausgelagert werden.
Anzeige
AW: Für mich keine zufriedenstellende Lösung
19.01.2004 09:12:33
Markus
Hallo,
nach ja: Doch die beste Lösung, denn Du kannst verschiedenen Module anlegen um die Übersicht zu behalten und der Vorteil ist wirklich, dass Du den Code von überall aufrufen kannst.
Markus
AW: VBA: Wie Prozedur im aktiven Worksheets aufruf
19.01.2004 12:18:46
Jens-Peter Bargheim
Hallo Chris,
vielleicht versuchst Du's mal so:
v_proz = ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).name & ".WS_Init"
Application.Run (v_proz)
Gruß
Jens-Peter
Anzeige
AW: Die Lösung ist gut!
19.01.2004 12:37:40
Chris
Hallo Jens-Peter,
Deine Lösung ist genau das, was ich gesucht habe!
1000 Dank!
Chris
;

Forumthreads zu verwandten Themen

for each zelle in sheet problem
thomas

Hallo Leute
Ich hab mal eine allgemeine Frage.
Und zwar möchte ich jede Zelle im sheet nach einem string durchsuchen.
Die Suche klappt auch soweit.
Nur möchte ich keine 2 For next schleifen verwenden sondern:
ZeileEnde=Sheets("Tabelle1").Cells(row.count,1).End(xlUp).row
...
08.04.2009 10:06:35
Thread-ID: 1067622
3 Beiträge
VBA - Formeln kopieren mit Bezug auf andere Sheets
Fabian

Hallo Zusammen,
ich habe folgende Problemstellung:
Eine Exceldatei *xlsx mit insgesamt 4 Tabellenblättern.
Tabellenblatt 1 - Material Data - Dateneingabe ab Zeile 2.
Tabellenblatt 2 - ABCXYZ - nicht relevant für das Problem
Tabellenblatt 3 - Life Time Cycle - Berechnung, di...
16.09.2009 09:14:54
Thread-ID: 1103102
5 Beiträge
Worksheetübergabe an anderes Workbook
Elke

Liebe Excelgemeinde,
mit dem Problem hatte ich mich schonmal gemeldet und es lief auch wieder eine ganze Weile reibungslos. Nun passiert es wieder, daß auf 2 bestimmten Rechner unter Win 7 unten stehende eigentlich triviale Prozedur nicht ausgeführt wird.
Es soll ein Worksheet "Fall_X"...
15.05.2012 21:00:05
Thread-ID: 1263634
17 Beiträge
VBA: mehrere workbooks & -sheets
Dani

Hallo Excel- Koryphäen,
Habe folgendes Problem, wo ich keinen passenden code im Archiv finden konnte.
Habe 17 xls-files mit je 2 worksheets.
Der Tabellen-Aufbau ist immer identisch und ich möchte nun für all diese 17 workbooks & deren 2 worksheets die Spaltenbreite anpassen und...
02.08.2012 14:21:51
Thread-ID: 1273532
7 Beiträge
Anzeige
Makro for each Zelle In ActiveSheet
Andreas

Hallo,
ich habe funktionierendes Makro, welches mir Felder mit Kommentar das Kommentrafeld gleich groß macht. Jedoch sollte es für alle Tabellen in der Mappe funktionieren, nicht nur für die aktuell aktive.
Wie kann man das lösen? Sub Comment() Dim Zelle As Range For Each Zelle In Acti...
17.08.2012 20:37:16
Thread-ID: 1275514
8 Beiträge
[VBA-Schleife] Worksheets öffnen und speichern
Nico

Hallo,
ich möchte mit verschiedenen Filtern mehrere Worksheets aus einer Datentabelle erstellen. Im Prinzip klappt auch alles.
Einziges Problem:
Beim automatischen erstellen & schließen der Excel-Dateien tauchen unregelmäßig Fehlermeldungen auf.
Einige erstelle Dateien in d...
26.03.2013 11:12:30
Thread-ID: 1306027
3 Beiträge
For Each rCell In Worksheets("_HISTORY").Range("_H
Peter

Guten Abend
Weshalb läuft mein Code nicht, wenn ich
den Range wie folgt anspreche:
For Each rCell In Worksheets("_History").Range("_HIST")
...
Next
Wenn ich "In Wroksheets" weglasse, funktioniert es.
Der Worksheet-Name ist richtig geschrieben, wie die Abfrage im Dire...
09.12.2013 22:29:02
Thread-ID: 1341925
4 Beiträge
VBA Private Worksheets Change zusammenfügen
Hanna

Hallo zusammen,
ich bin gerade dabei, mich ein bisschen mit Makros auseinanderzusetzen.
Konkret geht es darum, dass ich eine Excel-Tabelle habe, die verschiedene Eingabe(Listen)felder hat, insgesamt 11 Stück.
Bei der Arbeit mit der Tabelle kann es vorkommen, dass nur das erste Einga...
26.05.2015 21:31:02
Thread-ID: 1427868
8 Beiträge
VBA: Verweis auf unben. Worksheets, Datei geschl.
Daniel

Hallo werte Community,
In meiner Not muss ich aufgrund mangelnder VBA-Erfahrung leider um eure Hilfe bitten:
Ich schreibe momentan meine Bachelorthesis und stehe dabei vor folgendem Problem. Für eine Altdatenanalyse würde ich gerne aus verschiedenen Excel-Dateien, die sich alle in einem...
25.07.2016 13:20:26
Thread-ID: 1506122
7 Beiträge
VBA Button für mehrere Worksheets benutzen
Christian

Hallo zusammen,
ich habe einen Button programmiert, diesen nutze ich in einem Workbook in ca. 10 Worksheets. Nun möchte ich diesen einmal zentral haben, so das alle Worksheets darauf zugreifen, um Änderungen nur einmal durchführen zu müssen und nichts zu vergessen.
kann mir jemand helfe...
05.09.2019 20:52:20
Thread-ID: 1711464
4 Beiträge
VBA Worksheets
Wolfgang

Hallo,
meine ersten Schritte in VBA! Ufff !!
Habe mein erstes Mini-Makro (MsgBox mit anschließender Verknüpfung nach Rückmeldung aus der MsgBox) geschrieben. Funktioniert :-)
Jetzt zu meiner Frage:
Innerhalb der Arbeitsmappe, bestehend aus 3 Tabellenblättern möchte ich das Makro an...
28.01.2003 11:26:28
Thread-ID: 209980
5 Beiträge
For Each Worksheet
Andreas

Hallo,ich grübel jetzt schon sehr lange an folgendem code:Sub Gesamt()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Sheets
If Left(ActiveSheet.Name, 9) = "Baugruppe" Then
Range("L65000").End(xlUp).Copy
Sheets("Zwischenablage").Select
Range("A65000").End(xlUp).Offset(1,...
22.04.2003 17:18:57
Thread-ID: 247743
5 Beiträge

Beliebteste Forumthreads (12 Monate)

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