Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Private Sub/Function via Button ohne Code aufrufen
zurück: UFO wird doppelt angezeigt weiter: Datenblatt mit 2 Ufos Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Insanctus
VBA-Programmierer


Verfasst am:
09. Sep 2010, 15:35
Rufname:

Private Sub/Function via Button ohne Code aufrufen - Private Sub/Function via Button ohne Code aufrufen

Nach oben
       Version: Office 2007

Gruß an die Experten Smile

Ich habe mal wieder ein kleines Problem ...
Gibt es die Möglichkeit, einen Button in einem Formular zu erzeugen, der private subs oder funktionen des selben Formulars aufruft?

Einzige Limitierung: Es darf nicht über eine Ereignisprozedur (also VBA-Code) erfolgen.

Ich kann einem Button-Ereignis ja eine public Function, oder ein Makro hinterlegen. Beispielhaft könnte ich beim "Klicken"-Ereignis den Text "=Funktion1(Parameter1,Parameter2)" hinterlegen, um die Funktion "Funktion1" mit den Parametern "Parameter1" und "Parameter2" aufzurufen. Nun frage ich mich, ob das auch mit Private Subs und Funktionen des dem Button zugehörigen Formulars möglich ist. Vielleicht stelle ich mich ja auch nur zu doof an. Aber mit "=Subname()" oder nur "Subname()" geht es nicht Sad

Hat jemand eine Idee?
KlausMz
Moderator Access


Verfasst am:
09. Sep 2010, 15:53
Rufname:
Wohnort: Irgendwo in der Pfalz


AW: Private Sub/Function via Button ohne Code aufrufen - AW: Private Sub/Function via Button ohne Code aufrufen

Nach oben
       Version: Office 2007

Hallo,
das sollte gehen.
Code:
Public Function TextAusgeben(strAusgabe As String)
    MsgBox strAusgabe
End Function
Aufruf im Ereignis "Beim Klicken":
Code:
=TextAusgeben("Meier")
Gibt nach Klick auf den Button den Text "Meier" aus.
_________________
Gruß
Klaus . . . . . Feedback wäre wünschenswert.
Ich möchte bitte keine unaufgeforderten PN. Fragen bitte im Forum.
Insanctus
VBA-Programmierer


Verfasst am:
09. Sep 2010, 16:49
Rufname:

AW: Private Sub/Function via Button ohne Code aufrufen - AW: Private Sub/Function via Button ohne Code aufrufen

Nach oben
       Version: Office 2007

Hallo Klaus,

ich hatte mich auf private bezogen, nicht auf public Smile Geht es auch mit private?
MissPh!
Office-VBA-Programmiererin


Verfasst am:
10. Sep 2010, 10:43
Rufname:
Wohnort: NRW

AW: Private Sub/Function via Button ohne Code aufrufen - AW: Private Sub/Function via Button ohne Code aufrufen

Nach oben
       Version: Office 2007

Hallo,

1. es muss eine Function sein
2. sie muss in einem allgemeinen Modul stehen und darf nicht als Private deklariert sein

_________________
Gruß MissPh!
Insanctus
VBA-Programmierer


Verfasst am:
10. Sep 2010, 14:21
Rufname:


AW: Private Sub/Function via Button ohne Code aufrufen - AW: Private Sub/Function via Button ohne Code aufrufen

Nach oben
       Version: Office 2007

das habe ich befürchtet, bedauerlich ... und es gibt keine methode, das auszutricksen?

Ziel ist es, das ButtonClick-Event eines anderen Buttons aufzurufen, der sich auf dem selben Formular befindet. Da ich das ganze über eine custom Commandbar bewerkstellige, kann ich nicht wirklich Code hinter den Button hinterlegen. Die Commandbar wird dann bei Rechtsklick auf eine Listbox eingeblendet.
Willi Wipp
Moderator


Verfasst am:
11. Sep 2010, 14:14
Rufname:
Wohnort: Raum Wiesbaden

Re: Private Sub/Function via Button ohne Code aufrufen - Re: Private Sub/Function via Button ohne Code aufrufen

Nach oben
       Version: Office 2007

Hi Insanctus,

es geht nur mit einer Funktion!
Wenn sich der Code im aktuellen Klassenmodul (Formular) befindet, dann sogar mit Private!
Code:
=FnTest()
Code:
Option Compare Database
Option Explicit

Private Function FnTest()
    MsgBox "geht doch"
End Function

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
MissPh!
Office-VBA-Programmiererin


Verfasst am:
11. Sep 2010, 20:22
Rufname:
Wohnort: NRW

