Find Function

[Mark]

I am using Excel 97.


I have a spreadhsheet with over 1000 rows of data on it and I want a
userform form with textboxes in it which picks up each row of data.

The only thing I have found that might meet my requirements is a function
called 'kickbutt-find function' by Aaron Blood. I don't whether this is what
I want but the first lines of code are:

Enum eLookin
xlFormulas = -4123
xlComments = -4144
xlValues = -4163
End Enum

Enum eLookat
xlPart = 2
xlWhole = 1
End Enum

However, My excel doesn't like the Enum part.

Please can anyone assist or point me in the direction of something which
will be ideal for my requirements. I think the form provided in the Data
menu is to basic.

Many thanks

 

[Bob Phillips]

The general requirement seems large and generic, and the code you quote
seems specific to the Find Function. What are you trying to do with the
form?

--

HTH

RP
(remove nothere from the email address if mailing direct)

 

[Tom Ogilvy]

Enums were not introduced until VBA 6. Excel 97 uses VBA 5. However, those
are built in constants in excel, so it is unclear why they are being locally
declared - unless this is for use outside of excel and mimics the built in
Excel function.

 

[Dave Peterson]

Just to add to Tom's post...

Since these are constants builtin to excel, just try commenting that whole
block:

'Enum eLookin
' xlFormulas = -4123
' xlComments = -4144
' xlValues = -4163
'End Enum
'
'Enum eLookat
' xlPart = 2
' xlWhole = 1
'End Enum


(the single quote in front makes it a comment (intended for human consumption
only).)

 

[Dave Peterson]

And you may want to try Jan Karel Pieterse's FlexFind:
http://www.oaltd.co.uk/MVP/