Datenmaske
21.07.2022 12:57:23
maic
ich habe mit Excel eine Datenmaske erstellt und beim öffnen dieser wird mir allerdings beim Datum der US Datumtyp angezeigt.
Wie kann ich das in VBA ändern?
Weiters hätte ich gerne gleich beim öffnen einen neuen Datensatz wenn dieser im Suchfeld B9 nicht vorhanden ist.
Code aus dem Netz
Sub Maske()
Dim sShortCut As String
Select Case Left(Application.Version, 1)
Case 5, 7, 8
sShortCut = "%s"
Case Else
sShortCut = "%k"
End Select
Application.Goto _
Reference:=Worksheets("Datenbank").Range("A:A"), _
Scroll:=True
SendKeys sShortCut & Worksheets("Tabelle1").Range("B9").Value
SendKeys "%t"
ActiveSheet.ShowDataForm
End Sub
Freue mich über jede Hilfe.sG Mario