ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как найти значение в первом столбце
3 сообщений из 3, страница 1 из 1
Как найти значение в первом столбце
    #39011298
Фотография Myst
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Myst
Участник
Добрый день!
Как можно найти значение в столбце A в строке, где находится первое вхождение искомого значения в столбце C
Например, надо найти в какой строке в столбце C значение значение "Красный" (скажем в 10й) и выдать значение ячейки A10

Код: vbnet
1.
2.
3.
4.
Public Function GrFind (gr As String)
GrFind = ActiveSheet.Range("A" & Match(gr, "C1:C150", 0)).Value
End Function
так не работает
...
Рейтинг: 0 / 0
20.07.2015, 13:23
| Ответить | Цитировать | Написать  
Как найти значение в первом столбце
    #39011309
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
Myst,
Код: vbnet
1.
GrFind = ActiveSheet.Range("A" & Match(gr, Range("C1:C150"), 0)).Value



Хотя правильнее будет так:
Код: vbnet
1.
2.
3.
4.
5.
Dim h
h = Application.Match(gr, Range("C1:C150"), 0)
If Not IsError(h) Then
    MsgBox Range("A" & h).Value
End If
...
Рейтинг: 0 / 0
20.07.2015, 13:27
| Ответить | Цитировать | Написать  
Как найти значение в первом столбце
    #39011323
Фотография Myst
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Myst
Участник
The_Prist, благодарю
...
Рейтинг: 0 / 0
20.07.2015, 13:35
| Ответить | Цитировать | Написать  
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как найти значение в первом столбце
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]