Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
17.04.2024 16:56:58
Stunden addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
856to860
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
856to860
856to860
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro aus einer anderen Datei starten

Makro aus einer anderen Datei starten
21.03.2007 22:23:46
Peter
Hallo,
folgendes Problem ich habe ca. 200 Dateien mit sehr verschiedenen Namen in einem Ordner. In diesen Dateien gibt es ein Makro, mit dem ich eine Range von Zellen in eine andere Datei ("Analyse Input") exportiere. Gibt es eine Möglichkeit, dieses Makro nacheinander in allen Dateien starten zu lassen, so daß ich nicht 200 Dateien öffnen muß, um von dort aus das Makro laufen zu lassen?
Das Makro ist übrigens nicht in einem Modul, sondern direkt in einem Tabellennlatt hinterlegt (Tabelle12) (und wird über CommandButton2_Click gestartet).
Soweit mein Problem. Ich hoffe sehr, daß mir jemand helfen kann.
Grüße,
Peter

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

Betreff
Datum
Anwender
Anzeige
AW: Makro aus einer anderen Datei starten
21.03.2007 22:34:21
Josef
Hallo Peter,
um ein Makro in einer Datei auszuführen, muss diese geöffnet sein!
Gruß Sepp
AW: Makro aus einer anderen Datei starten
21.03.2007 23:13:15
Peter
Ja, das ist mir klar. ABer gibt es nicht die Möglichkeit mit einer Schleife, die Dateien zu öffnen das Makro auszuführen und dann wieder zu schließen?
Grüße
Peter
AW: Makro aus einer anderen Datei starten
21.03.2007 23:34:00
Josef
Hallo Peter,
na dann probier mal.
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Sub RunMakroInFiles()
Dim objFS As FileSearch
Dim objWb As Workbook
Dim strPath As String, strM As String
Dim intIndex As Integer

strPath = "F:\Temp" 'Verzeichnis anpassen

On Error GoTo ErrExit
GMS

Set objFS = Application.FileSearch

With objFS
    .NewSearch
    .LookIn = strPath
    .FileType = msoFileTypeExcelWorkbooks
    .SearchSubFolders = False 'Unterordner durchsuchen True/False
    
    If .Execute > 0 Then
        
        For intIndex = 1 To .FoundFiles.Count
            
            Set objWb = Workbooks.Open(.FoundFiles(intIndex))
            
            strM = Dir(.FoundFiles(intIndex))
            
            On Error Resume Next
            Application.Run strM & "!Tabelle12.CommandButton2_Click"
            On Error GoTo ErrExit
            
            objWb.Close True
            
            Set objWb = Nothing
            
        Next
        
    End If
    
End With

ErrExit:

Set objWb = Nothing
Set objFS = Nothing
GMS True

End Sub

Sub GMS(Optional ByVal Modus As Boolean = False)

With Application
    .ScreenUpdating = Modus
    .EnableEvents = Modus
    .DisplayAlerts = Modus
    .EnableCancelKey = IIf(Modus, 1, 0)
    .Calculation = IIf(Modus, -4105, -4135)
    .Cursor = IIf(Modus, -4143, 2)
End With

End Sub

Gruß Sepp
Anzeige
AW: Makro aus einer anderen Datei starten
22.03.2007 09:00:00
Peter
Vielen Dank für die Antwort. Aus einem mir nicht verständlichem Grund funktioniert es aber leider nicht. Irgendwie wird wohl das Makro überhaupt gestartet. Trotzdem vielen Dank. Deine Antworten haben mir sehr geholfen.
Grüße,
Peter
AW: Makro aus einer anderen Datei starten
22.03.2007 20:49:02
Josef
Hallo Peter,
du willst aufgeben?
Ändere mal die Zeile 

On Error Resume Next

ab in 

On Error Goto 0
und schau mal was der Debuger meckert.
Wahrscheinlich ist es nur eine Kleinigkeit.
Gruß Sepp
Anzeige

307 Forumthreads zu ähnlichen Themen

