Private Sub Worksheet_Change(ByVal Target As Range)

[Dazzawm]

I have been told that I cant have 2 Private Sub Worksheet_Change(ByVal Target As Range) in one worksheet. What can I do as I have 2 codes that have this.

 

[mikerickson]

Put them both in the same event and branch to decide which to code to run

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells = 1 Then
        If Target.Column = 1 Then
            Rem code for column A
        ElseIf Target.Column = 3 Then
            Rem code for column B
        End If
    End If
End Sub

Your situation is probably not testing for columns A vs. C, but the principle is the same.

 

[Dazzawm]

Sorry I dont understand as both need to run!

 

[mikerickson]

Then put one after the other.

Private Sub Worksheet_Change(ByVal Target As Range)
    Rem one routine
    Rem the other 
End Sub

Perhaps if you posted the two routines, it would be easier to see what you want them to do and how to combine them.

 

[Dazzawm]

Thankyou.