|
|
|
![]() |
|
Strumenti |
![]() |
#1 |
Member
Iscritto dal: Oct 2002
Messaggi: 205
|
WORD: DOMANDA DIFFICILE
Esiste un modo per selezionare ad es. 20 file di word e unirli in un file unico? (senza fare il copia/incolla da file a file)
Grazie |
![]() |
![]() |
![]() |
#2 |
Senior Member
Iscritto dal: Feb 2001
Città: Italia
Messaggi: 608
|
Non dovrebbe essere molto complesso...
con poche linee di VBA o vbScript dovresti riuscire senza troppi problemi.
BiG |
![]() |
![]() |
![]() |
#3 |
Member
Iscritto dal: Oct 2002
Messaggi: 205
|
E' che non conosco i due linguaggi. Sapresti darmi delle dritte su dove/come imparare le basi per risolvere il problema?
Grazie |
![]() |
![]() |
![]() |
#4 |
Senior Member
Iscritto dal: Feb 2001
Città: Italia
Messaggi: 608
|
Non è completo ma dovrebbe essere...
... un buon punto di partenza
Sub Macro1() ' ' Macro1 Macro ' Macro registrata il 23/03/2003 da Andrea Biglieri ' Dim pluto As Document Set pippo = Documents.Add(DocumentType:=wdNewBlankDocument) Set pluto = Documents.Open(FileName:="""A seguito della Vostra inserzione.doc""", _ ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _ PasswordDocument:="", PasswordTemplate:="", Revert:=False, _ WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _ wdOpenFormatAuto) Selection.WholeStory Selection.Copy Windows(pippo).Activate Selection.PasteAndFormat (wdPasteDefault) pluto.Close (False) End Sub Se cerchi MAro nell'help di word trovi tutto quello che ti server BiG |
![]() |
![]() |
![]() |
Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 04:01.