VBA Text in Textbox

[gehtnetgibtsnet]

Hallo Excel-Freunde.

Ich habe eine Userform, in der ich normalerweise mehrere Option-Buttons anzeige. In bestimmten Fällen möchte ich aber stattdessen eine Fehlermeldung auf der Userform ausgeben, Das mache ich mit folgenden Befehlen:

With Frame1.Controls.Add("Forms.TextBox.1", "ErrMsg")
.Left = 2
.Height = 25
.Width = 250
.Font.Name = "Arial"
.Font.Size = 11
.Top = UFTop
.Text = "Keinen zur Maske passenden Eintrag gefunden"
End With

Mein Problem: der Text ist blau hinterlegt, woraus ich schließe, das er "selected" ist. Wenn ich auf den Text klicke, verschwindet der blaue Hintergrund. Wie kann ich das per VBA erledigen?

 

[schneup]

Muss es eine Textbox sein? Waere fuer die Fehlermeldung ein Label nicht passender?

 

[gehtnetgibtsnet]

Hallo schneup.

Nein, musste nicht, ist jetzt auf "Label" umgestellt, und das Problem ist gelöst.