Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1224to1228
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
1224to1228
1224to1228
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA - Makro-Button steuert falsche Datei an

VBA - Makro-Button steuert falsche Datei an
Sven
Guten Morgen!
Auf der Suche nach VBA-Lösungen bin ich schon oft hier auf der Seite gelandet. Diesmal bin ich aber leider nicht fündig geworden - deshalb brauch ich euere Hilfe! :-)
Und zwar schreibe ich ein Makro per Makro von Datei1.xls in Datei2.xls
Ziel = Datei2.xls
With Workbooks(Ziel).VBProject.VBComponents("Tabelle2").CodeModule
.InsertLines x + 1,
...usw...
Das funktioniert auch einwandfrei.
Nun erstellt das Makro der Datei1 auch einen Button in Datei2, damit der User das soeben erstellte Makro in seiner Datei2 einfach nutzen kann.
Und hier beginnt das Problem.
Ich erstellte den Button mit
    With Workbooks(Ziel).Worksheets("TabellenblattX").Shapes
Set Button = .AddTextbox(msoTextOrientationHorizontal, _
1076.25, 0, 35, 15)
End With
Button.Name = "Button1"
Button.OnAction = "Makroname"
...usw...
Ich weiß, es ist nicht der bestausehendste Weg für einen Button, aber es funktioniert gut - eigentlich!
Und zwar verlinkt er nicht einfach das Makro in der Datei2.xls, in der ich das Makro und den Button reinschreibe. Sondern verlinkt die Ursprungsdatei - macht also automatisch 'Datei1.xls'!Makroname.
Ich hab bei Button.OnAction schon versucht, Excel mit Klartext 'Datei2.xls'!Makronameoder Variablen "auszutricksen" - aber das geht irgendwie nicht :-)
Vielleicht ist die Lösung ja total trivial und ich komm nich drauf...
Danke schonmal im Vorraus!!
Grüße
Sven
AW: VBA - Makro-Button steuert falsche Datei an
10.08.2011 12:06:57
Sven
Update
zur Verdeutlichung meiner Fragestellung:
Ich will, dass er mit .onAction = "Makroname" auch das Makro in der Datei ansteuert, in der dieser Button ist/erstellt wurde!
Momentan verknüpft er es leider immer automatisch mit der Datei, von der aus der Button erstellt wurde.
Grüße!
AW: VBA - Makro-Button steuert falsche Datei an
10.08.2011 12:08:58
fcs
Hallo Sven,
du speicherst den Code in der Ziel-Datei in einem Tabellenmodul. Dann darf die Prozedur nicht als Private Sub definiert sein und im String für "OnAction" muss der CodeName des Tabellenblatts & "." & "Makroname" angegeben werden.
Sieht dann etwa wie folgt aus.
Gruß
Franz 
Sub aaTestModulCopy()
Dim Ziel As String, x As Long, CodeText As String, Button As Shape
Ziel = "DateiZiel.xls"
CodeText = "Sub MakroName()"
CodeText = CodeText & vbCr & "    MsgBox ""TestMakroCopy"""
CodeText = CodeText & vbCr & "End Sub"
With Workbooks(Ziel).VBProject.VBComponents("Tabelle2").CodeModule
x = .CountOfLines
.InsertLines x + 1, CodeText
End With
With Workbooks(Ziel).Worksheets("TabellenblattX").Shapes
Set Button = .AddTextbox(msoTextOrientationHorizontal, _
1076.25, 0, 35, 15)
End With
Button.Name = "Button1"
Button.OnAction = Workbooks(Ziel).Worksheets("Tabelle2").CodeName & "." & "Makroname"
End Sub

