I'm using the following code to automatically make the data in a column uppercase:
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!