powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / List view
2 сообщений из 2, страница 1 из 1
List view
    #36145028
oldzas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
подниму старую тему, но я в vba нуб, поэтому поднимаю.

есть listview, надо в 1 столобике: если в ячейке написано "задача" выделить ее одним цветом, а если "задание" то другим.......

я нашел код

For i = 1 To ListView1.ListItems.Count
If ListView1.ListItems(i).SubItems(1) = "**" Then
ListView1.ListItems.Item(i).ForeColor = vbBlue
ListView1.ListItems.Item(i).Bold = True
End If
Next


что тут надо исправить ???
...
Рейтинг: 0 / 0
List view
    #36145493
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
oldzasподниму старую тему, но я в vba нуб, поэтому поднимаю.

есть listview, надо в 1 столобике: если в ячейке написано "задача" выделить ее одним цветом, а если "задание" то другим.......

я нашел код

что тут надо исправить ???

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
For i =  1  To ListView1.ListItems.Count
Select Case ListView1.ListItems(i).SubItems( 1 ) 
  Case "задача"
    ListView1.ListItems.Item(i).ForeColor = vbBlue
  Case "задание"
    ListView1.ListItems.Item(i).ForeColor = vbRed
End Select
Next
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / List view
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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