[VBA] generare un file excel da word

[Andrea_BM]

Ciao ragazzi volevo sapere se è possibile aprire excel da word tramite una macro.
In pratica vorrei che tipo all'apertura o alla chiusura di un documento word si aprisse un file excel come se avessi fatto:
start -> programmi -> office -> excel -> nuovo.
E' possibile farlo con VBA per word?

[bennygo]

io ho fatto così per ottenere il contrario, cioè per aprire un file di word da un file di excel:

per prima cosa sono andato nell'editor di vba di excel e dal menù 'strumenti' ho scelto 'riferimenti' ed ho aggiunto il riferimento a word (ho dovuto utilizzare sfoglia e selezionare manualmente il riferimento, perchè, spuntando semplicemente la casella, alla chiusura di excel tale riferimento veniva perso)

quindi ho inserito in testa alla sub il seguente codice per aprire il file di word, dove nome è il nome del file completo di percorso:

Set Appwd = CreateObject("word.Application")
Appwd.Visible = True
Appwd.Documents.Open Filename:=nome, ConfirmConversions:=False, _
ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto

ogni istruzione riferita a word richiama il nome dell'applicazione, ad esempio:

Appwd.Selection.WholeStory
Appwd.Selection.Find.ClearFormatting
Appwd.Selection.Find.Replacement.ClearFormatting

per chiudere il file di word, in questo caso senza salvare:

Appwd.ActiveDocument.ActiveWindow.Close SaveChanges:=wdDoNotSaveChanges
Appwd.Quit
Set Appwd = Nothing

penso che ribaltando i meccanismi si possa lavorare su excel partendo da word.
questo è quanto so indicarti, spero ti mandino suggerimenti più precisi del mio.

[Andrea_BM]

ok grazie!
Cmq facendo varie prove sono riuscito ad aprire excel in questo modo:

Shell("C:\percorso\excel.exe")

tuttavia quando setto il secondo parametro:

 Shell("C:\percorso\excel.exe",vbMaximizedFocus)

continua a dirmi previsto ":=" ovviamente l'ho messo, ma continua a uscirmi il mex di errore . Dov'è che sbaglio?

[Andrea_BM]

tuttavia quando setto il secondo parametro:

Shell("C:\percorso\excel.exe",vbMaximizedFocus)

continua a dirmi previsto ":=" ovviamente l'ho messo, ma continua a uscirmi il mex di errore . Dov'è che sbaglio?

Mi rispondo da solo , ho risolto togliendo le parentesi:

 Shell "C:\percorso\excel.exe", vbMaximizedFocus