Suche französische Bezeichnung von "ThisWorkbook"

22/10/2008 - 14:13 von Frank Petschke | Report spam
Hallo,
ich benötige für das Herstellen der Lauffàhigkeit auf einem System mit
französischem Windows XP das sprachliche Adàquat für

Case "DE"
Set VBC_WB = wb.VBProject.VBComponents("DieseArbeitsmappe")
Case "EN"
Set VBC_WB = wb.VBProject.VBComponents("ThisWorkbook")
Case "FR"
Set VBC_WB = wb.VBProject.VBComponents(" ??? ")

Kann jemand helfen?

Frank
 

Lesen sie die antworten

#1 Melanie Breden
22/10/2008 - 16:09 | Warnen spam
Hallo Frank,

"Frank Petschke" wrote:

ich benötige für das Herstellen der Lauffàhigkeit auf einem System mit
französischem Windows XP das sprachliche Adàquat für

Case "DE"
Set VBC_WB = wb.VBProject.VBComponents("DieseArbeitsmappe")
Case "EN"
Set VBC_WB = wb.VBProject.VBComponents("ThisWorkbook")
Case "FR"
Set VBC_WB = wb.VBProject.VBComponents(" ??? ")



es ist immer sinnvoll sprachunabhàngig zu programmieren.
Was passiert denn, wenn ein Spanier die Datei öffnet? ;-)

Die Klasse der Arbeitsmappe ist immer die erste Wert in der
VBComponents-Auflistung.
Versuchs deshalb mal mit dem Index:

Set VBC_WB = wb.VBProject.VBComponents(1)

Mit freundlichen Grüssen
Melanie Breden

- Microsoft MVP für Excel -
www.melanie-breden.de
Das Excel-VBA Codebook 2007 http://tinyurl.com/2nwvod

Ähnliche fragen