Выделение цветом определенной ячейки

@alenka012 · Регистрация: 10.10.2009

Студворк — интернет-сервис помощи студентам

Реально ли сделать так, что при нажатии на определенную кнопку на форме - в таблице определенное значение выделялось красным цветом? не все поле в данной графе, а только определенное поле !?

@Sk · 04.05.2018, 16:37

Eugene-LS, хорошо, спасибо.

А не подскажете, почему данный код может не работать? То есть, когда я делала базу с нуля чисто для проверки этого кода, но с соблюдением всех особенностей моей реальной базы, у меня все работало. А в реальной ничего не происходит и ошибку не выдает. Поля, формы, связи, вся структура - все одинаковое. Только в реальной базе просто больше этих полей, форм, запросов и так далее..

@Eugene-LS · 04.05.2018, 16:41

Сообщение от Angie

А в реальной ничего не происходит и ошибку не выдает. Поля, формы, связи, вся структура - все одинаковое. Только в реальной базе просто больше этих полей, форм, запросов и так далее..

Ух!
Тут примерчик бы посмотреть, с описанием где и что не так (на каком событии).
Так, извините, не понятно пока.

@glsn · 05.05.2018, 18:38

mobile, если просматриваете данный топик можете еще подсказать, пожалуйста, следующее: у меня есть условное форматирование на текстовые поля (банально - если условие выполнено - текст красный) при этом на всех данных полях нет доступа и стоит блокировка, но вот почему то для полей где условия форматирования выполнено (применено) - доступ открывается и блокировки нет. Почему так выходит? можно ли как то все поля закрыть для входа мыши (т.е. для всех полей сделать одинаково)?

mobile · 05.05.2018, 22:24

glsn, это особенность условного форматирования конструктора форм. В нем предполагается, что свойство Enabled (Доступ), равное False может быть только как альтернатива для невыполненного условия.

А вот в программно устанавливаемом УФ таких ограничений нет. И можно задавать любой доступ всем полям. Так что если хотите не давать доступ, то переходите на программное условное форматирование. Примеров по форуму много. Искать по ключевому слову FormatConditions.

Добавлено через 6 минут

Сообщение от mobile

Примеров по форуму много. Искать по ключевому слову FormatConditions.

Да и искать не надо. Прямо в этом же топике выше есть примеры

@Sk · 07.05.2018, 11:28

Eugene-LS, удалила все лишнее, максимально облегчила базу, прикладываю.

Основная форма - "фПоискТрПоФИО".
Выбираем в выпадающем списке, например, ФИО Дубина. Появляется подчиненная форма "фпПоискТрПоФИО", где задано условие, что если длительность "00:00", а снаряжение "И", то длительность в этой подчиненной форме выделяется красным цветом.
Мне нужно, чтобы во второй подчиненной форме "фпСтатистикаФИО" (внизу), "Общее время в И" выделялось бы тоже красным при выполнении аналогичного условия из первой подчиненной формы. Для этого, как подсказал уважаемый mobile в ответе #14, в загрузку подчиненной формы "фпСтатистикаФИО" я добавила такой код (который прекрасно у меня сработал, когда я делала проверочную базу с нуля):

Visual Basic
1
2
3
4
5
6
7
Private Sub Form_Load()
With Me![ДлитОбщ]
.FormatConditions.Delete
.FormatConditions.Add acExpression, , "Form.Parent!фпПоискТрПоФИО!ДлитРасчет = '00:00' and Form.Parent!фпПоискТрПоФИО!СнаряжениеТренировка = 'И'"
.FormatConditions(0).ForeColor = RGB(255, 0, 0)
End With
End Sub

Но почему-то в приложенном примере не получается. Наверняка упустила что-то очевидное, но столько всего перепробовала, что уже не знаю.
Спасибо

@Eugene-LS · 07.05.2018, 12:47

Сообщение от Angie

удалила все лишнее, максимально облегчила базу, прикладываю.

Пока не разбирался, извините за подробность, занят своей текучкой (Отчётность в ФОМС).
НО! - сразу вижу:
Form.Parent!фпПоискТрПоФИО!ДлитРасчет = '00:00' and Form.Parent!фпПоискТрПоФИО!СнаряжениеТре нировка = 'И'"

Это ссылка в никуда!

Добавлено через 12 минут
mobile, а условное форматирование не кодом, а в форме и "жёстко" девушке было трудно показать?

Она теперь путается, а мне некогда.
Разберись пожалуйста - там ей источник данных во второй подчинённой форме только подправить + добавить условие форматирования (не кодом желательно).

@Sk · 07.05.2018, 14:02

Сообщение от Eugene-LS

Это ссылка в никуда

почему?

а эта?

Сообщение от mobile

Пишем код в фПодчин2, используя свойство Parent для обращения к другой подформе

PureBasic
1
2
3
4
5
6
With Me![Общая длительность]
........................................
.FormatConditions.Add acExpression, , "Form.Parent!фПодчин1!Длительность='00:00' " & _
" And Form.Parent!фПодчин1!Значение = 'А'"
........................................
End With

А почему у меня работает другой пример, в котором все так же? (прикладываю. Там тот же ФИО Дубин).

Сообщение от Eugene-LS

форме и "жёстко" девушке было трудно показать

а при чем здесь пол? Мне нужно в коде разобраться.

Сообщение от Eugene-LS

там ей источник данных во второй подчинённой форме только подправить

не понимаю, какой. Опять же в новой бд работает..

Понимаю, что нет времени. Если вдруг появится, буду признательна.

@Eugene-LS · 07.05.2018, 16:41

Сообщение от Angie

Если вдруг появится, буду признательна.

Полюбопытствовал вашу БД1.rar
Нет там того восхитительного, о чём писали выше.
(Не обнаружил, к сожалению)

Добавлено через 9 минут

Сообщение от Angie

Но почему-то в приложенном примере не получается. Наверняка упустила что-то очевидное, но столько всего перепробовала, что уже не знаю.
Спасибо

В прошлом примере, вы через Parent обращались к записи главной формы (она всего одна) и всё работает.
В новом варианте вы обращаетесь к записи подчинённой формы, а их несколько.
Вот и всё.

Добавлено через 2 минуты
Angie, попробую ... но пока результата не обещаю
- "Не говори Гоп! - пока не перпригнул" ....

Добавлено через 27 минут
А пока:
https://www.youtube.com/watch?... TbLPvYBK7E
Al Bano & Romina Power - Sharazan
Старое, доброе, вечное ...

@Sk · 07.05.2018, 16:51

Сообщение от Eugene-LS

(Не обнаружил, к сожалению)

прикладываю скриншот из БД1, где у меня все работает.

Сообщение от Eugene-LS

В прошлом примере, вы через Parent обращались к записи главной формы (она всего одна) и всё работает.

