Hi everyone,
I'm using the following code to automatically make the data in a column uppercase:
Code
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("I:I")) Is Nothing Then Exit Sub
Application.EnableEvents = False
Target = UCase(Target)
Application.EnableEvents = True
End Sub
I'm having trouble inserting rows & columns (by right clicking on the far left or top & selecting 'Insert') into my spreadsheet without ruining the code for the following cells.
This has been an issue with both blank & copied inserts.
When inserting rows the following error message is prompted:
However, when inserting columns I have noticed that no error message is prompted, but the code is still ruined for the following cells.
When the 'Debug' option is selected the code looks like this:
I have also saved the spreadsheet as a macro-enabled file.
Not sure if I should be using a different code or not.
Thank you in advance for your help!