Excel und VBA: Formeln, Programmierung, Lösungen

StandardModule: basMain

Sub EingabeBox()
   Dim sInput As String
   sInput = InputBox("Zeichenfolge:")
   If sInput = "" Then Exit Sub
   sInput = Mid(sInput, 3, 1)
   MsgBox sInput
End Sub

    

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Zeichenfolge