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

Вход

Регистрация

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

 

= Мир MS Excel/Отслеживание изменений(форматирования) в ячейках - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отслеживание изменений(форматирования) в ячейках (Макросы/Sub)
Отслеживание изменений(форматирования) в ячейках
televnoy Дата: Пятница, 19.12.2014, 16:57 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 120
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Вечер добрый. Помогите пожалуйста изменить макрос под свои нужды. Макрос на листе (Worksheet)
Следит за изменениями в строке. Записываешь, удаляешь, меняется сумма он все отслеживает и выполняет следующий макрос, но данный макрос не видит форматирования.
Вот макрос:
[vba]
Код

Private Sub Worksheet_Change(ByVal Target As Range)
       Dim rng As Range:
       Set rng = [1:1] 'диапазон Вашей таблицы
       If Not Intersect(rng, Target) Is Nothing Then Макрос1
           
End Sub
[/vba]

Ну и собственно довольно таки большой код VBA который он выполняет :D
[vba]
Код

Sub Макрос1()
ActiveWindow.ScrollColumn = ActiveWindow.ScrollColumn + 1
End Sub
[/vba]

Так же бы хотелось чтобы сохранял именно с этой позицией столбика. А т.е.
Сохранилось с этим



После открыли с тем же положением столбика
Допустим ввели изменения в предыдущих столбиках, сохранилось все



Но опять же ки при открытии, столбики стояли по форматированию, как на первом рисунке, но с сделанными изменениями в ячейках.
К сообщению приложен файл: forum.xls (35.0 Kb)


О-па! 0_o

Сообщение отредактировал televnoy - Пятница, 19.12.2014, 16:59
 
Ответить
СообщениеВечер добрый. Помогите пожалуйста изменить макрос под свои нужды. Макрос на листе (Worksheet)
Следит за изменениями в строке. Записываешь, удаляешь, меняется сумма он все отслеживает и выполняет следующий макрос, но данный макрос не видит форматирования.
Вот макрос:
[vba]
Код

Private Sub Worksheet_Change(ByVal Target As Range)
       Dim rng As Range:
       Set rng = [1:1] 'диапазон Вашей таблицы
       If Not Intersect(rng, Target) Is Nothing Then Макрос1
           
End Sub
[/vba]

Ну и собственно довольно таки большой код VBA который он выполняет :D
[vba]
Код

Sub Макрос1()
ActiveWindow.ScrollColumn = ActiveWindow.ScrollColumn + 1
End Sub
[/vba]

Так же бы хотелось чтобы сохранял именно с этой позицией столбика. А т.е.
Сохранилось с этим



После открыли с тем же положением столбика
Допустим ввели изменения в предыдущих столбиках, сохранилось все



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

Автор - televnoy
Дата добавления - 19.12.2014 в 16:57
KuklP Дата: Суббота, 20.12.2014, 21:15 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

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


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеФорматирование не вызывает события в эксе. Поэтому для решения надо запускать бесконечный цикл с проверкой всех необходимых параметров форматирования, а это хлопотно и некошерно.

Автор - KuklP
Дата добавления - 20.12.2014 в 21:15
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отслеживание изменений(форматирования) в ячейках (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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