Forum des VBA-Tutorials

Mehrere Buttons zuteilen? (Access)

54654n6456n @, Montag, 08. Mai 2017, 18:07 (vor 200 Tagen)

Guten Tag, ich habe ein Formular mit buttons erstellt.
Da dies mit mehreren Seiten unterteilt ist und über 200 Buttons beinhaltet, wäre es ein riesen aufwand jeden button folgender funktion zuzuweisen, gibt es eine Möglichkeit das Script besser anzupassen?
Beispielscript:


Private Sub Button1_Click()
DoCmd.OpenForm "Datenblatt", , ,"Adresse = 'A1'"
End Sub


Das muss ich mit jedem einzelnen button machen, Button2 soll dann A2 öffnen bis zu A10, danach geht es mit B1 los.

Vielen Dank fürs lesen.

Mehrere Buttons zuteilen?

Martin Asal, Montag, 08. Mai 2017, 21:36 (vor 200 Tagen) @ 54654n6456n

Hi,

wenn man 200 Buttons hat, die letztlich alle (fast) dasselbe machen, ist das ein Zeichen, dass etwas schief läuft ;-)

Wie wäre es, wenn du den grundsätzlichen Aufbau deines Formulars überdenkst? Eine Möglichkeit -von vielen- wäre, wenn du ein Kombifeld einbaust, in dem man 'A1', 'A2' usw, bis 'Z99' auswählt. Nach Aktualisierung des Kombifelds wird das Formular entsprechend geöffnet. Damit sind deine 200 Buttons obsolet und das Formular viel einfacher zu bedienen.

Martin

Mehrere Buttons zuteilen?

gast, Dienstag, 09. Mai 2017, 07:42 (vor 200 Tagen) @ Martin Asal

Hi,

wenn man 200 Buttons hat, die letztlich alle (fast) dasselbe machen, ist das ein Zeichen, dass etwas schief läuft ;-)

Wie wäre es, wenn du den grundsätzlichen Aufbau deines Formulars überdenkst? Eine Möglichkeit -von vielen- wäre, wenn du ein Kombifeld einbaust, in dem man 'A1', 'A2' usw, bis 'Z99' auswählt. Nach Aktualisierung des Kombifelds wird das Formular entsprechend geöffnet. Damit sind deine 200 Buttons obsolet und das Formular viel einfacher zu bedienen.

Martin

hallo Martin, es ist der Übersichtshalber so erstellt worden, ein Kombinationsfeld wäre zu umständlich und nicht so schnell wie einen Button anzuklicken.
Eine Listenversion wäre für eine andere Aufgabe sehr hilfreich, hast du da zufällig ein Script dafür?

Mehrere Buttons zuteilen?

Martin Asal, Dienstag, 09. Mai 2017, 15:23 (vor 199 Tagen) @ gast

ein Kombinationsfeld wäre zu umständlich und nicht so schnell wie einen Button anzuklicken.

Das sehe ich genau andersherum: Bis man bei 200 Buttons, verteilt auf mehreren Seiten, den Richtigen gefunden hat, dauert es auch. Ein Listen- oder Kombifeld ist da wesentlich schneller, schluckt nur einen Bruchteil an Platz und ist wesentlich einfacher zu warten.

Eine Listenversion wäre für eine andere Aufgabe sehr hilfreich, hast du da zufällig ein Script dafür

Script? Einfach nur das bischen, was du schon hast. Minimal angepasst, ungefähr so (ungetestet):

Private Sub Kombifeld_AfterUpdate()
    DoCmd.OpenForm "Datenblatt", , ,"Adresse = '" & Kombifeld.Value &"'"
End Sub

Martin

RSS-Feed dieser Diskussion
powered by my little forum