Имена ячеек - Microsoft Office Excel - Страница 3

Foxx · 19.03.2010, 08:24

Да. У меня все получилось, поразбирался. Спасиба Вам еще раз Огромное!

Adeletto · 26.04.2010, 16:49

Здравствуйте! Подскажите пожалуйста, а как написать код, который присваивал бы ячейкам в столбце "C" имена указанные в столбце "B" той же строки?

SAS888 · 27.04.2010, 05:33

Вашу задачу решит следующий макрос:

Код:

Sub Main()
    Dim i As Long
    For i = 1 To Cells(Rows.Count, 2).End(xlUp).Row
        If Cells(i, 2) <> "" Then Cells(i, 3).Name = Cells(i, 2)
    Next
End Sub

Если требуется, чтобы имена присваивались автоматически, по изменению значений в столбцах "B" или "C", то нужно запускать этот макрос по соответствующим событиям.

Adeletto · 27.04.2010, 10:41

Большое спасибо! Вы снова меня выручили

27.04.2010, 05:33	#23
SAS888 Старожил Регистрация: 05.12.2007 Сообщений: 4,180	Вашу задачу решит следующий макрос: Код: `Sub Main() Dim i As Long For i = 1 To Cells(Rows.Count, 2).End(xlUp).Row If Cells(i, 2) <> "" Then Cells(i, 3).Name = Cells(i, 2) Next End Sub` Если требуется, чтобы имена присваивались автоматически, по изменению значений в столбцах "B" или "C", то нужно запускать этот макрос по соответствующим событиям. Чем шире угол зрения, тем он тупее. Последний раз редактировалось SAS888; 27.04.2010 в 07:54.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
как разделить значения ячеек по формату ячеек?	ARIRAN	Microsoft Office Excel	6	11.12.2009 15:30
макрос - подсчитать для каждой строки кол-во ячеек с «+», кол-во ячеек с «-»	Vadim_abs	Microsoft Office Excel	36	14.07.2009 12:08
имена файлов	Tirendus	БД в Delphi	1	01.04.2009 20:49
Имена хостов :(	InseR	Работа с сетью в Delphi	1	04.07.2007 12:15

19.03.2010, 08:24	#21
Foxx Форумчанин Регистрация: 23.07.2009 Сообщений: 181	Да. У меня все получилось, поразбирался. Спасиба Вам еще раз Огромное!

27.04.2010, 10:41	#24
Adeletto Пользователь Регистрация: 15.04.2010 Сообщений: 12	Большое спасибо! Вы снова меня выручили