Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
372to376
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
372to376
372to376
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Menü ID für Analyse

Menü ID für Analyse
29.01.2004 23:11:46
Stefan Glander
Nabend Forum,
kann mir jemand die ID Nummer für Analyse sagen
Gruss
Stefan Glander

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Menü ID für Analyse
30.01.2004 04:31:43
Jörg Gradert
Hallo Stefan,
ich habe:
selbst Excel 2000
mich hier umgeschaut
http://www.excel-inside.de/
Navigation Menüprogrammierung, Menüleisten
folgendes Programm entwickelt
Option Explicit
Const MenüEintrag = "Analyse-Funktionen..."

Sub test()
Dim i
i = Application.CommandBars.ActiveMenuBar.Controls("Extras").Controls(MenüEintrag).ID
MsgBox i
End Sub

und ermittle damit für den Menüpunkt Analyse_Funktionen... im Menü Extras
die ID 1
Hilft dir das weiter?
Gruss Jörg
Anzeige
AW: Menü ID für Analyse
30.01.2004 13:12:48
Stefan Glander
Hallo Jörg,
danke Dir für Deine Mühe aber leider hilft mir das nicht so richtig.
Gruss
Stefan Glander
NOCH OFFEN: Menü ID für Analyse
30.01.2004 13:50:27
Jörg Gradert
Hallo Stefan,
ist es nicht das was Du suchst, oder warum hilft es nicht?
Gruss Jörg
AW: Menü ID für Analyse
30.01.2004 18:47:15
Stefan Glander
Hallo Jörg,
ich suche den Wert für Analyse, zwischen den Menüs Fenster und ?
Gruss
Stefan Glander
AW: Menü ID für Analyse
30.01.2004 19:11:00
Jörg Gradert
Hallo Stefan,
diesen Menüpunkt habe ich nicht, aber vielleicht hilft folgendes Makro von
http://www.excel-inside.de/
die Ausgabe erfolgt im Direktbereich

Sub Menu_ID_ermitteln()
Dim Menüleiste As CommandBar
Dim i As Integer
Dim n As Integer
Set Menüleiste = CommandBars(1)
n = Menüleiste.Controls.Count
For i = 1 To n
Debug.Print Menüleiste.Controls(i).ID & _
" ---> " & Menüleiste.Controls(i).Caption
Next
End Sub

Gruss Jörg
Anzeige
AW: 1000 Dank, freu ERLEDIGT o.T.
30.01.2004 19:20:19
Stefan Glander
.

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige