Страницы: 1
RSS
Макрос для присвоения имени ячейки
 
Помогите создать макрос который переименует ячеку согласно примеру. Масив переименования должен быть  А1:АС10000. Вручную зделать ето нереально.
 
dtrey, и на что должен быть переименован этот массив?
ЗЫ Используйте макрорекордер+цикл. Первая часть.
Скрытый текст
Изменено: JayBhagavan - 01.10.2014 15:31:20

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
Не масив должен переименоватся, а ячейки которие в нем находятся.  
 
зачем вам это? если не секрет.
 
хочу зделать аналог во етого
http://www.budget-excel.ru/blog/detail.php?ID=869
 
dtrey, макросу надо передать во что он, из всего указанного Вами диапазона, будет переименовывать? Вам надо именно массиву присвоить имя или каждой ячейке в массиве? Туго с конкретикой.

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
JayBhagavan для каждой ячейки походу. а имена по алфавиту там в файле в выделенной области имена уже есть, я так понимаю по такому образцу для диапазона  А1:АС10000.
по моему такое к-во имен значительно утяжелит файл. :)
 
V, теперь понял. Ранее меня смутила ячейка с именем в D5. На 29 столбцов хватит кириллических букв, только как в ВБА будет выглядеть аналог функции СИМВОЛ()?

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
Код
Sub cells_new_name()
    cyr = Split("А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ъ Ы Ь Э Ю Я")
    For i = 1 To 29
        For j = 1 To 1000
            ActiveWorkbook.Names.Add Name:=cyr(i - 1) & j, RefersTo:="='" & ActiveSheet.Name & "'!" & Cells(j, i).Address()
        Next j
    Next i
End Sub

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
Цитата
JayBhagavan пишет: как в ВБА будет выглядеть аналог функции СИМВОЛ()?
Не это? Chr(здесь номер символа)
 
Юрий М, спасибо. Запомню. :)

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
Страницы: 1
Читают тему
Наверх