Makro, Verweis auf andere xls Dateien
Diego

Guten Morgen an alle,
ich hätte ein kleines oder großes oder kleines Problem, weiss ich leider nicht so genau, da ich mich nicht so gut auskenne in Excel oder VBA =(
Also mal zu meinem Problemchen, ich hoff einfach mal ihr könnt euch unter meiner Beschreibung etwas vorstellen und mir da...
13.02.2009 09:21:00
Thread-ID: 1050345
6 Beiträge
Anzeige
Call Makro aus anderer Datei
Hans

Hallo, wie kann man ein Marko das in einer anderen Datei ist ausführen?
Wenn ich per VBA in der Datei Test.xls "Call Marko1" (in der der Datei Daten.xls) ausführe kommt die Fehlermeldung
Fehler beim Kompelieren:
Sub oder Funktion nicht definiert.
Kann mit ja jemand weiterhelfe...
23.02.2010 14:28:33
Thread-ID: 1140705
2 Beiträge
Makro auf Dateien anwenden über Dialog
Bernd

Hallo,
ich würde gerne ein bestimmtes Makro auf mehrere Dateien nacheinander anwenden und diese Dateien dann am Ende wieder schließend.
Folgende Schritte sollten abgearbeitet werden:
1.
Ich öffne über eine Art Menüdialog ein Verzeichnis,
2.
Dort kann ich entweder das ge...
28.09.2010 09:45:44
Thread-ID: 1179619
9 Beiträge
Anzeige
Makro in anderer Datei starten
Andrea

Hallo zusammen
In eurer Sammlung hat es diverse Beiträge zu obigem Thema. Wie kann ich aber ein Makro in einer anderen Datei starten, wenn die Datei mittels Parametern mitgegeben wird und das Makro (Daten_speichern) in der aufzurufenden Datei ist? Ich habe in einem Excel-Blatt diverse Pfad&...
28.04.2011 09:22:56
Thread-ID: 1212125
3 Beiträge
Makro Starten aus anderer Datei
Leitz

Hallo!
Habe ein Problem und im Archiv nichts gefunden!
Ich öffne in einem Makro eine zweite Excel Datei und ich möchte gerne ein Makro aus dieser zweiten Datei automatisch aus der ersten Datei starten.
Bitte um Hilfe
Gruß
Leitz G.
25.05.2011 14:09:07
Thread-ID: 1215972
6 Beiträge
Makro in anderer Datei starten
C

Hallo,
ich habe folgendes Problem:
Mit: Application.Run sWbname & "!Drucken" möchte ich das "drucken-Makro" in der Mappe sWbname starten.
Wenn die Mappe Test1 oder Test_1 heißt, klappt das, was muss ich aber machen, damit es auch mit Test-1 klappt?
Vielen Dank
Gruß
18.08.2011 21:42:56
Thread-ID: 1226673
2 Beiträge
Makro aus einer anderen Datei starten
Falo

Hallo zusammen, kann mir einer bei meinem Problem helfen.
ich lese den pfad der Datei aus, der Tab. System A5 aus. Und möchte das Macro(Berechnen)ausführen, kann mir einer einen Tipp geben.
Mit freundlichen Grüßen aus dem Sauerland.
Olaf
Private Sub DateiÖffnenP1_Click() Dim Pfa...
06.10.2014 01:36:45
Thread-ID: 1384979
4 Beiträge
Makro aus anderer Datei öffnen
weber

Hallo
Ich bin mit folgendem Problem am verzweifeln.
Ich habe eine Datei mit mehreren Makro geschrieben (Name: Bericht.xlsm).
Diese Makro funktionieren alle einwandfrei.
Wenn ich über eine andere Datei (Name: start.xlsm) diese Makro ausführe, funktioniert es auch einwandfrei.
...
08.02.2016 21:19:46
Thread-ID: 1474189
2 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton

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
5
4
1
8
6
2
5
1
3
1
4
2
2
8
1
3
8
1
1
3
2
5
1
3
1