Visual Basic Programming
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
 
 
User Name:
Password:
Remember me
Iron Speed
Go Back   ASP Free ForumsProgrammingVisual Basic Programming

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread ASP Free Forums Sponsor:
Ajax Application Generator Generate database and reporting .NET Web apps in minutes. Quickly create visually stunning, feature-rich apps that are easy to customize and ready to deploy. Download Now!
  #1  
Old April 24th, 2008, 10:26 AM
RoyKMathur RoyKMathur is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: May 2006
Posts: 7 RoyKMathur User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 4 h 59 m 18 sec
Reputation Power: 0
Error 91 on Cells.Find

I'm double-clicking on a comma-delimited (*.CSV) file to have MS Excel auto-open and import it. I then execute a VB macro to format it, however when I execute the following code I get an error 91 "Object variable or With block variable not set" on the Cells.Find.

I've been racking my brain, reading doc, etc. trying to figure it out...


dim s_Search as String
dim v_Address as Variant
Range("A1").Activate
s_Search = "PROGNAME"
v_Address = Cells.Find(s_Search, ActiveCell, xlFormulas, xlWhole, xlByRows, xlNext, False, False).Address

Reply With Quote
  #2  
Old April 25th, 2008, 03:01 AM
garman garman is offline
Contributing User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Dec 2007
Posts: 32 garman User rank is Corporal (100 - 500 Reputation Level)garman User rank is Corporal (100 - 500 Reputation Level)garman User rank is Corporal (100 - 500 Reputation Level)garman User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: 11 h 13 m 45 sec
Reputation Power: 2
mabey try

Code:
dim s_Search as String
dim v_Address as Variant
dim rngTmp as Range

set rngTmp = Range("A1")
rngTmp.Activate
s_Search = "PROGNAME"
v_Address = rngTmp.Cells.Find(s_Search, ActiveCell, xlFormulas, xlWhole, xlByRows, xlNext, False, False).Address


this way you have set a object variable pointing specificaly to your range, therefore setting the object var it is complaining about

Last edited by garman : April 25th, 2008 at 03:03 AM.

Reply With Quote
  #3  
Old April 25th, 2008, 06:03 AM
RoyKMathur RoyKMathur is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: May 2006
Posts: 7 RoyKMathur User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 4 h 59 m 18 sec
Reputation Power: 0
User Error

What I discovered is that my comma-delimited file wasn't comma-delimited...I had downloaded the wrong file. Which explains why the string was not found. That only took about 2+ hours to figure out... The only positive thing is that it revealed that I am missing a bunch of exception logic in my code.

Reply With Quote
Reply

Viewing: ASP Free ForumsProgrammingVisual Basic Programming > Error 91 on Cells.Find


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump

 Free IT White Papers!
 
Accelerating Trading Partner Performance
One in five. That's how many partner transactions have at least one error. That is an amazing statistic, particularly given the extraordinary leaps in innovation across the global supply chain during the past two decades. Download this white paper to learn more.

 
Competing on Analytics
This Tech Analysis is designed to help identify characteristics shared by analytics competitors, and includes information about 32 organizations that have made a commitment to quantitative, fact-based analysis.

 
Cost Effective Scaling with Virtualization and Coyote Point Systems
An overview of the industry trend toward virtualization, how server consolidation has increased the importance of application uptime and the steps being taken to integrate load balancing technology with virtualized servers.

 
Five Checkpoints to Implementing IP Telephony
Implementation planning for IP PBX software and IP telephony has become vital as businesses replace discontinued legacy PBX phone systems. This informative whitepaper outlines five "checkpoints" for any implementation plan that will help make IP communications a successful proposition.

 
Hosted Email Security: Staying Ahead of New Threats
In the last two years, email has become a fierce battleground between the nefarious forces of spam and malware, and the heroes of messaging protection. The spam volumes increased alarmingly every month, bringing clever new forms of phishing and virus propagation attacks.

 

Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2008 by Developer Shed. All rights reserved. DS Cluster 3 hosted by Hostway