Новости:

Из правил форума: Тема должна отражать суть вопроса, топики типа "help please" будут удаляться!

Главное меню

Макрос: вычитание из самого себя

Автор 0mega, 09.04.2016, 21:23

« назад - далее »

0mega

доброго времени суток
2007
Макрос вычитает сам  из себя и записывает результат в той же ячейке.
Пользователь  вручную вводит информацию в i11:К211
Инфоромация вводится в виде гиперссылки , именем которой выступает число
например пользователь вводит в К16 гиперссылку с именем  "499500"
После ввода макрос должен из L16 вычесть K16 и ответ поместить в L16 (1 665 000,00-499500,00=1 165 500,00 )


zs

Специальная вставка-вычесть

0mega

zs, очевидно я недостаточно внятно объяснил...
Таблица содержит 200 строк
Надо из каждой "L" вычесть СВОЁ "К"



cheshiki1

Макрос1, код в модуль листа
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Not Intersect(Target, Range("L11:N211")) Is Nothing Then
   If Cells(Target.Row, "L") = "" And Cells(Target.Row, "M") = "" And Cells(Target.Row, "N") = "" _
   Then Target = Cells(Target.Row, "C")
End If
End Sub

0mega


zs

Выделяем все 200 или 500 ячеек в К и копируем в L(специальная вставка-вычесть)- это не альтернатива макросу 2...

0mega

zs. Решение, как один из вариантов - имеет место быть .
Для простого бухгалтера - это не очень удобный вариант.
Но за "изюм" спасибо