ExecuteExcel4Macro | Excel e gli applicativi Office

ExecuteExcel4Macro

Hai un problema con Excel?

Nuova discussione

ExecuteExcel4Macro
di eleonora (utente non iscritto) data: 26/08/2016 16:46:46
ciao a tutti, avrei un problema e non riesco a superarlo .
i file in questione sono : file1 e file2
vorrei aprire il file2 solo attraverso il file1 con ExecuteExcel4Macro solo a una condizione , se la cella a1 del file2 contiene una x allora vuol dire che il file e occupato , altrimenti lo apre.
che ne dite ?

di patel data: 26/08/2016 17:40:45
prova questa con le opportune modifiche

Sub leggi()
    wbPath = "F:Download"
    wbName = "2.xlsx"
    wsName = "Foglio1"
    cellRef = "A1"
    Ret = "'" & wbPath & "[" & wbName & "]" & _
          wsName & "'!" & Range(cellRef).Address(True, True, -4150)
    if ExecuteExcel4Macro(Ret) = "X" then exit sub
    Workbooks.Open(wbPath & wbName)
End Sub

Vuoi Approfondire?