{quote}{login=The_Prist}{date=26.10.2010 04:47}{thema=}{post}Макросом, думаю как-то так:  
 
Sub Macro1()  
   Dim oName As Name, rFndRng As Object  
   For Each oName In ActiveWorkbook.Names  
       With ActiveSheet.UsedRange  
           Set rFndRng = .Find(oName.NameLocal, , xlFormulas, xlPart)  
           If Not rFndRng Is Nothing Then  
               Do  
                   rFndRng.FormulaLocal = Replace(rFndRng.FormulaLocal, oName.NameLocal, Replace(oName.RefersToLocal, "=", ""))  
                   Set rFndRng = .FindNext(rFndRng)  
               Loop While Not rFndRng Is Nothing  
           End If  
       End With  
   Next oName  
End Sub  
 
Возможно, придется еще проход и по именам на листе сделать - но это уж сами.{/post}{/quote}Возможны ошибки, если часть одного имени содержит другое имя. (точка1 и точка10, например, и т.п.)

имена ячеек почти одинаковые - см. пример

Или: сначала скопировать формулу в текстовую строку, заменить имя на адрес, сделать Evaluate. Если возникает ошибка или результат отличается от значения ячейки - не обновлять формулу ячейки.

{quote}{login=Михаил}{date=26.10.2010 05:19}{thema=}{post}А если что-то типа такого алгоритма:  
- выделяем ячейки с формулами;  
- по-очереди проверяем влияющие ячейки;  
- если влияющая ячейка именованная, заменяем имя на адрес.  
Если это, конечно, возможно.{/post}{/quote}  
 
Звучит красиво. вот только как это воплотить в VBA?

Еще вариант - изменить макросом все имена: имя & "_", к примеру.    
Получим: ячейка1_ ; ячейка11_ ; ячейка112_ и т.д.

А почему "посмотреть код" не работает?

{quote}{login=Z}{date=26.10.2010 05:56}{thema=}{post}Грабли, однако... Уже наступали... Не выручит стандартное: Использовать в формуле, Вставить имена, Все имена? Получим, к примеру, в А1 "asd", в В1 - "=Лист1!$L$2:$L$3"...  
29332{/post}{/quote}  
Что-то я вообще ничего не понял, кроме слова Грабли