28.03.2019 Aufrufe

Hahner_Microsoft-Word-2010---Das-Ideenbuch_ISBN_9783866457980

Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.

YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.

Excel-Tabelle: Daten aus den Fragebogen auslesen<br />

Variablen und Konstanten deklarieren<br />

Im rechten Bereich des VBA-Editors zeigt Excel den Programmcodebereich des Moduls<br />

basEinleseRoutinen an. Hier beginnen Sie zuerst mit dem Anlegen der Variablen und<br />

Konstanten. Der »Haupt«-XML-Knoten in der XML-Struktur, unter dem alle Daten<br />

abgelegt sind, lautet im Beispiel root. Entsprechend ist über das folgende Kommando<br />

der Knotenname als Konstante (Präfix »c«) definiert:<br />

Const cXMLRootKnoten As String = "root"<br />

Damit Sie sämtliche aus der XML-Struktur auszulesende Daten optimal im VBA-Programmcode<br />

bearbeiten können, legen Sie sich für die komplette Struktur einen benutzerdefinierten<br />

Datentyp mit der entsprechenden Variablendefinition für jeden Knoten<br />

an. Möglich macht es die Type-Anweisung:<br />

Public Type tXMLKnoten<br />

strNachname As String<br />

strVorname As String<br />

strAbteilung As String<br />

dtmInstallationsdatum As Date<br />

strErstesProgramm As String<br />

strZweitesProgramm As String<br />

dblStunden As Double<br />

booUmstiegJa As Boolean<br />

booUmstiegNein As Boolean<br />

booMenüband1 As Boolean<br />

booMenüband2 As Boolean<br />

booMenüband3 As Boolean<br />

booMenüband4 As Boolean<br />

booMenüband5 As Boolean<br />

booMenüband6 As Boolean<br />

booExcel1 As Boolean<br />

booExcel2 As Boolean<br />

booExcel3 As Boolean<br />

booExcel4 As Boolean<br />

booExcel5 As Boolean<br />

booExcel6 As Boolean<br />

boo<strong>Word</strong>1 As Boolean<br />

boo<strong>Word</strong>2 As Boolean<br />

boo<strong>Word</strong>3 As Boolean<br />

boo<strong>Word</strong>4 As Boolean<br />

boo<strong>Word</strong>5 As Boolean<br />

boo<strong>Word</strong>6 As Boolean<br />

strSchulungswünsche As String<br />

End Type<br />

Für den späteren Einsatz der Struktur benötigen Sie noch eine Variablendefinition auf<br />

Basis der Struktur, die Sie mit der folgenden Deklaration erreichen (das Präfix »g« zeigt<br />

an, dass es sich um eine globale Variable handelt):<br />

Public gFormularDaten As tXMLKnoten<br />

187

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!