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

Вход

Регистрация

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

 

= Мир MS Excel/Запуск макроса при изменении значения, рассчитанного по форм - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Запуск макроса при изменении значения, рассчитанного по форм (Макросы/Sub)
Запуск макроса при изменении значения, рассчитанного по форм
Jmurik Дата: Понедельник, 23.06.2014, 11:22 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 11
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
господа, подскажите, и помогите мне.

Есть выпадающий список, при выборе в котором определенных значений должен скрываться ряд (причем строки не всегда следуют друг за другом). Я кое как смог сделать то, что мне нужно и привязал макрос к ячейкам, рассчитывающим значения по формуле, но в таком случае макрос не запускается.

Буду благодарен за любую помощь, т.к. для меня VBA - темный лес и я делаю только самые первые шаги. Файл с примером прикрепляю.
К сообщению приложен файл: 5626478.xls (98.0 Kb)


Сообщение отредактировал Jmurik - Понедельник, 23.06.2014, 11:27
 
Ответить
Сообщениегоспода, подскажите, и помогите мне.

Есть выпадающий список, при выборе в котором определенных значений должен скрываться ряд (причем строки не всегда следуют друг за другом). Я кое как смог сделать то, что мне нужно и привязал макрос к ячейкам, рассчитывающим значения по формуле, но в таком случае макрос не запускается.

Буду благодарен за любую помощь, т.к. для меня VBA - темный лес и я делаю только самые первые шаги. Файл с примером прикрепляю.

Автор - Jmurik
Дата добавления - 23.06.2014 в 11:22
Матраскин Дата: Понедельник, 23.06.2014, 12:24 | Сообщение № 2
Группа: Друзья
Ранг: Обитатель
Сообщений: 375
Репутация: 81 ±
Замечаний: 0% ±

20xx
Jmurik, не понял, что именно надо сделать, но по названию поста вот вам вариант
К сообщению приложен файл: 4080497.xls (27.0 Kb)


в интернете опять кто-то не прав
 
Ответить
СообщениеJmurik, не понял, что именно надо сделать, но по названию поста вот вам вариант

Автор - Матраскин
Дата добавления - 23.06.2014 в 12:24
_Boroda_ Дата: Понедельник, 23.06.2014, 12:40 | Сообщение № 3
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16666
Репутация: 6478 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Может, Вам так нужно? Попробуйте
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
     Dim r As Range
     If Target.Address = "$B$26" Then
         Application.ScreenUpdating = False
         For Each r In [AE1:AE48]
             r.EntireRow.Hidden = r.Value > [I3].Value
         Next r
         For Each r In [G21:G25]
             r.EntireRow.Hidden = r.Value > [K3].Value
         Next r
         Application.ScreenUpdating = True
     End If
End Sub
[/vba]


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеМожет, Вам так нужно? Попробуйте
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
     Dim r As Range
     If Target.Address = "$B$26" Then
         Application.ScreenUpdating = False
         For Each r In [AE1:AE48]
             r.EntireRow.Hidden = r.Value > [I3].Value
         Next r
         For Each r In [G21:G25]
             r.EntireRow.Hidden = r.Value > [K3].Value
         Next r
         Application.ScreenUpdating = True
     End If
End Sub
[/vba]

Автор - _Boroda_
Дата добавления - 23.06.2014 в 12:40
Jmurik Дата: Понедельник, 23.06.2014, 16:01 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 11
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
_Boroda_, да, практически то, что нужно, очень признателен за помощь.

Матраскин, нет не совсем то, что искал (действительно, я объяснил слишком невнятно).

Вопрос исчерпан
 
Ответить
Сообщение_Boroda_, да, практически то, что нужно, очень признателен за помощь.

Матраскин, нет не совсем то, что искал (действительно, я объяснил слишком невнятно).

Вопрос исчерпан

Автор - Jmurik
Дата добавления - 23.06.2014 в 16:01
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Запуск макроса при изменении значения, рассчитанного по форм (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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