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

Вход

Регистрация

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

 

= Мир MS Excel/Строка в зависимости от ячейки - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Строка в зависимости от ячейки
ilikeread Дата: Понедельник, 02.09.2013, 15:54 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 56
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте уважаемые.

Возможно ли вставлять строки в зависимости от заполненности определённой ячейки?
В приложенном файлике ячейка F3 на первом листе имеет значение 0. строки стоят на своих местах.

На листе 2 визуально ожидаемый результат. если мы ставим в F3 число отличное от 0 то между строками возникает дополнительная строка с текстовым значением.

Извиняюсь если коряво написал.
Не представляю как это реализовать, поэтому пишу тут, если это реализуется через VBA прошу модеров перенести тему.

Заранее спасибо
К сообщению приложен файл: Insert_ROW.xls (27.0 Kb)
 
Ответить
СообщениеЗдравствуйте уважаемые.

Возможно ли вставлять строки в зависимости от заполненности определённой ячейки?
В приложенном файлике ячейка F3 на первом листе имеет значение 0. строки стоят на своих местах.

На листе 2 визуально ожидаемый результат. если мы ставим в F3 число отличное от 0 то между строками возникает дополнительная строка с текстовым значением.

Извиняюсь если коряво написал.
Не представляю как это реализовать, поэтому пишу тут, если это реализуется через VBA прошу модеров перенести тему.

Заранее спасибо

Автор - ilikeread
Дата добавления - 02.09.2013 в 15:54
MCH Дата: Понедельник, 02.09.2013, 16:07 | Сообщение № 2
Группа: Админы
Ранг: Старожил
Сообщений: 2004
Репутация: 752 ±
Замечаний: ±

Может быть подойдет Условное форматирование закрашивающее белым цветом текст в A11 если в F3 значение равно нулю, либо в A11 проверка формулой:
Код
=ЕСЛИ(F3<>0;"строка 1,5 бла бла (Значение ячейки F3) бла";"")

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


Сообщение отредактировал MCH - Понедельник, 02.09.2013, 16:19
 
Ответить
СообщениеМожет быть подойдет Условное форматирование закрашивающее белым цветом текст в A11 если в F3 значение равно нулю, либо в A11 проверка формулой:
Код
=ЕСЛИ(F3<>0;"строка 1,5 бла бла (Значение ячейки F3) бла";"")

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

Автор - MCH
Дата добавления - 02.09.2013 в 16:07
Michael_S Дата: Понедельник, 02.09.2013, 16:10 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
Возможно ли вставлять строки
возможно. Но только при помощи VBA.
Задача несложная, но пример слишком упрощен - если сделать по нему, наверняка раз сто придется переделывать...
 
Ответить
Сообщение
Возможно ли вставлять строки
возможно. Но только при помощи VBA.
Задача несложная, но пример слишком упрощен - если сделать по нему, наверняка раз сто придется переделывать...

Автор - Michael_S
Дата добавления - 02.09.2013 в 16:10
ilikeread Дата: Понедельник, 02.09.2013, 16:20 | Сообщение № 4
Группа: Пользователи
Ранг: Участник
Сообщений: 56
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
MCH,
я на эту тему думал. Если закрашивать визуально будет пустая строка разрыв - некрасиво.

Michael_S,
пример упростил для того чтоб файл можно было прикрепить. если дадите адрес кину версию пополнее.
Вообще то это у меня КП. В ячейку вбиваю скидку.
и соответственно если она есть то появляется строка типа " Коммерческое предложение выставлено с учетом скидки (значение ячейки) процентов."
Если нет скидки, то нет и строки соответственно.
 
Ответить
СообщениеMCH,
я на эту тему думал. Если закрашивать визуально будет пустая строка разрыв - некрасиво.

Michael_S,
пример упростил для того чтоб файл можно было прикрепить. если дадите адрес кину версию пополнее.
Вообще то это у меня КП. В ячейку вбиваю скидку.
и соответственно если она есть то появляется строка типа " Коммерческое предложение выставлено с учетом скидки (значение ячейки) процентов."
Если нет скидки, то нет и строки соответственно.

Автор - ilikeread
Дата добавления - 02.09.2013 в 16:20
Michael_S Дата: Понедельник, 02.09.2013, 16:54 | Сообщение № 5
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
если дадите адрес кину версию пополнее.

Кидайте сюда. Постарайтесь уложиться в 100 кБ. Не обязательно я, кто нибудь поможет.
Можете и мне на почту - то тогда только на платной основе.
Для вашего примера можно так (в модуль листа)
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$3" Then Rows("11:11").Hidden = [f3] = 0
End Sub
[/vba]

Добавил пример
К сообщению приложен файл: Insert_ROW-1-.xls (66.0 Kb)


Сообщение отредактировал Michael_S - Вторник, 03.09.2013, 14:59
 
Ответить
Сообщение
если дадите адрес кину версию пополнее.

Кидайте сюда. Постарайтесь уложиться в 100 кБ. Не обязательно я, кто нибудь поможет.
Можете и мне на почту - то тогда только на платной основе.
Для вашего примера можно так (в модуль листа)
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$3" Then Rows("11:11").Hidden = [f3] = 0
End Sub
[/vba]

Добавил пример

Автор - Michael_S
Дата добавления - 02.09.2013 в 16:54
ilikeread Дата: Вторник, 03.09.2013, 14:51 | Сообщение № 6
Группа: Пользователи
Ранг: Участник
Сообщений: 56
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Спасибо.
Логику я понял. мы показываем или скрываем строку в зависимости от того заполнена или нет ячейка.

Но в данном случае мы привязаны к конкретной строке.
у меня же строка будет меняться в зависимости от высоты таблицы.
Как отвязать команду от конкретной строки? Или вернее она должна быть привязана к конкретной строке строке но с изменяющимися координатами.
 
Ответить
СообщениеСпасибо.
Логику я понял. мы показываем или скрываем строку в зависимости от того заполнена или нет ячейка.

Но в данном случае мы привязаны к конкретной строке.
у меня же строка будет меняться в зависимости от высоты таблицы.
Как отвязать команду от конкретной строки? Или вернее она должна быть привязана к конкретной строке строке но с изменяющимися координатами.

Автор - ilikeread
Дата добавления - 03.09.2013 в 14:51
Michael_S Дата: Вторник, 03.09.2013, 15:18 | Сообщение № 7
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
Если эта строка одна, то можно примерно так
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$F$3" Then
            Rows(Cells.Find("скидка").Row & ":" & Cells.Find("скидка").Row).Hidden = [f3] = 0
    End If
End Sub
[/vba]
Здесь "скидка" - ключевое слово в ячейке.
 
Ответить
СообщениеЕсли эта строка одна, то можно примерно так
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$F$3" Then
            Rows(Cells.Find("скидка").Row & ":" & Cells.Find("скидка").Row).Hidden = [f3] = 0
    End If
End Sub
[/vba]
Здесь "скидка" - ключевое слово в ячейке.

Автор - Michael_S
Дата добавления - 03.09.2013 в 15:18
ilikeread Дата: Вторник, 03.09.2013, 15:46 | Сообщение № 8
Группа: Пользователи
Ранг: Участник
Сообщений: 56
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Спасибо . работает.
 
Ответить
СообщениеСпасибо . работает.

Автор - ilikeread
Дата добавления - 03.09.2013 в 15:46
  • Страница 1 из 1
  • 1
Поиск:

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