Find Method error: -Object variable with block set variable not set

**bambino_32** · 05-31-2010, 12:35 PM

Hi all again
I have a code exported from other wb which worked normally.
When it was imported into new wb Find method gives an error RunTime 91 Object variable with block set variable not set

     Dim i As Long, TDateCNum As Long
     TDateCNum = Cells.Find(What:=MyDate, LookIn:=xlValues).Column

I just want to find column number of today's date and us it in Cells()
I was able to do it on old wb but not here

Thanks in advance...

**royUK** · 05-31-2010, 12:46 PM

Can't tell what your variables are declared as,nor what value you have given to say Mydate

**bambino_32** · 05-31-2010, 12:58 PM

Here are declared valriables

Dim MyDate As Date
    If TDayButton Then
        MyDate = Date
    Else
        MyDate = DropCalendar.Value
    End If

TDayButton is OptionButton name. It checks if it's selected

**shg** · 05-31-2010, 01:04 PM

The reason for the error is that the date was not found, so the range returned by the Find is Nothing, and Nothing doesn't have a Column property.

If the date is actually there, then you might try

TDateCNum = Cells.Find(What:=CDbl(MyDate), LookIn:=xlValues).Column

**bambino_32** · 05-31-2010, 01:25 PM

Here's the dummy
This userform is used just to add hours to workers

**bambino_32** · 05-31-2010, 01:11 PM

he reason for the error is that the date was not found

The date is there and unfortunately it didn't work

I'm working at dummy so I upload one soon...
Thanks al lot

**bambino_32** · 05-31-2010, 04:05 PM

oh guys please help me. it's very important for me....((((

**bambino_32** · 06-01-2010, 10:49 AM

bump
please))))

**bambino_32** · 06-01-2010, 12:16 PM

bump((((((((((((((((((((

**bambino_32** · 06-01-2010, 03:29 PM

bumping last time........

**contaminated** · 06-01-2010, 03:36 PM

Maybe to try declare MyDate as long and use this instead of TDateCNum = Cells.Find(What:=CDbl(MyDate), LookIn:=xlValues).Column

Dim MyDate as Long
TDateCNum = WorksheetFunction.Match(MyDate, Range("A5:XFD5"))

**bambino_32** · 06-01-2010, 03:40 PM

God Bless you Vusal
Thank you very Much!!!!!!
Yes It solved my issue Thanks again
You are genius!!!!!!!!!!!!!!)))))))))))))))))))))
rep+

**royUK** · 06-02-2010, 01:18 AM

If you are satisfied with the solution(s) provided, please mark your thread as Solved.

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save

Find Method error: -Object variable with block set variable not set

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Re: Find Method error: -Object variable with block set variable not set

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions