powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как сделать чтоб закрашивалось подстрочный текст
25 сообщений из 28, страница 1 из 2
Как сделать чтоб закрашивалось подстрочный текст
    #37359638
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем привет))). У меня два вопроса.
пред история: существует некий расчет (для примера упростил...), где в зависимости от данных используется 1я или 2я формула и соответственно должна появляться только одна формула, в 10 екселе сделал условное форматирование, закрашиванием ненужной формулы (что мне не очень нравится т.к. после этого остается пустое место, что не украшает расчет, а он сделан сразу в печать), но открыв в более поздней версии 2003, обнаружил что не закрашивается.

вопрос:

2) Можно ли как то по другому решить вопрос с убиранием не нужной формулы., например по условию форматирования скрывать строки с ненужной формулой?

p/s/ в примере для условного форматирования, условие в красном квадратике, должно быть пусто или не пусто.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37359693
Djon Player
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PlomBir1,

можно к примеру сделать два представления.
в первом случае скрыть первую формулу, вторая видима и создать одно представление
во втором случае создать скрыть вторую формулу и скрыть первую и создать второе представление.

Потом в зависимости от ситуации вызывать либо первое либо второе представление.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37359739
kuklp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
PlomBir1,

В модуль листа:
Код: plaintext
1.
2.
3.
Private Sub Worksheet_Change(ByVal Target As Range)
    Rows("5:6").Hidden = [ax1] = ""
    Rows("7:8").Hidden = Not Rows("5:6").Hidden
End Sub
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37360509
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не нужно много формул. Создать одну, если не на все случаи жизни, то хотя бы на все случаи расчетов :)
Покажите примеры формул, посоображаем.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37360781
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем спасибо). Пока поперивариваю)
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37369467
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем привет)
kuklp а как сделать что бы условие выполнялось на подобии функции (ИЛИ) когда несколько значений могут подходить, и только в этом случае скрывались строчки, в остальном не скрывались???

Private Sub Worksheet_Change(ByVal Target As Range)

Rows("5:6").Hidden = [ax1] = "" или [ax1] = 2 или [ax1] = 8

End Sub
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37369529
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PlomBir1, или это вообще-то Or
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370658
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ципихович Эндрю,

спасибо пробовал я or не получилось, поэтому и написал сюда. Я же не гений VBA я только учусь, а Вы прям так, ... это же бубль гум... )))
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370722
kuklp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Что значит не получилось?
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370724
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
принципе хотел вот такую вот строчку преобразовать

ЕСЛИ(ИЛИ(D22=Потребители!$B$52;D22=Потребители!$B$53;D22=Потребители!$B$54)


Private Sub Worksheet_Change(ByVal Target As Range)

Rows("23:24").Hidden = [D22] <> [Потребители!B52] Or [D22] <> [потребители!B53] Or [D22] <> [потребители!B54]

End Sub

но не получается!
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370741
kuklp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
PlomBir1,

И почему пишете <> ? В формуле у Вас =.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370749
kuklp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Может это надо:
Rows("23:24").Hidden = not ([D22] = [Потребители!B52] Or [D22] = [потребители!B53] Or [D22] = [потребители!B54])
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370819
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо вот что я пытаюсь сделать с примером: нужно чтобы строчка 4,5 была открыта если в строке 3 название "другое.." но только в этом случае.

ps не обращайте внимание на беленькие квадратики (кнопки) , не знаю как их удалить сразу,
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370916
kuklp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ну и что не так?
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370930
kuklp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
kuklp,
Так, я же предлагал до этого.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37370996
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
надо чтобы наоборот, они не закрывались, т.е. они всегда закрыты и открываются только при "другое.."

когда "другое.." 3 строки открыто
когда "такое вот секое.." 1 строчка открыта
)
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37371176
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
поэтому я и ставлю не равенство <> типо если не равно то закрываются.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37371235
kuklp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
PlomBir1,

Вы файл от сегодня, 14:09 смотрели?
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37371240
kuklp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
kuklp,

Мда, не тот файл прикрепился.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37371247
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kuklp,

да) смотрел, там все классно но только там при заданных условиях строчка закрывается а мне нужно наоборот чтоб она открывалась( когда появляется"другое.."), сижу пробую меняю и так и сяк, то ошибка то не действует. Помогите.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37371251
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
так и подумал)))
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37371284
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
СУПЕР!!! БОЛЬШОЕ СПАСИБО!!! ВСЕ ПОЛУЧИЛОСЬ!
теперь переделаю 22 листа) в каждом по 5-7 таких моментов)
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37371385
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PlomBir1Всем привет))). У меня два вопроса.
пред история: существует некий расчет (для примера упростил...), где в зависимости от данных используется 1я или 2я формула и соответственно должна появляться только одна формула, в 10 екселе сделал условное форматирование, закрашиванием ненужной формулы (что мне не очень нравится т.к. после этого остается пустое место, что не украшает расчет, а он сделан сразу в печать), но открыв в более поздней версии 2003, обнаружил что не закрашивается.короче, я делаю так
например, формула для расчета 1 выглядит так =СУММ(C1:C3)
а формула для расчета 2 выглядит так =СРЗНАЧ(C1:C3)
пишу формулу вида =ЕСЛИ(A1="расчет 1";СУММ(C1:C3);СРЗНАЧ(C1:C3))
в ячейке A1, как можно догадаться должно стоять "расчет 1" или "расчет 2".

Часто бывает так, что форма с данным отчетом должна распечатываться "как есть" и в ней не предполагается присутствия никаких посторонних записей в ячейках. тем более, в A1. Тогда внедряем объект COMBOBOX на форму, ставим галочку "не выводить на печать" и в строке свойств LinkedCell прописываем ячейку на скрытой области листа. результат комбобокса будет отражен в ней по изменению последнего. на эту ячейку (а не на A1 и ориентируем приведенную выше формулу.
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37371396
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PlomBir1СУПЕР!!! БОЛЬШОЕ СПАСИБО!!! ВСЕ ПОЛУЧИЛОСЬ!
теперь переделаю 22 листа) в каждом по 5-7 таких моментов)причем, в моем варианте, заметьте, размноджить это хозяйство на 22 листа дело 5 минут. просто выделить их все и ввести на одном формулу: она скопируется на все листы (если они одинаковой структуры, конечно). комбобокс внедрить также просто - тупо коипрованием. на всю процедуру - полчаса работы + никаких макросов, никакой несовмекстимости версий. единственный минус - длинные формулы. зато 1 раз сделал и забыл
...
Рейтинг: 0 / 0
Как сделать чтоб закрашивалось подстрочный текст
    #37372126
Фотография PlomBir1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, попробовал) но я не знаю что такое combobox? что он делает и как его включить(
Можно пример?
...
Рейтинг: 0 / 0
25 сообщений из 28, страница 1 из 2
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как сделать чтоб закрашивалось подстрочный текст
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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