Popup-menu

[tsja...]

Met docmd.showmenuitem kun je volgens de help een item grijs arceren, maar ik krijg dit niet voor elkaar voor wat pop-up menuutjes die ik heb gemaakt.

Wie wel?

 

[Bartuls]

Bedoel je misschien de showpopup methode?

Uit de Access help:

ShowPopup, methode
Zie ook Is van toepassing op Voorbeeld Bijzonderheden
Met deze methode geeft u de opgegeven opdrachtbalk als een snelmenu weer op de opgegeven locatie of op de huidige locatie van de aanwijzer.

Opmerking Als de eigenschap Position van de opdrachtbalk niet is ingesteld op msoBarPopup, mislukt deze methode.

expressie.ShowPopup(x, y)

expressie Vereist. Een expressie die een CommandBar-object als resultaat geeft.

x Variant, optioneel. De x-coördinaat van de locatie van het snelmenu. Als dit argument wordt weggelaten, wordt de huidige x-coördinaat van de aanwijzer gebruikt.

y Variant, optioneel. De y-coördinaat van de locatie van het snelmenu. Als dit argument wordt weggelaten, wordt de huidige y-coördinaat van de aanwijzer gebruikt.

Voorbeeld
In dit voorbeeld wordt een snelmenu met twee besturingselementen gemaakt. De methode ShowPopup wordt gebruikt om het snelmenu zichtbaar te maken.

Set myBar = CommandBars _
.Add(Name:="Custom", Position:=msoBarPopup, Temporary:=False)
With myBar
.Controls.Add Type:=msoControlButton, Id:=3
.Controls.Add Type:=msoControlComboBox
End With
myBar.ShowPopup