Complie error???

Anthony G.

Active Member
Joined
Mar 24, 2002
Messages
465
Hello to All!

I'm receiving a compiling error when I attempt to run the following code:

Private Sub Worksheet_Change(ByVal East_Update As Range)

Sheets("East_Forecast").Unprotect Password:="ESF"

If Intersect(East_Update, Union([L12:L207],[S12:S207]) Is Nothing Then Exit Sub

With Update
.Font.Bold = True
.Font.Italic = True
With .Interior
.ColorIndex = 36
.Pattern = xlSolid
End With
End With
Sheets("East_Forecast").Protect Password:="ESF"
End Sub

On the "If Intersect" line, the debugger highlights "Then".

Any suggestions?

Thanks,

Anthony
 

Excel Facts

What do {} around a formula in the formula bar mean?
{Formula} means the formula was entered using Ctrl+Shift+Enter signifying an old-style array formula.
Hi Anthony,

The problem appears to be nothing more than unbalanced parentheses. The statement needs another right paren before the "Is".
 
Upvote 0

Forum statistics

Threads
1,218,538
Messages
6,143,078
Members
450,461
Latest member
Bosavon

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top