AW: Private Sub/Function via Button ohne Code aufrufen - AW: Private Sub/Function via Button ohne Code aufrufen

Nach oben
       Version: Office 2007

Bist du sicher, Willi?
So wie ich das verstanden habe, ist hier die Rede von einem Funktionsaufruf via Kontext-Menü...

_________________
Gruß MissPh!
Willi Wipp
Moderator


Verfasst am:
12. Sep 2010, 13:08
Rufname:
Wohnort: Raum Wiesbaden

Re: Private Sub/Function via Button ohne Code aufrufen (II) - Re: Private Sub/Function via Button ohne Code aufrufen (II)

Nach oben
       Version: Office 2007

@MissPh!,

das geht dann allerdings vermutlich wirklich nur mit als Public deklarierten.
Ich bezog mich auf
Zitat:
... ob das auch mit Private Subs und Funktionen des dem Button zugehörigen Formulars möglich ist.

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Insanctus
VBA-Programmierer


Verfasst am:
13. Sep 2010, 08:43
Rufname:


AW: Private Sub/Function via Button ohne Code aufrufen - AW: Private Sub/Function via Button ohne Code aufrufen

Nach oben
       Version: Office 2007

Es geht um eine Commandbar:
Code:
Set cmdBar = CommandBars.Add("mnuBar_" & txtForm & "_" & txtControl, msoBarPopup, , True)

diese hängt als ShortcutMenuBar an einer Listbox:
Code:
Forms(txtForm).Controls(txtControl).ShortcutMenuBar = "mnuBar_" & txtForm & "_" & txtControl

Ich kann auf jeden Fall einzelne Felder des Formulars ansprechen. Das mit der Function werde ich gleich nochmal testen. Wenn das nicht funktioniert, dann kann ich die Commandbar für diese Zwecke halt nicht verwenden Sad
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Access: SQL-Anfügeabfrage via Button ausführen 10 philbo 3541 22. Jan 2009, 14:45
philbo Access: SQL-Anfügeabfrage via Button ausführen
Keine neuen Beiträge Access Tabellen & Abfragen: Kriterium per Button im Formular zur Laufzeit ändern 8 ghostX 702 28. Nov 2008, 16:47
ghostX Kriterium per Button im Formular zur Laufzeit ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Button VBA Code zum Verknüpfen aller ODBC -Tabellen 3 adamth 3953 08. Sep 2008, 13:10
rita2008 Button VBA Code zum Verknüpfen aller ODBC -Tabellen
Keine neuen Beiträge Access Tabellen & Abfragen: VBA Code zum löschen leerer Datensätze 2 adamth 1124 31. Jul 2008, 20:44
adamth VBA Code zum löschen leerer Datensätze
Keine neuen Beiträge Access Tabellen & Abfragen: Mehrere unique Pin-codes per Button erstellen lassen 0 Musi 900 21. Mai 2008, 12:26
Musi Mehrere unique Pin-codes per Button erstellen lassen
Keine neuen Beiträge Access Tabellen & Abfragen: Im Kombifeld eine andere Spalte aufrufen 4 ArtGee 280 01. Apr 2008, 21:26
ArtGee Im Kombifeld eine andere Spalte aufrufen
Keine neuen Beiträge Access Tabellen & Abfragen: altes problem: excel import via Anfügeabfrage 8 Micha85 2431 26. März 2008, 10:59
Zed2k altes problem: excel import via Anfügeabfrage
Keine neuen Beiträge Access Tabellen & Abfragen: schnelle komplexe Abfrage per Code? 4 SaschaR 586 25. März 2008, 15:57
SaschaR schnelle komplexe Abfrage per Code?
Keine neuen Beiträge Access Tabellen & Abfragen: Nach klick auf Button Wav Abspielen 1 roboterbert 3016 19. Feb 2008, 21:06
jens05 Nach klick auf Button Wav Abspielen
Keine neuen Beiträge Access Tabellen & Abfragen: Button druckt Serienbrief aus die 2. 1 dorian_fahrenheit 493 31. Jan 2007, 16:35
Willi Wipp Button druckt Serienbrief aus die 2.
Keine neuen Beiträge Access Tabellen & Abfragen: DateDiff in VBA Code berechnet liefert Nonsens 8 Utali 1324 15. Jan 2007, 17:08
Gast DateDiff in VBA Code berechnet liefert Nonsens
Keine neuen Beiträge Access Tabellen & Abfragen: Access Höhe eines Rechteck per VBA Code regulieren 2 Gast1 1835 30. Dez 2006, 16:13
Gast Access Höhe eines Rechteck per VBA Code regulieren
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: MS Frontpage