Ich bin auf der Suche nach gut praktikablen Möglichkeiten in ein Textfeld eines Userforms Unicode-Zeichen (z.B. ć kleines c mit Akut - Code 0107 oder č kleines c mit Caron - Code 010D) einzutippen.
Danke im voraus für alle Tipps!
Grüße
Günther
Private Sub TextBox5_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 67 Then
Select Case Shift
Case 2: TextBox5 = TextBox5 & ChrW(&H107)
Case 3: TextBox5 = TextBox5 & ChrW(&H106)
Case 4: TextBox5 = TextBox5 & ChrW(&H10D)
Case 5: TextBox5 = TextBox5 & ChrW(&H10C)
End Select
End If
End Sub
Den Namen der Textbox selbstverständlich anpassen.
Gruß K.Rola