disafi (Все сообщения пользователя)

VBA условие: активная ячейка находится в нужном столбце

disafi Пользователь Сообщений: 4 Регистрация: 16.11.2015	# 28.03.2017 16:43:47 Да, красиво)) Спасибо!) А окончание - да, специально в той ячейке
	Перейти

VBA условие: активная ячейка находится в нужном столбце

disafi

Пользователь

Сообщений: 4 Регистрация: 16.11.2015

28.03.2017 15:37:15

Ураааа!!!!)))) Получилось!!! Спасибо Вам огроооомное!!!))))
Еще немного подправил чтоб выводилось сообщение "

Код

Sub ДанныеВКвит()
 '   For I = 1 To 1000
 
 If ActiveCell.Column = 5 Then               'Exit Sub (засолил на всякий случай)
    ActiveCell.Offset(0, 4).Range("A1").Select
    ActiveCell.FormulaR1C1 = "=TODAY()"
    ActiveCell.Offset(0, -4).Range("A1:M1").Select
    Selection.Copy
    Sheets("Квитанция").Select
    ActiveCell.Offset(-3, 0).Range("A1").Select
    Sheets("Обслуж. Не Обслуж").Select
    Sheets("Квитанция").Select
    Range("O3").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("Обслуж. Не Обслуж").Select
    ActiveCell.Offset(0, 4).Range("A1").Select
    Application.CutCopyMode = False
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
    Sheets("Квитанция").Select
    Range("O6").Select
    Else: MsgBox "Не правильно выбрана ячейка!"      (я крут!!  :DD)))))
    
    End If
  '  Next
End Sub

Пройденный сегодня материал закрепил)))) Только недавно познакомился с макросами и VBA (в частности)... Эксель и макросы ВЕЩЬ!!!!))))
Еще раз СПАСИБО!!!!))
Так?

Изменено: disafi - 28.03.2017 15:53:30

Перейти

VBA условие: активная ячейка находится в нужном столбце

disafi

Пользователь

Сообщений: 4 Регистрация: 16.11.2015

28.03.2017 15:23:55

Здравствуйте!
Огромное спасибо за ответ!!
Целый час набирал сообщение, редактировал, расписывал что да как, и потом что-то не то нажал и первое сообщение исчезло... Сижу расстраиваюсь...)) Как так?!!)
И тут ваш ответ!))) Не ожидал, думал все... (Пойду застрелюсь

)
ЕЩЕ РАЗ СПАСИБО!!!

Перейти

VBA условие: активная ячейка находится в нужном столбце

disafi Пользователь Сообщений: 4 Регистрация: 16.11.2015	# 28.03.2017 15:05:08 Ну вот, все-таки получилось загрузить...) Куда делось первое сообщение? Изменено: disafi - 28.03.2017 15:06:59
	Перейти