Кнопка на отдельном листе Макро

Question

У меня есть кнопка в Sheet3, но я хочу, чтобы она запускала следующий макрос из Sheet1. Я продолжаю получать ошибку, когда запускаю следующую строку.

Public Sub Blue() 

    If Now() > Range("Sheet1!AL2") Then 
     Range("Sheet1!AC2:AG2").Select 
     Selection.Cut 
     Range("Sheet1!AC15").Select 
     Sheet1!.Paste 
     Range("Sheet1!X2:AB2").Select 
     Selection.Cut 
     Range("Sheet1!AC2").Select 
     Sheet1!.Paste 
     Range("Sheet1!AC15:AG15").Select 
     Selection.Cut 
     Range("Sheet1!X2").Select 
     Sheet1!.Paste 
     Range("Sheet1!AL2").Select 
     Selection.Copy 
     Range("Sheet1!AK2").Select 
     Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False 
    Else 
    End If 

End Sub 

Answer 1

Избегайте использования выберите вырезать и вставить

Вместо этого попробуйте

Range("Sheet1!AC15").value = Range("Sheet1!AC2:AG2").value