Sul foglio excel è registrata una macro.
Avrei bisogno dal programma in vb6 di lanciare la macro "calcola" sul foglio excel "dataprova.xls".
Ovviamente la macro "calcola" una volta lanciata andrà ad eseguire dei comandi all'interno del foglio "dataprova.xls".
Grazie mille
posto il codice con il quale il programma in vb6 apre e aggancia il foglio excel
- Codice: Seleziona tutto
Option Explicit
Public AppExcel As EXCEL.Application
Public FileExcel As EXCEL.Workbook
Public FoglioExcel(3) As EXCEL.Worksheet
Public CTRL_NUOVA_ISTANZA As Boolean
Public Sub APRE_EXCEL()
CTRL_NUOVA_ISTANZA = False
On Error Resume Next 'Ignora errori
Set AppExcel = GetObject(, "Excel.Application") 'Controlla se esiste gia' una copia di Excel in esecuzione
If Err.Number <> 0 Then 'Se Excel non sta girando
Set AppExcel = CreateObject("Excel.Application") 'esegui l'applicazione
CTRL_NUOVA_ISTANZA = True
End If
Err.Clear ' Cancella gli errori che possono essere accaduti.
On Error GoTo 0 'Riprendi il normale controllo degli errori
Set FileExcel = AppExcel.Workbooks.Open(PERCORSO_DDE & "DDE.xls")
If VISUALIZZA_EXCEL = 1 Then
EXCEL.Application.Application.Visible = True 'VISUALIZZA FILE EXCEL
FileExcel.Application.Visible = True
Else
If CTRL_NUOVA_ISTANZA = False Then
EXCEL.Application.Application.Visible = False 'NON VISUALIZZA FILE EXCEL
End If
FileExcel.Application.Visible = False
End If
Set FoglioExcel(0) = FileExcel.Worksheets(1)
Set FoglioExcel(1) = FileExcel.Worksheets(2)
Set FoglioExcel(2) = FileExcel.Worksheets(3)
Set FoglioExcel(3) = FileExcel.Worksheets(4)
End Sub