нет, я обращалась к подчиненной (подчиненные я обозначаю фпИМЯ, а главные просто фИМЯ

Сообщение от Eugene-LS

НО! - сразу вижу:
Form.Parent!фпПоискТрПоФИО!ДлитРасчет = '00:00' and Form.Parent!фпПоискТрПоФИО!СнаряжениеТре нировка = 'И'"
Это ссылка в никуда!

здесь как раз обращение к подчиненной, аналогично тому, как в пробной БД1.

Сообщение от Eugene-LS

В новом варианте вы обращаетесь к записи подчинённой формы, а их несколько.

В двух примерах одинаковая структура: главная форма, а в ней две подчиненные, как здесь на схеме рисовала.

@Eugene-LS · 07.05.2018, 16:57

Сообщение от Angie

двух примерах одинаковая структура: главная форма, а в ней две подчиненные

Принято.

@Capi · 07.05.2018, 17:15

Сообщение от Angie

здесь как раз обращение к подчиненной

Visual Basic
1
Form.Parent!фпПоискТрПоФИО!ДлитРасчет

Нет здесь обращения к подчиненной, а есть какая-то бессмыслица.
Попробуйте:

Visual Basic
1
Parent.фпПоискТрПоФИО.Form.ДлитРасчет

@Eugene-LS · 07.05.2018, 17:21

Angie, так и рассчитайте то же самое поле "А" в источнике данных второй подчинёнки - добавьте туда старое поле, и будет работать по старому.
Кстати у вас поля "А" и "Х" не равны !
И почему поле "е" не заполнено - не понятно, а должно бы.

@Sk · 07.05.2018, 17:30

Сообщение от Capi

Нет здесь обращения к подчиненной, а есть какая-то бессмыслица.
Попробуйте:
Visual BasicВыделить код1
Parent.фпПоискТрПоФИО.Form.ДлитРасчет

не работает.

Это тоже бессмыслица?

Сообщение от mobile

Пишем код в фПодчин2, используя свойство Parent для обращения к другой подформе

PureBasic
1
2
3
4
5
6
With Me![Общая длительность]
........................................
.FormatConditions.Add acExpression, , "Form.Parent!фПодчин1!Длительность='00:00' " & _
" And Form.Parent!фПодчин1!Значение = 'А'"
........................................
End With

@Eugene-LS · 07.05.2018, 17:38

Angie, ну пока как то так!

@Sk · 07.05.2018, 17:42

Eugene-LS, вот теперь я совсем запуталась.
С полем А из пробной базы БД1 проблем нет, там все работает.

Мне нужно поле "Общее время в И" из базы "444" выделить красным шрифтом при определенных условиях. Оно не может быть равно никаким другим полям, потому что это общее время, т.е. общее количество часов по всем тренировкам. Мысль в том, что если где-то не введены данные, написано 00:00 и выделено красным, соответственно, посчитанное общее время будет некорректным, поэтому я тоже хотела его выделить красным.

Сообщение от Eugene-LS

И почему поле "е" не заполнено - не понятно, а должно бы.

это особенность базы, если данных нет, оно просто остается пустым

@Sk · 07.05.2018, 17:44

Сообщение от Eugene-LS

Angie, ну пока как то так!

у меня везде ошибки выпадают. "Неопределенная функция "Format" в выражении", а также везде в источниках записей пишет ошибку. Я что-то не так открываю?

Благодарю за Ваше время и помощь!

@Eugene-LS · 07.05.2018, 17:47

Angie, Ловите, вроде работает....
Вы кагда переименовываете обьекты формы - отражайте это и в коде.
Мне, старому дураку, нужно было с этого и начинать

shanemac51 · 07.05.2018, 17:52

Сообщение от Angie

Неопределенная функция "Format" в выражении

возможно есть битая ссылка в референсах

@Sk · 07.05.2018, 17:54

Eugene-LS, пока тоже ошибки, но я вижу, как Вы по-другому немного сделали, буду разбираться, спасибо

Добавлено через 30 секунд
shanemac51, да, так и есть, подправлю. Спасибо

@Eugene-LS · 07.05.2018, 18:04

Сообщение от shanemac51

возможно есть битая ссылка в референсах

Это я "на память" Option Explicit
Воткнул ...
Не думаю что не прав.

Новые блоги и статьи Все статьи Все блоги /
Nekobox - outbounds[0].transport: unknown transport type: raw damix 01.10.2026 Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .

@alenka012 3 / 3 / 0 Регистрация: 10.10.2009 Сообщений: 92

	Выделение цветом определенной ячейки 28.02.2012, 15:30. Показов 19331. Ответов 113 Метки нет (Все метки) Реально ли сделать так, что при нажатии на определенную кнопку на форме - в таблице определенное значение выделялось красным цветом? не все поле в данной графе, а только определенное поле !? 0

@Sk 6 / 6 / 1 Регистрация: 10.03.2016 Сообщений: 304
	04.05.2018, 16:37
	Eugene-LS, хорошо, спасибо. А не подскажете, почему данный код может не работать? То есть, когда я делала базу с нуля чисто для проверки этого кода, но с соблюдением всех особенностей моей реальной базы, у меня все работало. А в реальной ничего не происходит и ошибку не выдает. Поля, формы, связи, вся структура - все одинаковое. Только в реальной базе просто больше этих полей, форм, запросов и так далее.. 0

@glsn 604 / 127 / 45 Регистрация: 12.04.2015 Сообщений: 519
	05.05.2018, 18:38
	mobile, если просматриваете данный топик можете еще подсказать, пожалуйста, следующее: у меня есть условное форматирование на текстовые поля (банально - если условие выполнено - текст красный) при этом на всех данных полях нет доступа и стоит блокировка, но вот почему то для полей где условия форматирования выполнено (применено) - доступ открывается и блокировки нет. Почему так выходит? можно ли как то все поля закрыть для входа мыши (т.е. для всех полей сделать одинаково)? 0

@Eugene-LS 13269 / 5946 / 1529 Регистрация: 05.10.2016 Сообщений: 16,640
	07.05.2018, 17:21
	Angie, так и рассчитайте то же самое поле "А" в источнике данных второй подчинёнки - добавьте туда старое поле, и будет работать по старому. Кстати у вас поля "А" и "Х" не равны ! И почему поле "е" не заполнено - не понятно, а должно бы. 0

@Sk 6 / 6 / 1 Регистрация: 10.03.2016 Сообщений: 304
	07.05.2018, 17:54
	Eugene-LS, пока тоже ошибки, но я вижу, как Вы по-другому немного сделали, буду разбираться, спасибо Добавлено через 30 секунд shanemac51, да, так и есть, подправлю. Спасибо 0