Impostare il nome di un Workbook in una macro


Domanda: alcune funzioni (es: Windows(\"pipe sbo cockpit 081008.xls\").Activate) usano al loro interno il nome del workbook e quindi ogni volta devo cercare nelle macro il nome del file e modificarlo.
Come posso impostare il nome del file come variabile ed utilizzarlo all'interno delle funzioni?

 

Risposta:
E' possibile fare in questo modo:

Sub p()

Dim F As Workbook
Set F = Workbooks("Book1")
End Sub

e utilizzare F al posto di Workbook..

ad esempio:

F.Worksheets(1).Cells(1, 1).Value = "1"

che scrive nel foglio 1 del file "Book1" nella cella A1 il numero 1