Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

HILFE! Abfrage des Option Group Objektes

Begonnen von surfingwilli, Juli 25, 2012, 15:39:30

⏪ vorheriges - nächstes ⏩

surfingwilli

Hallo,
habe ein Option Group erstellt namens "Option_Gr_Version", die vier Optionsfelder enthält.
Diese kann ich auch in einem Textfeld abfragen: =[Option_Gr_Version].[Value]
Da erscheint dann mein Wert, je nach dem welche Option ich anklicke.

Leider kann ich den Wert der Gruppe nicht mit VBA abfragen. habe es mit allen mögliche Kombis probiert ua. mit:
var_Version = main!Option_Gr_Version
var_Version = main!Option_Gr_Version.OptionValue
var_Version = main!Option_Gr_Version.Value

Variable ist definiert, die Form heisst "Main"

Kann mir jemand helfen?
Danke und viel grüße


bahasu

Zitat von: surfingwilli am Juli 25, 2012, 15:39:30
Kann mir jemand helfen?

Hi,
die Antwortet lautet: Ja
Aber vermutlich hilft Dir mein Beispiel im Anhang weiter.
Der Wert wird erhalten, indem Du den Namen des "Rahmens" auswertest.

Harald

[Anhang gelöscht durch Administrator]
Servus

surfingwilli

Hallo Harald,

funktioniert leider nicht in meiner DB.  :-\
Bekomme bei gleichem Code die Meldung "Invalid use of ME keyword".

Die Form ist aber geöffnet.

Viele Grüße

bahasu

Hi,

wie lautet Dein Options-"Rahmen" und wie lautet Deine Programmzeile?
Ansonsten stelle eine gezippte Version (access2003 bevorzugt) hier zur Verfügung.

Harald
Servus

Beaker s.a.

Hallo surfingwilli,
Versuche:
var_Version = Forms("main").Controls("Option_Gr_Version").Value
oder die Kurzform:
var_Version = Forms!main!Option_Gr_Version
hth
gruss ekkehard
Alles, was geschieht, geschieht. - Alles, was während seines Geschehens etwas anderes geschehen lässt, lässt etwas anderes geschehen. - Alles, was sich selbst im Zuge seines Geschehens erneut geschehen lässt, geschieht erneut. - Allerdings tut es das nicht unbedingt in chronologischer Reihenfolge.
(Douglas Adams, Mostly Harmless)

surfingwilli

SUPER! Vielen Dank!   ::)

Das hier funzt: var_Version = Forms("main").Controls("Option_Gr_Version").Value  8)

Greife mit Remote Function Call auf SAP zu (im VBA Code). Vielleicht funzte deswegen nicht jeder Code... >:(