Anzeige
AW: VBA - Makro-Button steuert falsche Datei an
10.08.2011 13:21:07
Sven
Danke für die Mühen, Franz!
Er verlinkt dann aber immer noch automatisch auf die Quelldatei Datei1.xls
'Datei1.xls'!Tabelle2.Makroname FALSCH :-)
statt einfach nur
Tabelle2.Makroname oder 'Datei2.xls'!Tabelle2.Makroname
Ich hab ne ganz verrückte Idee ;-)
Ich schreib den Code zur Button-Erstellung per Makro in die Zieldatei Datei2.xls und ruf diesen dann mit Application.Run Ziel & "!SabinesMakro" auf.
Klingt zwar Abenteuerlich - sollte aber garnicht mal Fehleranfälliger sein... und vielleicht funktioniert's dann so, wie ich es will.
Anzeige
AW: VBA - Makro-Button steuert falsche Datei an
10.08.2011 13:23:29
Sven
selbstverständlich meine ich nicht "SabinesMakro" ...ich hab mir das nur mal eben ausm Netz kopiert, weil ich wissen wollte, wie man externe Makros aufruft :)
AW: VBA - Makro-Button steuert falsche Datei an
10.08.2011 14:10:49
fcs
Hallo Sven,
ich kann deine Probleme nicht nachvollziehen. Ich hab deine Code-Brocken nachgebaut und vervollständigt.
Die Zuweisung des Makros funktioniert funktioniert bei mir unter Excel 2007 einwandfrei.
Auch die Modifikation inklusive Dateiname der Zieldatei klappt. 
  Button.OnAction = "'" & Ziel & "'!" & Workbooks(Ziel).Worksheets("Tabelle2").CodeName _
& "." & "Makroname"

Wenn du deine Idee mit "Run" eines Makros in einer externen Datei umsetzt, dann wird diese Externe Datei auch bei jedem Makrostart geöffnet.
Warum erstelltst du nicht einfach eine Excel-Vorlage-Datei in der alles Notwendige an Makros und Schaltflächen vorhanden ist. Denn auf anderen Rechnern/Excelinstallationen wird das Ganze nur Funktionieren, wenn der Zugriff auf das VBA-Projekt unter den Makrosicherheitseinstellungen erlaubt wird. Damit dürfte bei vielen kommerziellen Anwendern gegen Sicherheitsleitlinien verstoßen werden.
Gruß
Franz
Anzeige
AW: VBA - Makro-Button steuert falsche Datei an
10.08.2011 14:50:04
Sven
Ich glaub so ähnlich, wie du es meinst, hab ich es:
Ich hab eine "Extra-Datei", in der das Makro gespeichert ist und in der man Quell- und Ziel-Datei eingibt - und das ganze dann per Button startet. So, dass es jeder User einfach nutzen kann...
Das führt dann einen Abgleich der beiden Dateien durch - muss aber auch in die Ziel-Datei ein Makro samt Button schreiben. Und hier hatte ich ja das Problem mit der Button-Verknüpfung.
Es funktioniert, in dem ich das Button-Erstell-Makro zuerst in die Zieldatei schreibe und dann aus meiner "Extra-Datei" (Anfangsdatei) ausführe!
Der "run"-Befehl für das externe Makro (was in die Ziel-Datei geschrieben wurde) befindet sich innerhalb des "Extra-Datei"-Subs, nicht in der Ziel-Datei. Es soll ja nur einmal zur Button-Erstellung ausgeführt werden.
Hab es auch schon auf anderen Rechnern hier probiert.
(Ich hoffe das war verständlich :-))
Der Lösungsansatz von dir "klingt" zwar auch richtig - aber hier auf Excel2003 scheint es nicht zu funktionieren.
In ein paar Wochen soll alles auf Windows7 und Office2010 umgestellt werden. Da bin ich ja mal gespannt, ob mein Lösungsansatz noch läuft.
Danke dir nochmal!!
Anzeige

301 Forumthreads zu ähnlichen Themen

Suchfunktion - TextBox kein Text sondern Datum
Frank

