|
0 / 0 / 0
Регистрация: 06.06.2010
Сообщений: 88
|
|
В VBA Екселя нужно считать имя ячейки08.09.2010, 12:42. Показов 4933. Ответов 14
Метки нет (Все метки)
в VBA Екселя нужно считать имя ячейки, т.е. она у меня именованная. Как это сделать??? Заранее благодарен.
0
|
|
(| 08.09.2010, 12:42 | |
|
Ответы с готовыми решениями:
14
Возможно ли средствами VBA удалить уже существующее имя ячейки рабочего листа? Изменения формата ячейки Excel средствами VBA в зависимости от значения другой ячейки |
1124 / 237 / 37
Регистрация: 15.03.2010
Сообщений: 728
|
|
| 08.09.2010, 13:21 | |
|
MsgBox Range('a1').Name.Name по моему так
0
|
|
|
0 / 0 / 0
Регистрация: 06.06.2010
Сообщений: 88
|
|
| 08.09.2010, 13:26 [ТС] | |
|
спасибо! все правильно) только он еще пишет имя странички, а оно мне не нать)
0
|
|
|
0 / 0 / 1
Регистрация: 08.04.2009
Сообщений: 17
|
|
| 08.09.2010, 13:35 | |
|
если она у тебя текущая, то
Names(ActiveCell).Name если присвоить имя, например, ячейке B2, то по абсолютной ссылке что-то типа Names(ActiveWorkbook.ActiveSheet.Range(' B2')).Name
0
|
|
|
1124 / 237 / 37
Регистрация: 15.03.2010
Сообщений: 728
|
|
| 08.09.2010, 14:14 | |
|
Это потому, что у тебя имена описаны на уровне листа. Откуси имя листа, например так:
MsgBox Replace(Range('a1').Name.Name, ActiveSheet.Name & '!', '') и все дела.
0
|
|
|
1124 / 237 / 37
Регистрация: 15.03.2010
Сообщений: 728
|
|
| 08.09.2010, 14:21 | |
|
Да еще учти, если есть аналогичное имя уровня книги можешь попасть в неприятности(при подстановке имени в Range)
0
|
|
|
0 / 0 / 0
Регистрация: 06.06.2010
Сообщений: 88
|
|
| 08.09.2010, 17:01 [ТС] | |
|
спасибо. имя ячейки выделилось как надо, но если я пишу
Cells(a,b).Name.Name, то при обращении к неименованной страничке возникает ошибка. От нее можно как то избавиться?
0
|
|
|
0 / 0 / 0
Регистрация: 06.06.2010
Сообщений: 88
|
|
| 08.09.2010, 17:03 [ТС] | |
|
у меня в цикле бегает по ячейкам до именованной и по ней выход из цикла хотелось бы сделать
0
|
|
|
1124 / 237 / 37
Регистрация: 15.03.2010
Сообщений: 728
|
|
| 08.09.2010, 17:29 | |
|
Тогда наверное нужно по другому, может быть так:
MyName = 'Твое имя ячейки' For Each r In Range('a1:a10') If Not Intersect(Range('MyName'), r) Is Nothing Then Exit For Next
0
|
|
|
0 / 0 / 0
Регистрация: 06.06.2010
Сообщений: 88
|
|
| 09.09.2010, 10:11 [ТС] | |
|
Он ругается на это. Говорит 1004 ошибка.
Method 'Range' of object '_Global' failed
0
|
|
|
1124 / 237 / 37
Регистрация: 15.03.2010
Сообщений: 728
|
|
| 09.09.2010, 13:02 | |
|
If Not Intersect(Range('MyName'), r) Is Nothing Then Exit For
Виноват, нужно убрать кавычки. If Not Intersect(Range(MyName), r) Is Nothing Then Exit For
0
|
|
|
0 / 0 / 0
Регистрация: 06.06.2010
Сообщений: 88
|
|
| 09.09.2010, 13:14 [ТС] | |
|
Спасибо, все классно заработало)))
А там же можно сделать, чтобы когда цикл доходил до именованной ячейки я узнал ее адрес?
0
|
|
|
0 / 0 / 0
Регистрация: 06.06.2010
Сообщений: 88
|
|
| 09.09.2010, 13:20 [ТС] | |
|
я поставил внутри цикла счетчик. может это и кривовато, но ее адрес я таким образом получил
0
|
|
|
1124 / 237 / 37
Регистрация: 15.03.2010
Сообщений: 728
|
|
| 09.09.2010, 15:47 | |
|
Адрес именованной ячейки получить легко
Msgbox Range(MyName).address В цикле это делать не нужно, лишние затраты времени. Еще Range(MyName) лучше тоже вынести за цикл, написать Set R1=Range(MyName) и дальше подставить его в цикл. Удачи
0
|
|
|
0 / 0 / 0
Регистрация: 06.06.2010
Сообщений: 88
|
|
| 12.09.2010, 12:37 [ТС] | |
|
Спасибо))) Класс!!!
Как многого я еще не знаю((
0
|
|
| 12.09.2010, 12:37 | |
|
Помогаю со студенческими работами здесь
15
Нужно чтобы макрос обработал все файлы екселя в определенной папке Как из екселя считать данные Как из Васика помещая данные на лист Екселя можно изменить цвет ячейки? Оцените сборку пожалуйста. Нужно в основном считать считать и считать Ввести массив строк фамилию, имя и отчество. Нужно определить, какое имя является родным Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
||||
|
Как использовать Bluetooth-модуль HC-05 с Arduino
Wired 08.07.2025
Bluetooth - это технология, созданная чтобы заменить кабельные соединения. Обычно ее используют для связи небольших устройств: мобильных телефонов, ноутбуков, наушников и т. д. Работает она на частоте. . .
|
Руководство по структурам данных Python
AI_Generated 08.07.2025
Я отчетливо помню свои первые серьезные проекты на Python - я писал код, он работал, заказчики были относительно довольны. Но однажды мой наставник, взглянув на мою реализацию поиска по огромному. . .
|
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах
Programma_Boinc 08.07.2025
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах
Опубликовано: 07. 07. 2025
Рубрика: Uncategorized
Автор: AlexA
Статья размещается на сайте с разрешения. . .
|
Раскрываем внутренние механики Android с помощью контекста и манифеста
mobDevWorks 07.07.2025
Каждый Android-разработчик сталкивается с Context и манифестом буквально в первый день работы. Но много ли мы задумываемся о том, что скрывается за этими обыденными элементами? Я, честно говоря,. . .
|
API на базе FastAPI с Python за пару минут
AI_Generated 07.07.2025
FastAPI - это относительно молодой фреймворк для создания веб-API, который за короткое время заработал бешеную популярность в Python-сообществе. И не зря. Я помню, как впервые запустил приложение на. . .
|
|
Основы WebGL. Раскрашивание вершин с помощью VBO
8Observer8 05.07.2025
На русском
https:/ / vkvideo. ru/ video-231374465_456239020
На английском
https:/ / www. youtube. com/ watch?v=oskqtCrWns0
Исходники примера:
|
Мониторинг микросервисов с OpenTelemetry в Kubernetes
Mr. Docker 04.07.2025
Проблема наблюдаемости (observability) в Kubernetes - это не просто вопрос сбора логов или метрик. Это целый комплекс вызовов, которые возникают из-за самой природы контейнеризации и оркестрации. К. . .
|
Проблемы с Kotlin и Wasm при создании игры
GameUnited 03.07.2025
В современном мире разработки игр выбор технологии - это зачастую балансирование между удобством разработки, переносимостью и производительностью. Когда я решил создать свою первую веб-игру, мой. . .
|
Создаем микросервисы с Go и Kubernetes
golander 02.07.2025
Когда я только начинал с микросервисами, все спорили о том, какой язык юзать. Сейчас Go (или Golang) фактически захватил эту нишу. И вот почему этот язык настолько заходит для этих задач:
. . .
|
C++23, квантовые вычисления и взаимодействие с Q#
bytestream 02.07.2025
Я всегда с некоторым скептицизмом относился к громким заявлениям о революциях в IT, но квантовые вычисления - это тот случай, когда революция действительно происходит прямо у нас на глазах. Последние. . .
|