per Userform werden Name(TextBox1) und Vorname(TextBox2) in einer Zelle ausgegeben.
Nun möchte ich, um den Namen(TextBox1) hervorzuheben, diesen in Fetter Schriftart angezeigt bekommen!
Danke im Voraus
Gruß Didi
per Userform werden Name(TextBox1) und Vorname(TextBox2) in einer Zelle ausgegeben.
Nun möchte ich, um den Namen(TextBox1) hervorzuheben, diesen in Fetter Schriftart angezeigt bekommen!
Danke im Voraus
Gruß Didi
Private Sub UserForm_Initialize()
Controls("textbox1").Font.Bold = True
End Sub
Gruß,CArsten
jetzt wird der Name in der Userform Fett angezeigt, ich möchte aber, daß der Name im Tabellenblatt Fett angezeigt wird!
(Beide Namen befinden sich in einer Zelle und sind durch 2 Leertasten getrennt!)
oder mache ich was falsch?
Gruß Didi
Range("A1").Font.Bold = True
Gruss
Chris
da passiert nichts!
Ich steh anscheinend auf der Leitung, wo füge ich diesen Code ein ??
Gruß Didi
Wie überträgst du den Wert aus den beiden Textboxen in die Zelle?
Im gleichen Codeteil anschliessend die Zelle noch Fett formatieren.
Gruss
Chris
das klappt leider nicht,
wenn ich die Zelle Fett formartiere werden Name und Vorname Fett angezeigt.
Gruß Didi
Ach soooooo.... :-)
Range("A1").Characters(Start:=1, Length:=InStr(Range("A1"), " ")).Font.FontStyle = "Bold"
(sofern Name Vorname und nicht umgekehrt)
Gruss
Chris
da passiert immer noch nichts!
Didi
Schreib mal in die Zelle A1 z.B. "Meier Hans" und lass das Makro rattern. Bei mir funkts ;-)
Gruss
Chris
hast recht, das klappt, aber es wird nicht der 1. sondern der 2. Name in der Zelle Fett angezeigt!
Didi
Range("A1").Characters(Start:=InStr(Range("A1"), " ") + 1, Length:=Len(Range("A1")) - InStr(Range("A1"), " ")).Font.FontStyle = "Bold"
take care...
Chris
jetzt klappt´s!!
Danke für Deine Geduld
Gruß Didi