Treść książki
Przejdź do opcji czytnikaPrzejdź do nawigacjiPrzejdź do informacjiPrzejdź do stopki
Analizakoduzarejestrowanegomakra:korzystaniezedytoraVBitematówpomocy
43
Zdefniowanestałe
PrzyjrzyjmysięplikowipomocydlaparametruDataType(rysunek2.3),któryinformuje,
żetypemdanychmożetobyćjednaztychstałych:
xlDelimited
lub
xlFixedWidth
.Stałe
tesąważnymistałymi
xlTextParsingType
,którezostaływcześniejzdefiniowanewpro-
gramieExcelVBA.WedytorzeVB,naciskamyCtrl+G,bywywołaćoknieImmediate.
WoknieImmediate,wpisujemyponiższywierszkoduinaciskamyEnter:
PrintxlFixedWidth
OdpowiedźwyświetlonazostajewoknieImmediate.Parametr
xlFixedWidth
jestrówny
wartości2(rysunek2.4).WoknieImmediatewpisujemyPrintxlDelimited,cojesttym
samym,cowpisanie1.FirmaMicrosofprawidłowozakłada,żełatwiejjestkomuśprze-
czytaćkod,którystosujepojęcieprzypominająceangielskiewyrażenie
xlDelimited
,niż
przeczytać1.
Rysunek204WoknieImmediateedytoraVB,możnasprawdzićprawdziwewartościstałych,takichjak
xlFixedWidthl
Jeślibyliśmyzłośliwymiprogramistami,zpewnościąmogliśmyzapamiętaćwszystkie
testałeipisaćkodprzyużyciuekwiwalentównumerycznychtychstałych.Jednakbogowie
programowania(iosoby,któremusząprzeglądaćtenkod)będąnaszatoprzeklinać.
Wwiększościprzypadków,wplikupomocyalbosąwyspecyfikowaneprawidłowewar-
tościstałych,albozamieszczonesąłączaotwierającetematypomocyzpełnąlistąwartości
stałych(rysunek2.5).
Wadątegowspaniałegosystemupomocyjestto,żenieidentyfikuje,któreparametry
sąnowewdanejwersji.Wtymkonkretnymprzypadku,parametrTrailingMinusNumbers
byłwprowadzonywprogramieExcel2002.Jeślidamytenprogramkomuś,ktonadal
używawersjiExcel2000,kodniebędziedziałał,ponieważprogramExcelniezrozumie
parametruTrailingMinusNumbers.Niestetyjedynametodapoznaniatychinformacjiprze-
bieganazasadziepróbibłędów.
JeśliprzeczytamytematpomocydotyczącymetodyOpenText,możemyprzypuszczać,
żejesttozasadniczoekwiwalentotwieraniaplikuzapomocąKreatoraimportutekstu.
Wpierwszymkrokukreatora,zazwyczajwybieramyparametrDelimitedlubFixedWidth
(rozdzielaniewartościamilubstałaszerokość).Możemyrównieżokreślićpochodzenie
(origin)iwierszpoczątkowy.Tenpierwszykrokkreatorajestobsługiwanyprzezwymie-
nioneponiżejparametrymetodyOpenText:
Origin::437
StartRow::1
DataType::xlDelimited
2
