Salvataggio in formato documento da una macro (Microsoft Word)
Anthony importa regolarmente più rapporti, in file di testo (ad esempio, nomefile.txt), in Word. Quindi utilizza le macro per formattare queste informazioni importate. Dopo che la macro di formattazione è stata completata, Anthony utilizza manualmente “Salva con nome” per ogni report per salvarlo come documento di Word. Si chiede quali comandi aggiungere alla sua macro per automatizzare l’ultimo passaggio del salvataggio dei dati. Anthony vorrebbe che la macro salvi il file utilizzando lo stesso nome radice del file di testo originale, cambiandolo solo in formato Word, come in filename.doc.
I passaggi per salvare effettivamente il file sono relativamente semplici. Considera il seguente frammento di codice, che salva un documento in formato Word:
ActiveDocument.SaveAs FileName:=sDocName, _ FileFormat:=wdFormatDocument
Il nome del file è memorizzato nella variabile sDocName e l’impostazione per la proprietà FileFormat indica che si desidera salvare il documento nel formato Word. In una macro esistente, l’unica cosa rimasta da fare sarebbe impostare sDocName con il nome file desiderato.
Supponendo che tu abbia salvato il nome del file di testo originale nella variabile sOrigName, potresti usare il seguente codice per cambiare l’estensione in .doc, e quindi salvare il file:
sDocName = Left(sOrigName, Len(sOrigName) - 4) sDocName = sDocName & ".doc" ActiveDocument.SaveAs FileName:=sDocName, _ FileFormat:=wdFormatDocument
Il codice presuppone che gli ultimi quattro caratteri di sOrigName contengano l’estensione del nome del file (il punto più tre caratteri). Questi vengono rimossi e viene aggiunta l’estensione “.doc”.
_Nota: _
Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti WordTips), ho preparato una pagina speciale che include informazioni utili.
WordTips è la tua fonte di formazione economica su Microsoft Word.
(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (427) si applica a Microsoft Word 97, 2000, 2002 e 2003. È possibile trovare una versione di questo suggerimento per l’interfaccia della barra multifunzione di Word (Word 2007 e più tardi) qui: