Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon user3 vom 26.06.2020, 12:22 Options
Sprache in VBA abfragen : wo /wie finde ich Setup?
Hallo an alle m Netz,
ich möchte in VBA abfragen, in wechem Sprach-Setup das ECXEL läuft (also deutsch, englisch, multilanguage etc)....
Welchen Wert muss ich dazu wie abfragen?
Danke, user3
ich möchte in VBA abfragen, in wechem Sprach-Setup das ECXEL läuft (also deutsch, englisch, multilanguage etc)....
Welchen Wert muss ich dazu wie abfragen?
Danke, user3
Antwort 1 von Hajo_Zi vom 26.06.2020, 12:36 Options
Hallo Nick,
Betriebsystem
=INFO("sysversion")
Application.International(1) - liefert für deutsch den Wert 49 zurück von Jinx
siehe Hilfe unter International
Ergänzung Ramses (Rainer)
2 gibt die Längerspezifischen Einstellungen (Deutsch/Schweiz/Österreich) zurück, während 1 die allgemeineSprache zurückgibt.
1 = Deutsch und gilt für alle Installationen einer DEUTSCHEN Office/Excel version.
lege Zwei Tabellen an "Deutsch" und "Englisch"
Option Explicit
Private Sub Workbook_Open()
Worksheets(IIf(Application.International(xlCountrySetting) = 49, "Deutsch", "Englisch")).Visible = -1
Worksheets(IIf(Application.International(xlCountrySetting) = 49, "Englisch", "Deutsch")).Visible = 2
End Sub
Von Nepumuk
Gruß hajo
Betriebsystem
=INFO("sysversion")
Application.International(1) - liefert für deutsch den Wert 49 zurück von Jinx
siehe Hilfe unter International
Ergänzung Ramses (Rainer)
2 gibt die Längerspezifischen Einstellungen (Deutsch/Schweiz/Österreich) zurück, während 1 die allgemeineSprache zurückgibt.
1 = Deutsch und gilt für alle Installationen einer DEUTSCHEN Office/Excel version.
lege Zwei Tabellen an "Deutsch" und "Englisch"
Option Explicit
Private Sub Workbook_Open()
Worksheets(IIf(Application.International(xlCountrySetting) = 49, "Deutsch", "Englisch")).Visible = -1
Worksheets(IIf(Application.International(xlCountrySetting) = 49, "Englisch", "Deutsch")).Visible = 2
End Sub
Von Nepumuk
Gruß hajo
Antwort 2 von user3 vom 26.06.2020, 12:58 Options
Hallo Hajo,
danke, genau das suche ich.
Was liefert mir eine MULTILANGUAGE-Installation bei der
Abfrage von
Application.International(xlCountrySetting) ??
Hintergrund: ein XLS an viele User mit unterschiedlichen EXCEL-Installationen.
Gruß, user3
danke, genau das suche ich.
Was liefert mir eine MULTILANGUAGE-Installation bei der
Abfrage von
Application.International(xlCountrySetting) ??
Hintergrund: ein XLS an viele User mit unterschiedlichen EXCEL-Installationen.
Gruß, user3
Ähnliche Themen
Wo Finde ich DEL für setup
02081972 15.04.2007 - 527 Hits - 3 Antworten
Vista sprachen downloaden
Ruben 22.07.2007 - 19 Hits -
SQL Abfragen per VBA
Varo 12.09.2007 - 175 Hits -
2 Werte Abfragen
RalfH 10.10.2007 - 79 Hits - 4 Antworten
Windows Vista - Windows Update
EInsyds 16.02.2008 - 55 Hits - 2 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