Hallo Liebe Excelgemeinde!!!
In einer UserForm befindet sich folgender Code um bestimmte Einträge zu suchen. Da in der TextBox1 aber kein Text sondern ein Datum steht funktioniert dies nicht, da kommt die Meldung " Suchbegriff wurde nicht gefunden".
Was muss ich ändern, damit auch nach...
21.08.2008 15:35:00
Thread-ID: 1003541
4 Beiträge
Anzeige
Markierte Zellen: Text in Datum umwandeln
Peter

Guten Tag
Mit nachfolgendem Code wandle ich einen Textstring in ein Datum um. Komisch ist, dass ich die Schleife zweimal hintereinander laufen lassen muss. Nach dem ersten Mal wird das Datum mit "d/m/yy" und erst das zweite Mal im gewünschten Format "dd.mm.yy" angezeigt.
Was muss ich än...
15.09.2008 11:41:00
Thread-ID: 1009737
6 Beiträge
Datum als Text kopieren
Thomas3

Hallo zusammen,
ich habe folgendes Problem.
Aus einer Datei werden aus einer Spalte das Tagesdatum in eine andere Datei kopiert.
Das ist kein Problem.
Aus der zweiten Datei werden dann mittels Serienbrief diese Daten ausgelesen.
Und nun beginnt das Problem.
Das Datum ko...
16.09.2008 18:22:00
Thread-ID: 1010173
4 Beiträge
Anzeige
Datumseingabe in textbox
Winfried

Guten Tag
was muss ich in einer Textbox für einen Eintrag vornehmen
das in dieser immer das aktuelle Datum angezeigt wird.
Leider bin ich in VBA noch nicht so fit.
Über eine Hilfe von einem Profi würde ich mich sehr freuen.
Gruss
Winfried
05.11.2008 12:39:45
Thread-ID: 1021858
5 Beiträge
Umwandeln in Zahlen mit VBA
Bernhard

Hallo liebe Excel-Experten,
heute brauche ich Eure Hilfe für folgendes Problem: Ich importiere Daten aus einer anderen Anwendung nach Excel und ich bekomme die Zahlen als Text formartiert. Die Zahlen sehen z.B. wie folgt aus: 4.75m, was als Zahl 4750000 entspricht. Ist es mit einem VBA-Code...
25.11.2008 13:46:12
Thread-ID: 1027705
4 Beiträge
Text in Zahlen umwandeln
u_hoernchen

Ich habe eine Spalte in Excel, in der vereinzelt Zellen sind, in denen Zahlen als Text formatiert sind. Da ich diese Zahlen für die weitere Verwendung als Werte haben muss und ich das dann relativ oft umfrickeln muss (ist leider ein Download aus einem Vorprogramm), frage ich mich, ob es ggf. ei...
26.11.2008 11:09:00
Thread-ID: 1027963
4 Beiträge
Datum in Zahl umwandeln
P.Mackes

Hallo,
was ich machen möchte ist folgendes:
ich habe eine Zahl, die ein Datum darstellt, z.B. 20080507. Dabei handelt es sich NICHT um ein Datumsformat, sondern um eine richtige Zahl. Jetzt muss ich davon allerdings 90 Tage abziehen. Also wandle ich mit Date(left...mid...right) das gan...
27.11.2008 00:37:57
Thread-ID: 1028186
3 Beiträge
Datumswerte in Spalte richtig umwandeln
chris

Hallo zusammen,
ich habe ein Problem und würde ecuh um Hilfe bitten.
ich habe eine Exceldatei.in dieser habe ich eine Spalte in dieser stehen Datumswerte.
Nur das Problem ist manche zellen sind nicht als Datum formatiert das merke ich z.b wenn ich den Autofilre verwende sind die Dat...
02.12.2008 11:57:00
Thread-ID: 1029457
6 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox

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
3
16
5
3
6
4
3
3
2
5
10
4
2
4
6
2
4
3
3
3
2
14
3
1
6