Forums Neueste Beiträge
 

Bezeichnungsfeld auf Tabellenblatt per VBA referenzieren

06/05/2015 - 15:19 von Udo | Report spam
Hallo,

ich habe auf einem Tabellenblatt (Tabelle1) ein Bezeichnungsfeld (Label) aus der
Steuerelemente-Toolbox hinzugefügt. Dieses Label möchte ich per VBA ansprechen, um verschiedene Werte anzeigen zu lassen.

Wenn ich in einer Testprozedur auf einem Standardmodul eingebe:

Private Sub Test()
Dim Box As Label
Set Box = Tabelle1.Label1
End Sub

erhalte ich die Meldung "Typen unvertràglich",
obwohl mir bei Eingabe von

debug.print TypeName(tabelle1.Label1)
im Direktfenster der Typ "Label" ausgegeben wird.

Warum geht das nicht?
Mit welchem Typ muss ich das Bezeichnungsfeld deklarieren bzw. wie muss
ich es korrekt referenzieren?

Danke für die Hilfe
Udo
 

Lesen sie die antworten

#1 Claus Busch
06/05/2015 - 15:35 | Warnen spam
Hallo Udo,

Am Wed, 6 May 2015 06:19:23 -0700 (PDT) schrieb Udo:

Private Sub Test()
Dim Box As Label
Set Box = Tabelle1.Label1
End Sub



probiers mal so:

Sub Test()
Dim Box As Object
Set Box = ActiveSheet.OLEObjects("Label1")
MsgBox Box.Object.Caption
End Sub


Mit freundlichen Grüßen
Claus
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional

Ähnliche fragen