Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
245 / 55 / 6
Регистрация: 05.08.2010
Сообщений: 222

Ячейки в формуле

12.07.2011, 16:07. Показов 1492. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем доброго времени суток. Вот появился такой несложный вопрос: есть ячейка(эксель) в ней формула. Можно ли программно выцепить адреса ячеек, от которых напрямую зависит ячейка?
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
12.07.2011, 16:07
Ответы с готовыми решениями:

Возможно ли в формуле определить, что в какой-то другой ячейки забита формула или нет?
Возможно ли в формуле определить, что в какой-то другой ячейки забита формула или нет? Без...

Замена номера ячейки в формуле
Добрый день! Нужна помощь. В excel есть лист, в котором ведется поиск ячеек с формулами. При...

Заполнить ячейки [a1] [a2] [a3 ] ... [a20] по формуле
Нужно заполнить ячейки ... a*n = 2 + (2 + a * n - 1 * a*n - 1) (2 * a * n - 1),,, a = 2 ,,, n =...

4
здесь больше нет...
3376 / 1674 / 184
Регистрация: 03.02.2010
Сообщений: 1,219
12.07.2011, 17:32
Лучший ответ Сообщение было отмечено как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
    Dim r As Range
    Set r = Range("A1")
    
    On Error Resume Next
    Dim rPr As Range
    Set rPr = r.DirectPrecedents.Cells
    If rPr Is Nothing Then Exit Sub
    
    Dim c As Range
    For Each c In rPr
        MsgBox c.Address(0, 0)
    Next c
3
245 / 55 / 6
Регистрация: 05.08.2010
Сообщений: 222
12.07.2011, 17:40  [ТС]
Спасибо, то, что надо. Я что то не заметил на первый взгляд это поле у ячейки.
0
735 / 203 / 11
Регистрация: 23.06.2011
Сообщений: 440
12.07.2011, 17:44
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Sub test()
   Dim rPrecItem As Range
   Dim lPrecRow As Long
   Dim lPrecCol As Long
   
   For Each rPrecItem In ActiveCell.DirectPrecedents
      lPrecRow = rPrecItem.Row
      lPrecCol = rPrecItem.Column
   Next
   
End Sub
0
245 / 55 / 6
Регистрация: 05.08.2010
Сообщений: 222
12.07.2011, 17:48  [ТС]
Все ок. Достаточно было написать просто .DirectPrecedents =) Просто никогда не заморачивался вообще с формулами. А тут вот понадобилось для удобного общения с пользователем, так сказать.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
12.07.2011, 17:48
Помогаю со студенческими работами здесь

Копировать ячейки столбца В, начиная с ячейки В7, с Листа2 на Лист1 до тех пор, пока сумма копируемых значений
Помогите пожалуйста! Копировать ячейки столбца В, начиная с ячейки В7, с Листа2 на Лист1 до тех...

Координата ячейки в Excel, взятые с другой ячейки
Добрый день! У мен ятакой вопрос: возможно ли сделать чтобы в координате ячейки значение столбца...

Изменения формата ячейки Excel средствами VBA в зависимости от значения другой ячейки
Здравствуйте. Столкнулся с проблемой. Необходимо на листе Excel Залить, предположим, ячейку "C4"...

Редактирование ячейки и перенос значения ячейки через форму
Доброго времени суток люди) Помогите чем сможете, всю голову уже изломали. Сначала хотели кнопку с...

Поменять цвет ячейки в зависимости от текста ячейки
Всем привет! помогите с задачкой! как в VBA реализовать заливку ячеек по содержимому УСО №25...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru