Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 09:22:48
VBA Filter in intelligenter Tabelle funktioniert nicht
18.04.2024 08:54:52
automatisches übertragen von Daten
18.04.2024 08:16:13
Dynamische Positionsnummerierung
18.04.2024 08:15:33
Seitwärts scrollen - Fenster fixiert
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1412to1416
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
1412to1416
1412to1416
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Sub aus Privater Sub heraus aufrufen

Sub aus Privater Sub heraus aufrufen
11.03.2015 15:27:14
Michael
Hallo Ihr,
versuch mich schon mehrere Stunden mittels vermeindlich richtiger Formulierungen im Netz durchzuhangeln, jedoch ohne Erfolg.
Habe in Personal.xlsb ein Modul mit Namen TG_Auswertung, darin enthalten 2 Sub's.
Davon soll die Zweite aufgerufen werden.
Dies soll aus einem anderen Projekt aus einem Tabellenblatt aus Private Sub WB_change heraus aufgerufen werden.
Scheint an der Referenzierung zu liegen, da bei manchen Versuchen der Fehler "Keine SUB / FUNC vorhanden" oder auch "Variable nicht definiert" erscheint.
Bitte um Hilfe
Danke Vorab Michael

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Sub aus Privater Sub heraus aufrufen
11.03.2015 15:37:33
Nepumuk
Hallo,
dazu musst du die Methode Application.Run benutzen.
Gruß
Nepumuk

AW: Sub aus Privater Sub heraus aufrufen
11.03.2015 18:41:19
Michael
Hallo Nepomuk,
hat ich auch schon versucht.
Aus dem Modul heraus, bilde ich neue Tabellenblätter und eines davon bekommt durch Makro per Makro ... .InsertLines x + 2, "Application run("modulname.subname")" eine WB_change Methode.
Jedoch mit Gänsefüßchen zeigt er die Zeile in rot und ohne funzt es auch nicht.

AW: Sub aus Privater Sub heraus aufrufen
11.03.2015 19:23:58
Nepumuk
Hallo,
da fehlt vor allen Dingen der Mappenname. Also:
Application.Run "MappeMitMakro.xlsb!Modulname.MakroName"
Gruß
Nepumuk

Anzeige
AW: Sub aus Privater Sub heraus aufrufen
11.03.2015 20:06:08
Michael
Sorry, natürlich Nep -u- muk!
Ist dann Personal.xlsb der Mappenname?
Denn ein Tabellenblatt hab ich ja nicht, da ich ja direkt aus Personal.xlsb starte.

AW: Sub aus Privater Sub heraus aufrufen
11.03.2015 20:54:50
Nepumuk
Hallo,
das ist doch nur als Beispiel gedacht. Die richtigen Namen darfst du selber einsetzen.
Gruß
Nepumk

AW: Sub aus Privater Sub heraus aufrufen
12.03.2015 07:06:34
Michael
Guten Morgen,
konkret geht es darum,
habe folgenden Code, welcher mir einen Code in ein anderes Projekt in TabellenBlatt einfügt:
With Workbooks(wbName).VBProject.VBComponents("Tabelle3").CodeModule
x = .CreateEventProc("Change", "Worksheet")
.InsertLines x + 1, "Dim x As Integer"
.InsertLines x + 2, "Dim Scan As Variant"
.InsertLines x + 3, "cells(1,1).Font.ColorIndex = 2"
.InsertLines x + 4, "Scan = ActiveSheet.UsedRange"
.InsertLines x + 5, "cells(1,1).Activate"
.InsertLines x + 6, "application.run "PERSONAL.XLSB!ScanDaten_verarbeiten"" 'HIER GIBTS PROBLEME
End With
With Application.VBE.MainWindow 'VBA Editor zumachen
.SetFocus
.Visible = False
End With
In o.g. Zeile lässt er mir keine Variante zu.
Vielleicht kann mir jemand den Ausdruck richtig nennen !?
Projektname des Makros: Personal.xlsb
Modulname: TG_Auswertung
Makroname: ScanDaten_verarbeiten
Schönen Tag Michael

Anzeige
AW: Sub aus Privater Sub heraus aufrufen
12.03.2015 08:30:39
Nepumuk
Hallo,
einfach so:
"Application.Run ""PERSONAL.XLSB!ScanDaten_verarbeiten"""

Gruß
Nepumuk

