Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1372to1376
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
1372to1376
1372to1376
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Button-Click in anderem Formular auslösen

Button-Click in anderem Formular auslösen
07.08.2014 11:25:21
Jan
Guten Morgen Forum,
darf ich Euch noch einmal um Hilfe bitten?
Sämtliche Formulare meiner Mappe sind strukturgleich aufgebaut, enthalten jeweils nur andere Werte. Auf jedem Formular befindet sich ein Button, hinter dem als Clickereignis der Monatsabschluss für dieses Formular liegt. Bisher arbeite ich mich am Monatsende durch sämtliche Formulare und löse einzeln das Clickereignis aus.
Das möchte ich gerne über ein Makro vereinfachen. Da Anzahl und Namen der Formulare öfter wechseln , würde ich sie ungern im Code einzeln adressieren müssen, sondern lieber über eine For-next-Schleife alle vorhandenen abarbeiten.
Alternativ: Der Code hinter sämtlichen Buttons ist immer der gleiche. Kann man ihn evtl. in das Makro packen und ohne Buttons auf sämtliche Formulare anwenden?
Ich danke schon jetzt für Eure Unterstützung.
Gruß Jan

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Button-Click in anderem Formular auslösen
07.08.2014 12:23:47
Werner
Hallo Jan,
das sollten doch mit
Dim x as long
for x = 1 to worksheetscount
with worksheets(x)
....hier dein Code für den Abschluss
end with
next
funktionieren.
Werner

sorry, aber ...
07.08.2014 12:44:44
Rudi
Hallo,
dir fehlt ein .
for x = 1 to worksheets.count
Besser ist aber, direkt mit einem Worksheet-Objekt zu arbeiten, da VBA aus Worksheets(x) ein Worksheet-Objekt machen muss. 
Dim wks as worksheet
for each wks in worksheets
with wks
....hier dein Code für den Abschluss
end with
next

Dies zur Erweiterung deiner Kenntnisse.
Gruß
Rudi

Anzeige
AW: sorry, aber ...
07.08.2014 12:50:25
Werner
Hallo Rudi,
danke für deinen Hinweis, bin noch am Lernen.
Der Punkt ist mir abhanden gekommen weil ich mit dem Handy schreibe.
Werner

AW: Button-Click in anderem Formular auslösen
07.08.2014 15:18:20
Jan
Hallo Werner,
ich habe ein bisschen gebraucht und wollte Dich nicht sofort wieder "belästigen". Das war gut so, denn ich konnte das auftretende Problem selbst lösen.
Was in meinem Monatsabschluss passiert, ist von gewissen Feldinhalten des jeweiligen Arbeitsblattes abhängig - u. a. von dem, was in Feld H2 steht. Im bisherigen Code hinter den Buttons wird dieses Feld einfach mit > Range("H2").Value Ich habe den gesamten Code unter diesem Aspekt überarbeitet und jetzt läuft es einwandfrei.
Dim x as long
for x = 1 to worksheets.Count
with worksheets(x)
MsgBox "Feld H2 = " & Range("H2").Value 'alt
MsgBox "Feld H2 = " & worksheets(x).Range("H2").Value 'neu
end with
next
Mein Problem es damit gelöst. Ich danke Dir sehr für Deine freundliche Hilfe.
Schöne Grüße
Jan

Anzeige
AW: Button-Click in anderem Formular auslösen
07.08.2014 12:28:02
Rudi
Hallo,
Der Code hinter sämtlichen Buttons ist immer der gleiche.
dann ist es Unsinn ihn mehrfach zu schreiben.
Lagere ihn in eine Sub aus und ruf ihn per Buttonklick auf.
Kann man ihn evtl. in das Makro packen
Kann man. Wie oben.
Gruß
Rudi

AW: Button-Click in anderem Formular auslösen
07.08.2014 12:50:42
Ewald
Hallo Jan,
den Code einfach nur in eine Sub stecken dürfte nicht reichen, da mußt du schon anpassen.
ohne den Code zu kennen, kann man nichts genaues sagen, nur wenn du eine Schleife über alle Formalare laufen läßt,mußt du auch mindestens das Formular setzen.
Gruß Ewald

