Aprire un file Excel da una macro di Word

[umaga]

Ciao
vorrei realizzare una macro in Word per automatizzare l'accesso a dei dati contenuti in un file Excel, da usare poi per generare documentazione tecnica.

Non riesco però a impostare le istruzioni di base con le quali accedo al mio file sorgente Excel. Ho trovato in rete questa porzione di codice:

Codice: Seleziona tutto

Set a = New Excel.Application

'apre il file
Set wb = a.WorkBooks.Open("C:\Documenti\database.xls")

'seleziona il foglio
Set ws = wb.Worksheets(1)

'estrae il valore dalla cella D3
Valore = ws.Cells(4, 3)


Sembra però che non riconosca Excel.Application... Ma non c'è un metodo standard per aprire un file Excel?

[Anthony47]

Una macro come questa apre un xls da word

Codice: Seleziona tutto

    Sub ApriXlFile()
    Dim applicXl As Object, XlDoc As Object
'
    Set applicXl = CreateObject("Excel.Application")
    applicXl.Visible = True
    Set XlDoc = applicXl.workbooks.Open(FileName:="C:\Documents and Settings\A_Monge\Documenti\Cartel1.xls")    '<< Il tuo file da aprire
'altre istruzioni
'
'Alla fine, per chiudere il file e l' applicazione:
    XlDoc.Close
      applicXl.Quit
      Set XlDoc = Nothing
      Set applicXl = Nothing
End Sub

Ciao

[umaga]

Grazie mille Anthony, per il momento non mi spingo oltre, quanto mi hai postato mi basta e avanza. Ciao