Excel, Startup options / script til ændring af decimal seperator ved opstart.

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