Verifica se la cartella di lavoro è aperta
Ecco un codice di base reale per verificare se una cartella di lavoro è attualmente aperta testando il nome di una cartella di lavoro, non il nome completo incluso il percorso.
Stavo scrivendo codice in un foglio di calcolo che alterava i fogli in un'altra cartella di lavoro e volevo assicurarmi che la cartella di lavoro 2 fosse aperta prima che il codice venisse eseguito nella cartella di lavoro 1.
Sub TestByWorkbookName() Dim wb As Workbook For Each wb In Workbooks If wb.Name = "New Microsoft Excel Worksheet.xls" Then MsgBox "Trovato" Exit Sub 'call code qui, usciremo solo per ora End If Next End Sub
