Private Sub Workbook_Open()
Application.DisplayAlerts = False
'Только если Вы не хотите иметь проблем в случае отсутствия указаного файла и т.п. или листа
Worksheets(1).Range("A1").Formula = "='C:\Мои документы\[Имя_файла.xls]Имя_листа'!$A$1"
Application.DisplayAlerts = True
End Sub
Ссылка в EXCEL...
Проблема такая:
в ячейке используется формула, в некоторых случаях, в эту ячейку необходимо вносить данные. Можно ли с помощью макроса, при следующем открытии файла сохранять ссылку\формулу в этой ячейке? "Сохранить как" не предлагать :) Буду очень благодарен
в ячейке используется формула, в некоторых случаях, в эту ячейку необходимо вносить данные. Можно ли с помощью макроса, при следующем открытии файла сохранять ссылку\формулу в этой ячейке? "Сохранить как" не предлагать :) Буду очень благодарен
Tybor, Если Вы хотите при следующем открытии рабочей книги просто восстанавливать ссылку, то разместите этот макрос в модуле ThisWorkbook(ЭтаКнига)
Если ссылка не является константой, т.е. может меняться в процессе работы, то перед закрытием книги её можно куда-нибудь сохранить, например, используя пользовательские свойства книги.
Код:
Если ссылка не является константой, т.е. может меняться в процессе работы, то перед закрытием книги её можно куда-нибудь сохранить, например, используя пользовательские свойства книги.
Файл распологать в пути, который указываем в макросе? Если да то, проделав это, значение в ячейке сохраняется, а формула пропадает:
Worksheets(1).Range("A1").Formula = "='C:\123\[Regim_KSP.xls]Ñìåíà1'!$BK$6" :confused:
Worksheets(1).Range("A1").Formula = "='C:\123\[Regim_KSP.xls]Ñìåíà1'!$BK$6" :confused:
Если Вы хотите программно ввести ссылку, то проделайте сие действие вручную и запишите свои действия макрорекордером, а затем используйте полученный код (выбросив весь мусор, типа Select и т.п.) в событии Workbook_Open()
И конечно, при вводе формулы в ячейку, предыдущее значение этой ячейки будет удалено, это разумно и правильно, так что решайте сами, что Вы хотите иметь в этой ячейке.
И конечно, при вводе формулы в ячейку, предыдущее значение этой ячейки будет удалено, это разумно и правильно, так что решайте сами, что Вы хотите иметь в этой ячейке.
формула уже имеется в ячейке, просто иногда при открытии данного файла требуется не расчет данной формулы, а ввод числовых значений. Но при след. открытии файла формула должна отстаться. Путь файла меняться не должен. Извеняюсь, если я что-то не понял.
Именно это я Вам и предложил, правда ввод формулы будет происходить при каждом открытии рабочей книги (конечно, если Вы разрешили выполнение макросов) Так что просто измените ссылку в макросе на реально существующую, и проверьте, действительно ли Ваша формула должна быть введена в ячейки первого рабочего листа. Если сие не так, то укажите нужный индекс(номер) листа или имя листа или кодовое(программное) имя листа.
Большое спасибо! То что нужно.