Переменная - имя листа в формуле - Microsoft Office Excel

VictorM · 10.05.2012, 14:09

Здравствуйте, Уважаемые.
Подскажите, пожалуйста, как вот в такой строке присвоения имени диапазону

Код:

ActiveWorkbook.Names.Add Name:="Даты", RefersTo:="=OFFSET(Май!$A$11,0,0,COUNTA(Май!$A$10:$A$65000),1)"

нужно написать, чтобы вместо имени листа "Май", можно было использовать переменную ЛистИмя = ActiveSheet.Name.
Пробовал уже по всякому, не получается что-то.
Спасибо.

staniiislav · 10.05.2012, 14:22

а кусок примера можете выложить?

IgorGO · 10.05.2012, 14:25

Код:

ActiveWorkbook.Names.Add Name:="Даты", RefersTo:="=OFFSET(" & ActiveSheet.Name & "!$A$11,0,0,COUNTA(" & ActiveSheet.Name & "!$A$10:$A$65000),1)"

Казанский · 10.05.2012, 14:27

Может, апострофы добавить, а то вдруг имя листа сложное:

Код:

RefersTo:="=OFFSET('" & ActiveSheet.Name & "'!$A$11,0,0,COUNTA('" & ActiveSheet.Name & "'!$A$10:$A$65000),1)"

VictorM · 10.05.2012, 14:55

IgorGO, Казанский, большое спасибо за столь быстрые ответы.

10.05.2012, 14:09	#1
VictorM Старожил Регистрация: 15.05.2008 Сообщений: 2,058	Переменная - имя листа в формуле Здравствуйте, Уважаемые. Подскажите, пожалуйста, как вот в такой строке присвоения имени диапазону Код: `ActiveWorkbook.Names.Add Name:="Даты", RefersTo:="=OFFSET(Май!$A$11,0,0,COUNTA(Май!$A$10:$A$65000),1)"` нужно написать, чтобы вместо имени листа "Май", можно было использовать переменную ЛистИмя = ActiveSheet.Name. Пробовал уже по всякому, не получается что-то. Спасибо. "Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь" "Большое спасибо" - Z261597841314, R208907249777, U447361470499

10.05.2012, 14:22	#2
staniiislav Форумчанин Регистрация: 16.04.2010 Сообщений: 695	а кусок примера можете выложить? Единственный способ стать умнее, играть с более умным противником...

10.05.2012, 14:25	#3
IgorGO Новичок СтарожилДжуниор Регистрация: 05.02.2008 Сообщений: 9,487	Код: `ActiveWorkbook.Names.Add Name:="Даты", RefersTo:="=OFFSET(" & ActiveSheet.Name & "!$A$11,0,0,COUNTA(" & ActiveSheet.Name & "!$A$10:$A$65000),1)"` Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете

10.05.2012, 14:27	#4
Казанский Старожил Регистрация: 31.12.2010 Сообщений: 2,133	Может, апострофы добавить, а то вдруг имя листа сложное: Код: `RefersTo:="=OFFSET('" & ActiveSheet.Name & "'!$A$11,0,0,COUNTA('" & ActiveSheet.Name & "'!$A$10:$A$65000),1)"` exceleved@yandex.ru Яндекс.Деньги: 410011500007619 Последний раз редактировалось Казанский; 10.05.2012 в 14:32.

10.05.2012, 14:55	#5
VictorM Старожил Регистрация: 15.05.2008 Сообщений: 2,058	IgorGO, Казанский, большое спасибо за столь быстрые ответы. "Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь" "Большое спасибо" - Z261597841314, R208907249777, U447361470499

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Переменная как имя книги	vefer	Microsoft Office Excel	1	13.10.2011 22:32
Узнать имя листа, если известно кодовое имя	tae1980	Microsoft Office Excel	3	20.03.2011 21:57
Переменная в формуле кода VBA	VictorM	Microsoft Office Excel	9	30.08.2010 12:29
Помогите с адресацией листа в формуле	ABCOz	Microsoft Office Excel	2	09.09.2009 13:38
Задать имя столбца в формуле	Posokhoff	Microsoft Office Excel	1	25.10.2007 20:08