Du kan eventuelt prøve at indsætte følgende i Workbook Open event i ThisWorkbook:
Private Sub Workbook_Open()
With Application
.DecimalSeparator = "."
.ThousandsSeparator = ","
.UseSystemSeparators = False
End With
End Sub
Lav eventuelt noget tilsvarende i Workbook Before Close der sætter tingene tilbage igen.
Hans
Takker.
Tester lige løs. Vil det så ikke være muligt at lave en genvej der kører skabelonen "normal_us" henholdsvis "normal_dk" som startup option, og deved sikrer brugeren en nem adgang til den ønskede opsætning+
Som startup option - det kan det muligvis, men min VBA-kunnen rækker ikke her. Men du kan jo eventuelt lave to makroer, en til at "sættte US" og en til at "sætte tilbage til DK" og så tildele hver makro en genvej.
Hans
Først og fremmest tak for kommantaren og du må gerne oprette et svar således jeg kan få givet dig pointene.
Har ikke helt fået løsningen til at køre (grundet brugerrettigheder på server) men vil lave to skabeloner til henholdsvis DK og US og så have to forskellige genveje som har som option hvilken skabelon der skal åbnes. Derved sikre jeg mig at brugeren tager et bevidst valg og er klar over hvilken "formatering" der bruges.
Jeg ved ikke om det kan være til mere hjælp, men jeg oprettede følgende to kodestumper (ikke Workbook Open)
Sub US()
With Application
.DecimalSeparator = "."
.ThousandsSeparator = ","
.UseSystemSeparators = False
End With
End Sub
Sub DK()
With Application
.DecimalSeparator = ","
.ThousandsSeparator = "."
.UseSystemSeparators = True
End With
End Sub
og gav dem hver en genvej (f.eks Ctrl+Shift+A og Ctrl+Shift+D)
Hans