Hi All
I was wondering if somebody could be kind enough to help me with a problem I have?
The problem...
I have the below code:
How the code works is when a number is entered into Q7 and enter is press the the data is copied to the the relevant tab.
Is there a way Iwhen enter is pressed, a prompt could appear to say this will now be copied to tab number what was entered into Q7 do you wish to copy or cancel???
Your help would really be appreciated..
Many thanks
Andrew
I was wondering if somebody could be kind enough to help me with a problem I have?
The problem...
I have the below code:
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Sh As Worksheet
If Target.Address(0, 0) = "Q7" Then
On Error Resume Next
Set Sh = Worksheets(Target.Value)
On Error GoTo 0
If Not Sh Is Nothing Then
With Sh
.Unprotect "liverpool"
Cells.Copy .Cells
.Tab.ColorIndex = 3
.Protect "liverpool"
End With
Else
MsgBox Target.Value & " does not exist"
End If
End If
End Sub
How the code works is when a number is entered into Q7 and enter is press the the data is copied to the the relevant tab.
Is there a way Iwhen enter is pressed, a prompt could appear to say this will now be copied to tab number what was entered into Q7 do you wish to copy or cancel???
Your help would really be appreciated..
Many thanks
Andrew