• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

VBA Taaldetectie Excel

Status
Niet open voor verdere reacties.

PSVSupporter

Gebruiker
Lid geworden
13 aug 2009
Berichten
148
Hoe kan ik middels VBA de taal detecteren waarmee VBA werkt?

Ik heb een Excel 2007 versie staan op 2 pc's. Ze lijken allebei volledig Nederlandstalig te zijn, toch werkt de VBA op de ene pc met Engelse termen en de ander met Nederlandse termen.
Specifiek voorbeeld:
Code:
With ActiveSheet.PivotTables("Leveranciers").PivotFields("Leverancier")
        .PivotItems("(leeg)").Visible = False
End With
Dit is voor de Nederlandstalige, bij de Engelstalige moet ik hier "(blank)" gebruiken.

Ik heb dit geprobeerd:
Code:
Sub taal()
    Debug.print Application.International(xlCountryCode)
    Debug.Print Application.International(xlCountrySetting)
End Sub
Maar kom dan op beide pc's uit op 31, ofwel Nederlands. Dit is blijkbaar specifiek Excel, maar niet de VBA taal.
Hoe kan ik dat via VBA uitvragen, zodat ik de taalspecifieke afhandeling kan inbouwen?

Alvast bedankt!
 
PSV???
misschien zo iets?
Code:
With ActiveSheet.PivotTables("Leveranciers").PivotFields("Leverancier")
    on error resume next
        .PivotItems("(leeg)").Visible = False
        .PivotItems("(blank)").Visible = False
    on error goto 0
End With
groet sylvester
 
Dat is een oplossing, maar zoek eigenlijk een nette oplossing, waarbij ik daadwerkelijk de taalcode van VBA boven water kan toveren.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan