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

Вход

Регистрация

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

 

= Мир MS Excel/Как сделать макрос на перенос значений ячеек - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Как сделать макрос на перенос значений ячеек
balancea Дата: Понедельник, 25.11.2013, 15:07 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
Добрый день!

Помогите, пожалуйста. Задача следующая. Есть таблица в которой в каждой строке нужно заполнять значения из выпадающего списка.

Чтобы облегчить жизнь, нужно:
1) Написать макрос, чтобы при указании значений из выпадающего списка в маленькой панели - они сами копировались в новую строку основной таблицы. При том в маленькой таблице они не оставались.
2) Сделать так, чтобы при попадании в основную таблицу эти значения автоматически запускали макрос фиксации времени в соседнем столбце. Вот этот-

[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Intersect(Me.UsedRange, Me.[C:C,E:E,G:G], Target) Is Nothing Then Exit Sub
Target.Next = IIf(Target = "", "", Now)
End Sub
[/vba]

Прилагаю сам Excel файл.

В нем более конкретно:
1) При заполнении H2 и H3 их значения переносятся каждый раз в новую строку в столбцах B и C
2) В столбце D с помощью выше приведенного макроса проставляется время поступления заявки
3) В каждой строке столбца E кнопка с надписью "Да" при нажатии на которую в данную ячейку проставляется значение "Да" и опять срабатывает макрос с проставлением времени.

Буду крайне признателен за помощь!
К сообщению приложен файл: 8950566.xlsm (58.9 Kb)
 
Ответить
СообщениеДобрый день!

Помогите, пожалуйста. Задача следующая. Есть таблица в которой в каждой строке нужно заполнять значения из выпадающего списка.

Чтобы облегчить жизнь, нужно:
1) Написать макрос, чтобы при указании значений из выпадающего списка в маленькой панели - они сами копировались в новую строку основной таблицы. При том в маленькой таблице они не оставались.
2) Сделать так, чтобы при попадании в основную таблицу эти значения автоматически запускали макрос фиксации времени в соседнем столбце. Вот этот-

[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Intersect(Me.UsedRange, Me.[C:C,E:E,G:G], Target) Is Nothing Then Exit Sub
Target.Next = IIf(Target = "", "", Now)
End Sub
[/vba]

Прилагаю сам Excel файл.

В нем более конкретно:
1) При заполнении H2 и H3 их значения переносятся каждый раз в новую строку в столбцах B и C
2) В столбце D с помощью выше приведенного макроса проставляется время поступления заявки
3) В каждой строке столбца E кнопка с надписью "Да" при нажатии на которую в данную ячейку проставляется значение "Да" и опять срабатывает макрос с проставлением времени.

Буду крайне признателен за помощь!

Автор - balancea
Дата добавления - 25.11.2013 в 15:07
KuklP Дата: Понедельник, 25.11.2013, 18:02 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
Дорогуша! Заказы, техзадания и иже размещают здесь:
http://www.excelworld.ru/forum/6
и с указанием цены.


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеДорогуша! Заказы, техзадания и иже размещают здесь:
http://www.excelworld.ru/forum/6
и с указанием цены.

Автор - KuklP
Дата добавления - 25.11.2013 в 18:02
  • Страница 1 из 1
  • 1
Поиск:

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