Application Defined or Object defined error

NoSparks · #1 03-22-2017, 02:06 PM

I can't really explain the error, but by suppressing error messages for that part of the code I believe what you're wanting to happen does happen.

Code:

On Error Resume Next

Set rng = Columns(3).SpecialCells(xlBlanks)
For Each ar In rng.Areas
ar(0).Copy ar
Next
      
Set rng = Columns(13).SpecialCells(xlBlanks)
For Each mr In rng.Areas
mr(0).Copy mr
Next

Set rng = Columns(14).SpecialCells(xlBlanks)
For Each nr In rng.Areas
nr(0).Copy nr
Next

On Error GoTo 0

Your code after that seems to have an issue but I don't know what you're trying to do.
Toggle a break point at the start of the While loop and F8 through the code to see if what you're expecting to be selected is actually what's being selected.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
FileSystemObject Compile Error: User-Defined Type Not Defined	gsrikanth	Excel Programming	2	03-28-2022 06:32 AM
User-defined Type not Defined VBA Issue	OTPM	Project	3	01-02-2014 01:47 PM
Range.Information(wdStartOfRangeRowNumber): Application-defined or Object-defined err	tinfanide	Excel Programming	2	06-09-2012 10:19 AM
Application-defined or Object-defined error	Manit	Excel Programming	4	12-08-2011 07:35 PM
Compile error: sub or function not defined..	xena2305	Excel Programming	0	08-02-2011 10:17 AM