Supportnet / Forum / Tabellenkalkulation
Indizieren von CommandBarButtons ?
Frage
[b]Einen wunderschönen sonnigen Bastelvormittag euch allen :)[/b]
Ich hänge wie eine Glocke - hoffentlich könnt ihr mir helfen :
In meiner über ein Makro erstellen Menüleiste habe ich mehrere Popup-Felder, in denen sich verschiendene Anzahlen von CommandButtons befinden. Nach der Erstellung will ich diese ggf. einzeln ansteuern.
Meine Frage : Wie kann ich die Schaltflächen eindeutig identifizieren bzw. mit einem Index versehen ?
:~)
Grüße
Nachtrabe [sup] [i](fliegt im dunkeln)[/i] [/sup]
Antwort 1 von Nepumuk
Hi,
Menüleiste und Commandbutton dann wieder Schaltflächen, wie geht das den zusammen?
So lange ich nicht weiß, worum es überhaupt geht, ist dir nicht zu helfen.
Gruß
Nepumuk
Menüleiste und Commandbutton dann wieder Schaltflächen, wie geht das den zusammen?
So lange ich nicht weiß, worum es überhaupt geht, ist dir nicht zu helfen.
Gruß
Nepumuk
Antwort 2 von Nachtrabe
Servus,
entschuldige bitte meine Ungenauigkeit :
Menüleiste = CommandBar
Schaltflächen = CommandBarButton
Commandbutton = CommandBarButton... ups
Ich will eine Menüleiste, in der es verschiedene CommandBarPopups gibt, in denen sich CommandBarButtons befinden. Jeder CommandBarButton soll bei Klick eine Datei öffnen.
Nun wird die CommandBar, die CommandBarPopups und die CommandBarButtons über eine Schleife erstellt.
Meine Frage : Wie kann ich die CommandBarButtons indizieren, um sie in einem anderen Makro eineindeutig zu identifizieren.
Danke,
Nachtrabe
entschuldige bitte meine Ungenauigkeit :
Menüleiste = CommandBar
Schaltflächen = CommandBarButton
Commandbutton = CommandBarButton... ups
Ich will eine Menüleiste, in der es verschiedene CommandBarPopups gibt, in denen sich CommandBarButtons befinden. Jeder CommandBarButton soll bei Klick eine Datei öffnen.
Nun wird die CommandBar, die CommandBarPopups und die CommandBarButtons über eine Schleife erstellt.
Meine Frage : Wie kann ich die CommandBarButtons indizieren, um sie in einem anderen Makro eineindeutig zu identifizieren.
Danke,
Nachtrabe
Antwort 3 von nighty
hi Nachtrabe :)
dies geht ueber globale var,ueber autoopen deklariert ,im button gesetzt und da ja global ,ueber jedes makro verfuegbar.
gruss nighty
dies geht ueber globale var,ueber autoopen deklariert ,im button gesetzt und da ja global ,ueber jedes makro verfuegbar.
gruss nighty
Antwort 4 von Nachtrabe
Hi nighty,
Ich habe meine Variable Global gesetzt. Wie kann ich herausfinden, welchen Index mein CommandButton jetzt hat ? Frei nach dem Motto, der Schalter mit der .Caption X hat den Index Z ... *grübel*
Danke schon mal
Nachtrabe
Ich habe meine Variable Global gesetzt. Wie kann ich herausfinden, welchen Index mein CommandButton jetzt hat ? Frei nach dem Motto, der Schalter mit der .Caption X hat den Index Z ... *grübel*
Danke schon mal
Nachtrabe
Antwort 5 von nighty
hi nachtrabe :)
ich kenne jetzt nicht so alle buttons,doch wenn code einfuegbar ist waere dies eine idee
gruss nighty
public ButtonAnzahl(5) as boolean
bei button1 diesen code
ButtonAnzahl(0)=true
bei button2 diesen code
ButtonAnzahl(1)=true
usw.
ueber ein beliebiges makro ist nun die dimensionierte globale var ButtonAnzahl(var) abfragbar,wie zum beispiel so
sub makro01()
dim anz as integer
for anz=1 to 5
if ButtonAnzahl(anz)=true then
rem schalter auf 0 setzen
ButtonAnzahl(anz)=false
rem weitere anweisungen
endif
next anz
end sub
ich kenne jetzt nicht so alle buttons,doch wenn code einfuegbar ist waere dies eine idee
gruss nighty
public ButtonAnzahl(5) as boolean
bei button1 diesen code
ButtonAnzahl(0)=true
bei button2 diesen code
ButtonAnzahl(1)=true
usw.
ueber ein beliebiges makro ist nun die dimensionierte globale var ButtonAnzahl(var) abfragbar,wie zum beispiel so
sub makro01()
dim anz as integer
for anz=1 to 5
if ButtonAnzahl(anz)=true then
rem schalter auf 0 setzen
ButtonAnzahl(anz)=false
rem weitere anweisungen
endif
next anz
end sub
Antwort 6 von Nepumuk
Hi,
versuch es mal damit:
ActiveCell = CommandBars.ActionControl.Caption
Gruß
Nepumuk
versuch es mal damit:
ActiveCell = CommandBars.ActionControl.Caption
Gruß
Nepumuk
Antwort 7 von Nachtrabe
Hallo zusammen,
bin wieder da, war für einige Tage "offline". Danke für die vielen Tipps, werd ich so bald wie möglich probieren.
Bis dahin,
nachtrabe
PS : SCHNEEEEEE !!! :@)
bin wieder da, war für einige Tage "offline". Danke für die vielen Tipps, werd ich so bald wie möglich probieren.
Bis dahin,
nachtrabe
PS : SCHNEEEEEE !!! :@)

