I have a woworksheet which gathers data from an external source and is continually updating - similar to stock prices. I am trying to copy a range of data in i8:i40. Have tried numerous ways but without success. Reading various forums the below seems most logical to meet my needs but i'm getting an error - Argument not optional, on the Intersect - below is my code.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target.Range("I8:I32")) Is Nothing Then
Columns("BT").EntireColumn.Insert
Range("BT8:BT40").Value = Range("I8:I40").Value
End If
End Sub
Suggestions as to where I'm going wrong welcomed.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target.Range("I8:I32")) Is Nothing Then
Columns("BT").EntireColumn.Insert
Range("BT8:BT40").Value = Range("I8:I40").Value
End If
End Sub
Suggestions as to where I'm going wrong welcomed.