If .Column > 7 And .Row > 25 then go to B8

[Claus Busch]

Hi Howard,

Am Fri, 22 Feb 2013 12:14:47 -0800 (PST) schrieb Howard:

A question on that very thing. Often when using the change event sub for some activity if I click, drag and highlight portions of the worksheet not included in the change event code, say to delete stuff I don't need I get an error about invalid entry or the such. On Error Resume Next seems to eliminat that, is that good practice??

e.g. try instead:

If Intersect(Target, Range("B8:G25")) Is _
Nothing Or Target.Count > 1 Then Exit Sub


Regards
Claus Busch

 

[Howard]

Hi Howard,



Am Fri, 22 Feb 2013 12:14:47 -0800 (PST) schrieb Howard:






e.g. try instead:



If Intersect(Target, Range("B8:G25")) Is _

Nothing Or Target.Count > 1 Then Exit Sub





Regards

Claus Busch

--

Win XP PRof SP2 / Vista Ultimate SP2

Office 2003 SP2 /2007 Ultimate SP2

Well, that takes care of that problem!

Thanks for the continued excellent advice and guidance.
I am humbled.

Howard

 

[GS]

Thanks for your kind words...

Again, Claus rescues the situation! In light of the added info about
how users may work with the data, Claus' recommendation is the better
way to go!

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion