Hi to all,
is this possible?:
example I write in G15 and must remain in G15
partially works with Target.Select
This doesn't have to happen
I write in G15, for example, I move to G16 with the arrow and immediately returns to G15
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect "123456"
Application.EnableEvents = False
Application.ScreenUpdating = False
'-------------------------------------------------------------
ActiveSheet.Range("H9:H23").Copy
ActiveSheet.Range("L9:L23").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = True
'ActiveCell.Select
Target.Select
'-------------------------------------------------------------
Application.EnableEvents = True
Application.ScreenUpdating = True
'ActiveSheet.Protect "123456"
End Sub
I hope I have explained
max
Bookmarks