Hallo zusammen,
kann mir bitte wer sagen, weshalb bei Verwendung der Variable 'Periode' letztlich ein Komma anstatt des eingegebenen Punktes in die Zelle eingetragen wird bzw. wie man so etwas verhindern kann?
Vielen Dank vorab. Gruß Bernd
hier der betreffende Teil...:
'Periode - für den Buchungstext und die Tabellenblattbeschriftung
'Eine Eingabe wird erzwungen
Dim Periode As String, Abbruch As Boolean, strPrompt As String
strPrompt = "Bitte Abrechnungsperiode angeben:" & vbCrLf & "(Format: mm.yyyy)"
Do
Periode = InputBox(strPrompt, "Eingabewert erforderlich")
Abbruch = StrPtr(Periode) = 0
strPrompt = "Die Eingabe ist zwingend!" & vbCrLf & "Bitte Abrechnungsperiode angeben:" & vbCrLf & "(Format: mm.yyyy)"
Loop Until Periode "" Or Abbruch
If Not Abbruch Then
GoTo los
' MsgBox "Es wurde '" & InputDummy & "' eingegeben"
Else
MsgBox "Die Aufbereitung wird vorzeitig beendet", vbCritical, "Abbruch"
Exit Sub
End If
los:
'Periode
Cells(1, 1).Value = "Periode:"
'Periode - als Text
With Cells(1, 2)
.FormulaR1C1 = Periode
End With