=ЯЧЕЙКА("имяфайла";A1)

По-моему, прикольно!!!  
Слава Тоже Серёге!  
 
А можно как-нибудь сделать, чтобы этот адрес становился ссылкой?

{quote}{login=slan}{date=28.12.2007 02:52}{thema=}{post}Гиперссылка(ячейка()), наверное{/post}{/quote}  
 
Да,я тоже так подумал!  
Проблема только в том, что функция "ячейка" выводит адрес не так как это понимает винда

знаю как через макрос  
 
Sub Patch()  
Cells(1, 1) = ThisWorkbook.Path  
end sub

Sub hhh()  
Cells(1, 1) = ActiveWorkbook.Name  
End Sub

{quote}{login=MSI}{date=29.12.2007 09:10}{thema=Re: Имя книги в ячейку А1}{post}{quote}{login=Drony}{date=28.12.2007 05:11}{thema=Имя книги в ячейку А1}{post}Sub hhh()  
Cells(1, 1) = ActiveWorkbook.Name  
End Sub{/post}{/quote}  
 
А как все-таки так сделать, чтобы макрос выводил полный адрес к файлу, из которого можно гиперрссылку делать?{/post}{/quote}  
 
Sub kkk()  
Cells(3, 5) = ThisWorkbook.Path & ActiveWorkbook.FullName  
End Sub  
 
Но книга должна быть сохранена до этого

{quote}{login=Drony}{date=29.12.2007 10:16}{thema=}{post}Вот для создания сразу Гиперссылки :  
 
Sub kkk()  
iAdres = ThisWorkbook.Path & ActiveWorkbook.FullName  
ActiveSheet.Hyperlinks.Add Anchor:=Cells(1, 1), Address:=iAdres, _  
       TextToDisplay:=iAdres  
End Sub{/post}{/quote}  
 
 
 
Ты гений, Drony, только поправлю немного вот так:  
 
Sub kkk()  
iAdres = ActiveWorkbook.FullName  
ActiveSheet.Hyperlinks.Add Anchor:=Cells(1, 1), Address:=iAdres, _  
TextToDisplay:=iAdres  
End Sub  
 
иначе у меня ссылка дублируется 2 раза в одну строку и ссылка, понятное дело не пашет.  
 
А вообще Респект тебе, спасибо!