Public ExcelZelle As Object
 
Public Enum ZELLE 
    Font
End Enum
 
Public Sub BEISPIEL
    Set ExcelZelle = ExcelDatei.ActiveSheet.Cells(10, 10)
 
'Beim Programmieren soll nun bei der Eingabe von "ZELLE." erscheinen:
'   ZELLE.Font
'Ok, das klappt.
 
'Was muss ich tun/programmieren, damit nach Eingabe von "." (also "ZELLE.Font.")
'die Auswahl "Bold" und "Italic" erscheint?
'Ziel also:
 
    ZELLE.Font.Bold    'als Auswahl
              .Italic  'als Auswahl
 
'Und als Ergänzung nach Setzen von "Font.Bold" und "=":
    ZELLE.Font.Bold = True   'als Auswahl
                      False  'als Auswahl
End Sub