AW: Sub aus Privater Sub heraus aufrufen
12.03.2015 11:53:35
Michael
Hat sich durch Zufall gelöst und ein Gänsefüßchenpaar zuviel (dachte ich) gemacht.
.InsertLines x + 6, "Application.run ""PERSONAL.XLSB!ScanDaten_verarbeiten""" musste in Doppel-Gänsefüßchen gesetzt werden, damit wenn es in der Tabelle geschrieben wurde auch richtig geschrieben steht.
Vielleicht hilft es dem Nächsten
Danke nochmals bis dann
Michael

112 Forumthreads zu ähnlichen Themen

VBA: Sub in anderem Workbook aufrufen
Peter/Berlin

Hi VBA-Könner/Kenner,
vielleicht bekomme ich bei Euch die nötige Anregung zu folg. Problem:
Im Arbeitsspeicher geöffnet sind die Workbooks "A" und "B".
Von "A" aus soll eine Sub xyz in "B" aufgerufen werden (Call xyz).
Es erscheint der Fehler: Sub nicht definiert oder ähnlich...
02.04.2009 13:20:17
Thread-ID: 1066313
2 Beiträge
Anzeige
VBA : Aufruf Sub2() innerhalb eines Sub1()
Hajo
Hallo Andreas
Gruß Hajo
16.04.2002 21:49:31
Thread-ID: 113895
2 Beiträge
Sub als Parameter einer Sub
wsp

Hallo Excel-Gemeinde,
ich stehe vor folgendem Problem:
ich habe eine SUB, die den Ablauf eines Vorganges steuert. Nun möchte in dieser Sub
situationsabhängig weitere SUB's/Function's aufrufen. Gibt es eine Möglichkeit, die SUB/Function als
Parameter der steuernden SUB zu über...
21.04.2010 11:13:17
Thread-ID: 1153067
5 Beiträge
Anzeige
VBA Private Sub Workbook_Open() optimieren
Matz

Hallo zusammen
ich habe mir hier im Forum aus mehreren VBA Fragementen etwas zusammengebastelt.
Es funktioniert zwar, ich bin mir aber sicher, dass das ganze nicht optimal gebaut ist:
Option Explicit
Private Sub Workbook_Open() Application.ScreenUpdating = False Application.Cal...
14.09.2011 16:04:15
Thread-ID: 1229860
3 Beiträge
VBA Editor nur ein Sub im Fenster anzeigen
Patrick

Hallo,
Ich bin wohl ausversehn auf irgendeine Taste/Tastenkombination gekommen, mit der man sich im Codefenster nur ein(e) Sub/Funktion/Declaration anzeigen lassen kann.
Dadurch ist der Scrollbalken auch nicht so lang und alles ist viel übersichtlicher.
Da ich pro Modul immer mehrer...
31.01.2012 14:15:45
Thread-ID: 1248648
3 Beiträge
Grundlagen Frage - Viele Subs, eine Sub
Malte

Hallo,
kann man eine Grundaussage dazu treffen, ob es besser ist viele kleine Subs zu schreiben und diese nacheinander aufzurufen, oder ist es besser, alles in eine große Sub zu schreiben?
Danke!
Gruß!
03.04.2012 11:24:00
Thread-ID: 1257636
3 Beiträge
VBA Subroutine überspringen
MCO

Guten Morgen!
Irgendwo hab ich mal gelesen, dass man Subroutinen im VBA-Code zum debuggen überspringen könnte.
Wiedergefunden habe ich, dass man die Tastenkombination UMSCH+F8 nehmen kann.
Ich habe aber im Sinn, dass man auch die Zeile zum Aufruf der Subroutine irgendwie kennzeichne...
25.07.2014 08:34:24
Thread-ID: 1372242
5 Beiträge
VBA Gruppierung eingefügt - Subscript out of range
Monika

Hallo zusammen,
ich bin gerade etwas irritiert, vielleicht könnt ihr etwas Licht ins Dunkel bringen:
Ich habe ein Makro, was komplett funktioniert, sobald ich aber die Zeile
Worksheets("XXX").Columns("M:W").Group
einfüge, bekomme ich die Fehlermeldung "Subscript out of range".....
04.12.2014 08:47:36
Thread-ID: 1396051
2 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
1
4
9
2
2
2
4
1
5
7
3
3
2
6
3
10
9
1
1
4
4
1
5