Поиск значения и переход к ячейке, VBA

Узнай цену своей работы

Формулировка задачи:

Доброго времени суток Я задолбалась не могу никак осуществить поиск по книге Excel такой, что первая ячейка с нужным значением активировалась бы. Задача: книга, в книге листы с названиями месяцев, на них по два столбца на каждую дату месяца, в заголовках, соответственно, сама дата стоит. Нужно: переход к первой встретившейся ячейке с сегодняшней датой. Чтобы просто перейти на лист и столбец к ней. Написала костыльный поиск листа через вытаскивание куска сегодняшней даты, получила имя листа, искала на нем. Пробовала так:
И так
И даже так (с range и без него)
И нифига не работает. Говорит, ошибка синтаксиса и все тут. Просто
ничего не выдает. Вообще. Просто как будто не запускала. Пробовала с Cstr и без него. По ходу, совсем дурочка. Помогите, пожалуйста.

Решение задачи: «Поиск значения и переход к ячейке, VBA»

textual
Листинг программы
Sub tt()
Name_sheet = "Sheet1"
Set r = Worksheets(Name_sheet).Range("A1:BK1").Find(Date, , xlValues)
If Not r Is Nothing Then r.Select
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 3.889 из 5