Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
560to564
560to564
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Diagrammoptionen anzeigen

Forumthread: Diagrammoptionen anzeigen

Diagrammoptionen anzeigen
03.02.2005 11:08:47
Petra
Hallo zusammen
Ich bin fast am verzweifeln, seit ca. 2 Stunden suche ich einen Befehl, mitdem ich per Makro das Dialogfenster "Diagrammoptionen" anzeigen kann. Ich bin praktisch alle Befehle von "Application.Dialogs(xlDialog*).Show durchgegangen, habe aber nur drei der fünf Register einzeln gefunden.
Vielen Dank für eure Hilfe
Gruss Petra
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Diagrammoptionen anzeigen
03.02.2005 17:05:52
Nepumuk
Hallo Petra,
die Dialogfeldkonstanten sind Zahlen. Wenn du die Dialoge in einer Schleife erscheinen lässt, dann kannst du die Nummern herausbekommen.
Beispielcode:


Public Sub Dialoge_anzeigen()
    Dim intNumber As Integer, bolOldStatus As Boolean
    With Application
        bolOldStatus = .DisplayStatusBar
        .DisplayStatusBar = True
    End With
    On Error Resume Next
    For intNumber = 1 To 1000
        With Application
            .StatusBar = "Dialognummer: " & CStr(intNumber)
            .Dialogs(intNumber).Show
        End With
    Next
    With Application
        .StatusBar = False
        .DisplayStatusBar = bolOldStatus
    End With
End Sub


Gruß
Nepumuk
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige