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

Вход

Регистрация

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

 

= Мир MS Excel/Формула по остаткам и макрос по дате автоматом - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Формула по остаткам и макрос по дате автоматом (Формулы/Formulas)
Формула по остаткам и макрос по дате автоматом
kasi Дата: Четверг, 27.11.2014, 09:12 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 75
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Здравствуйте, эксперты! Прошу помощи, что то делаю не так, а что не пойму.
1. Пишу формулу в столбце С для подсчета остатков=D4-G4, когда протягиваю в столбце С отображаются 0, как этого избежать, мне надо когда проставили расход, если есть остаток он отображался, если нет то ничего не проставлялось.
2. В файле есть макрос на автоматическое проставление даты, но когда я добавляю строчку дата то же проставляется автоматом, что надо прописать и где чтобы дата проставлялась только когда вносят данные в столбцы D и G ?
Private Sub Worksheet_Change(ByVal Target As Range)

For Each cell In Target 'проходим по всем измененным ячейкам
If Not Intersect(cell, Range("D3:D1000000,G3:G1000000")) Is Nothing Then 'если изменененная ячейка попадает в диапазон D3:D1000000
With cell.Offset(0, 2) 'вводим в соседнюю справа ячейку дату
.Value = Now
.EntireColumn.AutoFit 'выполняем автоподбор ширины для столбца B, чтобы дата умещалась в ячейке
End With
End If
Next cell
End Sub
К сообщению приложен файл: 0190592.xlsm (23.7 Kb)
 
Ответить
СообщениеЗдравствуйте, эксперты! Прошу помощи, что то делаю не так, а что не пойму.
1. Пишу формулу в столбце С для подсчета остатков=D4-G4, когда протягиваю в столбце С отображаются 0, как этого избежать, мне надо когда проставили расход, если есть остаток он отображался, если нет то ничего не проставлялось.
2. В файле есть макрос на автоматическое проставление даты, но когда я добавляю строчку дата то же проставляется автоматом, что надо прописать и где чтобы дата проставлялась только когда вносят данные в столбцы D и G ?
Private Sub Worksheet_Change(ByVal Target As Range)

For Each cell In Target 'проходим по всем измененным ячейкам
If Not Intersect(cell, Range("D3:D1000000,G3:G1000000")) Is Nothing Then 'если изменененная ячейка попадает в диапазон D3:D1000000
With cell.Offset(0, 2) 'вводим в соседнюю справа ячейку дату
.Value = Now
.EntireColumn.AutoFit 'выполняем автоподбор ширины для столбца B, чтобы дата умещалась в ячейке
End With
End If
Next cell
End Sub

Автор - kasi
Дата добавления - 27.11.2014 в 09:12
VEKTORVSFREEMAN Дата: Четверг, 27.11.2014, 09:19 | Сообщение № 2
Группа: Друзья
Ранг: Ветеран
Сообщений: 772
Репутация: 130 ±
Замечаний: 0% ±

MS Office Excel 2010
kasi, здравствуйте
для С3
Код
=ЕСЛИ(D3;D3-G3;"")


"Опыт - это то, что получаешь, не получив того, что хотел"
 
Ответить
Сообщениеkasi, здравствуйте
для С3
Код
=ЕСЛИ(D3;D3-G3;"")

Автор - VEKTORVSFREEMAN
Дата добавления - 27.11.2014 в 09:19
kasi Дата: Четверг, 27.11.2014, 09:23 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 75
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
VEKTORVSFREEMAN, Спасибо, ОГРОМНОЕ работает, теперь бы еще с макросом разобраться hands
[moder]Неее, так не пойдет. В Правилах что написано? Один вопрос - одна тема.
Тем более, что для вопросов по макросам есть отдельная ветка.
На первый вопрос ответ получен - тему закрываю.
 
Ответить
СообщениеVEKTORVSFREEMAN, Спасибо, ОГРОМНОЕ работает, теперь бы еще с макросом разобраться hands
[moder]Неее, так не пойдет. В Правилах что написано? Один вопрос - одна тема.
Тем более, что для вопросов по макросам есть отдельная ветка.
На первый вопрос ответ получен - тему закрываю.

Автор - kasi
Дата добавления - 27.11.2014 в 09:23
VEKTORVSFREEMAN Дата: Четверг, 27.11.2014, 09:27 | Сообщение № 4
Группа: Друзья
Ранг: Ветеран
Сообщений: 772
Репутация: 130 ±
Замечаний: 0% ±

MS Office Excel 2010
kasi, для первого вопроса думаю эта формула будет лучше
Код
=ЕСЛИ((D3-G3)=0;"";D3-G3)

А что касается макросов, так я тут не силён. Подождите немного, может кто-то из спецов откликнутся в ближайшее время.


"Опыт - это то, что получаешь, не получив того, что хотел"
 
Ответить
Сообщениеkasi, для первого вопроса думаю эта формула будет лучше
Код
=ЕСЛИ((D3-G3)=0;"";D3-G3)

А что касается макросов, так я тут не силён. Подождите немного, может кто-то из спецов откликнутся в ближайшее время.

Автор - VEKTORVSFREEMAN
Дата добавления - 27.11.2014 в 09:27
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Формула по остаткам и макрос по дате автоматом (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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