16. januar 2003 - 14:16Der er
15 kommentarer og 1 løsning
Access ( + Office ) ID liste - hvor finder man den
Når man via VBA laver f.eks. popupmenuer i Access og vil bruge nogle af de indbyggede Office menuknapper, skal man bruge ID nummeret på den knap man vil bruge. Hvor finder man lige en liste over alle de ID numre ? Der må da findes et eller andet et sted så man ikke skal sidde og plaffe for at finde den knap man har brug for. Der er nemlig adskillige hundrede, så det kan godt tage lidt tid.
Er det id-nummeret på det billede, der vises du leder efter?
Hvis det er, så kender jeg ikke nogen liste, men bruger selv nedenstående kode til at vise billederne sammen med id-nummeret i menuen.
StartIcon og SlutIcon kan (så vidt jeg ved) antage værdier mellem 0 og 200 (svarer til id'er mellem 0 og 2000). Så vidt jeg husker er der dog mange tomme billeder over 1000.
Det er ikke ligefrem nemt eller smart, men det virker. :-)
Public Function TestIcons(StartIcon As Integer, SlutIcon As Integer) Dim i As Integer Dim ii As Integer Dim cmdMenu As CommandBarControl Dim cctlNewMainItem As CommandBarControl Dim cctlNewMinorItem1 As CommandBarControl Dim cctlNewMinorItem2 As CommandBarControl
Set cmdMenu = Application.CommandBars("ProcesDriftsJournal - Standardmenu").Controls("&Journaler") Set cctlNewMainItem = cmdMenu.Controls.Add(msoControlPopup) cctlNewMainItem.Caption = "Ikoner" cctlNewMainItem.BeginGroup = True For i = StartIcon To SlutIcon Set cctlNewMinorItem1 = cctlNewMainItem.Controls.Add(msoControlPopup) cctlNewMinorItem1.Caption = Str(i) For ii = 0 To 9 Set cctlNewMinorItem2 = cctlNewMinorItem1.Controls.Add(msoControlButton) With cctlNewMinorItem2 .Caption = Str(i * 10 + ii) .OnAction = "=OpenForm('INTRO', 0)" .FaceId = (i * 10 + ii) End With Next Next
Lige en praktisk bemærkning: lad være med at vælge 0 til 200 på én gang, da det giver hulens mange menupunktet. Om ikke andet så prøv med kun 10 (f.eks. 0 til 9) så du får en fornemmelse af hvad det er, funktionen egentligt gør.
Jeg er bange for at det er nogle andre billeder du snakker om her. Er det ikke dem man kan få vist på knapper ved siden af teksten ? Jeg synes det ser ud til det. Dem jeg har brug for er IDs på de indbyggede Office knapper, f.eks. så er der en knap der viser en dropdownbox med forskellige % satser for ZOOM ( så vidt jeg husker, så er det ID 2532 eller 2732 )
Jeg tror nemlig ikke der er så mange der kender til en sådan liste, men det kunne da være at der var en eller anden. Den ville i hvert fald være dejlig at have :-)
Har ikke set dit svar før nu - jeg vil da lige prøve at tage et kig på dit forslag ved aller første lejlighed og se om det kan give et bare nogenlunde resultat.
Indsatsen var nu ret begrænset til sidst. De to dukkede op i forbindelse med en anden søgning vedr. Excel og så var det jeg kunne huske noget om et spørgsmål fra fordums tid. Men tak for point. :-)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.