Πώς μπορώ να αλλάξω τοπικές ρυθμίσεις VBA

Η γλώσσα VBA σας επιτρέπει να καλέσετε εσωτερικές λειτουργίες των Windows , συμπεριλαμβανομένης της λειτουργίας που αλλάζει τοπικές ρυθμίσεις . Συμπεριλάβετε τη λειτουργία DLL των Windows που καθιστά την αλλαγή στο σύστημα , τότε καλέστε την λειτουργία από την εφαρμογή σας VBA . Οι τοπικές ρυθμίσεις αλλάζουν είναι διαφανείς για τους χρήστες σας , ώστε να χρησιμοποιούν μόνο τη διαδικασία αυτή , όταν οι χρήστες που τις περιφερειακές αλλαγές στις ρυθμίσεις σε εφαρμογές VBA σας . Οδηγίες
Η

1 Κάντε δεξί κλικ στο VBA αρχείο που θέλετε να χρησιμοποιήσετε για να αλλάξετε τις τοπικές ρυθμίσεις . Κάντε κλικ στο " Άνοιγμα με " και στη συνέχεια κάντε κλικ στο πρόγραμμα επεξεργασίας VBA , ή να χρησιμοποιήσετε το Notepad , αν δεν έχετε ένα πρόγραμμα επεξεργασίας. 2

Συμπεριλάβετε την περιφερειακή ρυθμίσεις DLL λειτουργία στην κορυφή του αρχείου κώδικα . Προσθέστε τον ακόλουθο κώδικα στο αρχείο VBA σας :

Private Declare Function GetUserDefaultLCID % Lib " kernel32 " ( ) Private Declare Function SetLocaleInfo _Lib " kernel32 " Alias ​​" SetLocaleInfoA " ( _ByVal Locale Όπως Long , _ByVal LCType Όπως Long, _ByVal lpLCData Όπως String ) Όπως Boolean
εικόνων 3

Ρυθμίστε τις τοπικές πληροφορίες στον υπολογιστή του χρήστη . Η παρακάτω συνάρτηση καθορίζει τις τοπικές περιφερειακές ρυθμίσεις :

Καλέστε SetLocaleInfo ( GetUserDefaultLCID ( ) , LC_CONST , Ρύθμιση )
Η
εικόνων