Полный адрес ячейки

[konstantin1990]

Доброго всем времени суток!!! Есть два одинаковых файла с макросами, с единственным различием в файле data2 свойство книги visible = false, что как я понял требует указывать к ней полный адрес ячееек в коде VBA для его корректной работы. Как быть с textbox я разобрался вроде. Если название книги ACP, название листа Data, требуемая ячейкa А1 то полный адрес будет выглядеть так:

Private Sub TextBox1_Change()
Dim Arange As Range
Set Arange = ACP.Worksheets("data").Range("A1")
Arange = TextBox1.Value
End Sub

A как быть с полным адресом, если я хочу в свойстве лэйбла caption отобразить значение ячейки A1, листа data, книги ACP, файла data2.xlsm. А то если нет полного адреса и книга скрыта возникает ошибка! Неполный адрес выглядит вот так:

Private Sub UserForm_Initialize()
Label1.Caption = [data!a3].Value
End Sub

[kuklp]

 Workbooks("data2.xlsm").Worksheets("data").Range("A1").Value

[konstantin1990]

Да это плный шет( переписывать пол программного кода! Оставлю так! Буду использовать только applicztion.visible, обидно, что он глючит при скрытии только одной книги в которой лежат нужные листы и не видит их, если не указывать полный путь.