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

  • Thread starter Thread starter Howard
  • Start date Start date
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??
Click to expand...

e.g. try instead:

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


Regards
Claus Busch
 
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
Click to expand...

Well, that takes care of that problem!

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

Howard
 
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
 
Back
Top