Hi,
Possible solution is to have this bit of code "If Target.Address(0, 0)" refer to "Text"
"If Target.Address(0, 0).text".
Update to add more info.
When using code as you have you should use the "Application.EventDisable = true"
This should stop the code from repeating itself.
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
''''' then reset Event at the end of your macro
Application.EnableEvents = True
End Sub