AW: Button-Click in anderem Formular auslösen
07.08.2014 15:41:09
Jan
Hallo Ewald, hallo Rudi,
ich sehe, dass Ihr - während ich gebastelt habe - weitere Tipps gegeben habt. Der fehlende Punkt vor dem Count war nun nicht das Problem, aber die erforderliche Anpassung des Codes. Ich bin eigentlich ganz froh, dass ich Euren Beitrag erst jetzt lese, nachdem ich es selbst herausgefunden habe. Das erwartet Ihr ja auch von uns Anfängern, dass wir uns selbst etwas Mühe geben.
Danke nochmal und schöne Grüße an dieses tolle Forum.
Jan
Anzeige

300 Forumthreads zu ähnlichen Themen

UserForm direkt aus CommandBarButton aufrufen
Andreas

Hallo Herber Fans,
eine Frage beschäftigte mich hin und wieder. Bisher hat es sich immer irgendwie ergeben, daß ich diese Konstellation umgehen konnte. Heute jedoch nicht:
Wie kann ich aus einem CommandBarButton eine UserForm direkt aufrufen?
Ein normales Makro rufe ich über:
.O...
01.10.2008 17:25:51
Thread-ID: 1013702
3 Beiträge
Anzeige
Userform Commandbutton anspringen
steffen

Hallo
ihr könnt bestimmt wieder helfen....
ich hätte gern ein NiceToHave in meine UF eingebastelt, bekomme es aber nicht mit Tabindex hin.
Beim Verlassen per Tab- oder Entertaste von Textbox1 oder Textbox2 soll stets Commandbutton1 angesprungen werden.
Gruß
Steffen
09.07.2010 10:51:16
Thread-ID: 1166297
5 Beiträge
Userform CommandButton ausblenden
lisa

Hallo zusammen, ich bräuchte bitte eure Hilfe!
Folgendes Problem:
In meiner Userform2 habe ich einen CommandButton1 mit dem ich die Userform1 starte!
Nun möchte ich aber beim starten der Userform1 gern den CommandButton1 auf der Userform1 ausblenden!
Ich habe mir das so gedacht,...
19.05.2011 09:09:39
Thread-ID: 1215105
9 Beiträge
Anzeige
UserForm: CommandButtons mit Caption ausblenden
Sebastian

Hallo zusammen,
ich habe mal wieder "so ein Problem"... :-)
Ich möchte in einem alle Commandbuttons mit enem bestimmten Text in der Caption ausblenden.
so ähnlich wie
Dim tb As Object
For Each tb In UserForm_EingabeALLE.Controls
If TypeName(tb) = "CommandButton" Then tb...
13.09.2012 19:52:21
Thread-ID: 1278539
6 Beiträge
Userform über commandbutton starten, aber nur wenn
p5

hi,
ich brauche eine lösung zu meinem problem. ich möchte eine userform über einen commandbutton starten, aber nur wenn in der zelle d9 ein bestimmter text steht. dieser text ist zum beispiel "sail 10" oder "sail 12" usw. sonst soll der commandbutton versteckt sein. bei excel kann man ja üb...
18.12.2012 10:54:36
Thread-ID: 1291345
4 Beiträge
Private Sub CommandButton1_Click() automatisch
Heinz

Hallo Leute im Forum
Ich habe ein langes Makro das ich im Sheets "Artikel" mit
Private Sub CommandButton1_Click() aufrufe.
Nun möchte ich,wenn ich das Makro das erste mal aufrufe und das ganze makro durlaufen ist,das am Ende automatisch wieder Private Sub CommandButton1_Click()
04.11.2013 10:11:29
Thread-ID: 1337011
5 Beiträge
Excel VBA Button Click hilfe :(
Damien

Hallo,
ich versuche per VBA Makro auf diesen Knopf zu drücken:

Einloggen

button type="submit" class="yui3-button yui3-u" Einloggen /button
Kann mir einer ein Codeschnipsel dafür posten?
Danke...
14.11.2013 09:10:33
Thread-ID: 1338488
6 Beiträge
VBA Code per Button/userform bearbeiten
Markus

Hallo Forengemeinde und Excelspezialisten....
Ich sitze schon den ganzen Tag an meinem neuen Projekt und weiß nicht mehr weiter... :(
Ich habe eine Exceltabelle geschrieben, zum erfassen und versenden von Stückzahlen... Dort habe ich einen Button eingefügt, der bestimmte Bereiche der...
01.04.2014 19:37:38
Thread-ID: 1355742
5 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
2
2
4
8
3
5
3
4
5
4
9
2
3
2
4
2
2
2
11
6
5
1
8
1
19