Lagring i en makro Ved hjælp af en ønskede filnavn

Steve opretter dokumenter, der kræver dokumentets filnavn at blive angivet i overskriften og i juridiske billedtekster på den første og anden sider i dokumentet. Han har skabt en makro, der, efter at filnavnet er indtastet overskriften, kopier den og pastaer IT i tekst formularfelter i billedteksterne på de rette steder. Hans næste dokument samling skridt er at gemme dokumentet ved hjælp af "Gem som" kommando. Dokumentet skal gemmes ved hjælp af den samme fil betegnelse i header og billedtekster.

Når du gør dette manuelt, viser Steve Gem som dialogboksen indsætter filnavnet ind i det, så klikker på Gem. Han har forsøgt at skabe makrokoden at tilføje dette "Gem som" skridt, men kan ikke finde ud af at gøre det. Når Word registrerer de manuelle trin, Steve får noget i retning af følgende:

ActiveDocument.SaveAs FileName: = "04562.sw.doc

Dette viser, at Word optager det specifikke filnavn bliver brugt, når der går gennem de manuelle trin, men Steve ønsker at bruge et andet filnavn, baseret på hvad der er i overskriften på dokumentet. Disse oplysninger (filnavnet) sker for at være i Udklipsholder, når makroen køres, så det er også muligt at få fat i de oplysninger danner Udklipsholder, men Steve er også på et tab, hvordan man skal gøre det.

Da Steve allerede har en makro til at kopiere filnavnet, og han er tilfreds med, at makroen skal det kun tage et par ændringer til sin kode for at få filen gemt bruger den korrekte navn. Prøv at tilføje følgende kode til de relevante steder i din eksisterende makro:

Dim strTemp As String
Dim Mydata Som DataObject
Set Mydata = Ny DataObject

MyData.GetFromClipboard
strTemp = MyData.GetText (1)
ActiveDocument.SaveAs FileName: = Trim (strTemp) & ".doc"

Så længe du har en tekststreng i Udklipsholder, du vil bruge til dit filnavn, skal denne kode virker. Det tilføjer endda .doc udvidelse til slutningen af ​​strengen i udklipsholderen. Denne kode kræver, at du opretter en reference for de Microsoft-formularer i VBA editoren. (Vælg Referencer fra menuen Funktioner i editoren.)

Selvfølgelig skal det påpeges, at du måske ønsker at genoverveje din tilgang til denne makro. Faktisk kan du være i stand til at slippe af med de fleste af din kode, hvis du tager en anden tilgang helt. For eksempel kan du have folk først gemme dokumentet og derefter referere filnavnet i selve dokumentet ved hjælp af felter. (The FILENAME felt kan anvendes til dette formål.)

I stedet for at bruge en makro til at kopiere filnavnet til den første og anden sider i dokumentet, kan du også bruge en defineret typografi (såsom DocTitle eller DocName) at henvise til dit filnavn, og derefter bruge STYLEREF feltet andetsteds i din dokument til at henvise til det navn. På den måde har den kun skal indtastes en gang, og ingen makro er nødvendig. Du kan finde flere måder at gentage data i forskellige områder af dokumentet på denne side på et Word MVP websted:

http://gregmaxey.mvps.org/Repeating_Data.htm

Du kan også oprette en UserForm at indsamle data fra brugeren (for at få filnavnet ønskes), og gemme dokumentet under dette navn dengang. Makroen kan derefter tildele filnavnet til titelfeltet, og hvor som helst i dokumentet, der refereres til titelfeltet vil automatisk vises filnavnet brugeren har indtastet.

WordTips er din kilde til omkostningseffektiv Microsoft Word træning. (Microsoft Word er det mest populære tekstbehandlingsprogram i verden.) Dette tip (453) gælder for Microsoft Word 97, 2000, 2002, og 2003. Du kan finde en version af dette tip til menufaner Word (Word 2007 og nyere) her: Saving i en makro Ved hjælp af en ønskede filnavn.


© 2021 Zajacperrone.com | Contact us: webmaster# zajacperrone.com