Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Найти первое значение в столбце на определенном месте - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Найти первое значение в столбце на определенном месте (Макросы/Sub)
Найти первое значение в столбце на определенном месте
lapin9126 Дата: Воскресенье, 07.05.2017, 12:57 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 33
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Здравствуйте, как средствами VBA на активном листе, в колонке F, найти первое значение 07: в ячейке стоящее на определенном месте. То есть, в ячейках есть данные следующего вида 06:07:11:00, 06:23:10:07, 06:12:07:00, 07:07:42:04, как найти "07:" которое будет расположено впереди значения (07:07:42:04) и перейти на ячейку со смещением в первый столбец? Если найдена ячейка F46, то нужно перейти в A46.
К сообщению приложен файл: _-4.xlsx(24Kb)
 
Ответить
СообщениеЗдравствуйте, как средствами VBA на активном листе, в колонке F, найти первое значение 07: в ячейке стоящее на определенном месте. То есть, в ячейках есть данные следующего вида 06:07:11:00, 06:23:10:07, 06:12:07:00, 07:07:42:04, как найти "07:" которое будет расположено впереди значения (07:07:42:04) и перейти на ячейку со смещением в первый столбец? Если найдена ячейка F46, то нужно перейти в A46.

Автор - lapin9126
Дата добавления - 07.05.2017 в 12:57
Manyasha Дата: Воскресенье, 07.05.2017, 13:06 | Сообщение № 2
Группа: Модераторы
Ранг: Старожил
Сообщений: 1823
Репутация: 765 ±
Замечаний: 0% ±

Excel 2007, 2010
lapin9126, здравствуйте, так пойдет?
[vba]
Код
Sub tt()
    Dim x As Range
    Set x = Columns("F:F").Find(What:="07:*", After:=[f1], LookAt:=xlWhole)
    If Not x Is Nothing Then Cells(x.Row, 1).Select
End Sub
[/vba]
К сообщению приложен файл: -4-1.xlsm(31Kb)


marinamorozova_box@mail.ru
ЯД: 410013299366744 WM: R193491431804
 
Ответить
Сообщениеlapin9126, здравствуйте, так пойдет?
[vba]
Код
Sub tt()
    Dim x As Range
    Set x = Columns("F:F").Find(What:="07:*", After:=[f1], LookAt:=xlWhole)
    If Not x Is Nothing Then Cells(x.Row, 1).Select
End Sub
[/vba]

Автор - Manyasha
Дата добавления - 07.05.2017 в 13:06
lapin9126 Дата: Воскресенье, 07.05.2017, 13:12 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 33
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Manyasha, Огромное спасибо respect
 
Ответить
СообщениеManyasha, Огромное спасибо respect

Автор - lapin9126
Дата добавления - 07.05.2017 в 13:12
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Найти первое значение в столбце на определенном месте (Макросы/Sub)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2017 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!