Thread: HELP-Dictionary
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips[_6_] Bob Phillips[_6_] is offline
external usenet poster
 
Posts: 11,272
Default HELP-Dictionary

A simple form with a textbox for the word, and a (larger) textbox for the
definition, with a Search button.

Assuming that the data is all in a worksheet called Words, with the words in
column A, and the definitions in column B, the code for the button would be

Private Sub cmdSearch_Click()
Dim iPos As Long

With Textbox1
If .Text < "" Then
iPos =
Application.Match(.Text,Worksheets("Words").Range( "A:A"),0)
If iPos = 0 Then
Textbox2.Text = "Word not found"
Else
Textbox2.Text =
Application.Index(Worksheets("Words").Range("A:A") ,iPos)
End If
End If
End With
End Sub

--

HTH

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


"dfisch8" wrote in
message ...

Greetings,

I need some help with excell. I have an access database that serves as
a dictionary. There are two colums, one serving as the terms and the
second serving as the definitions. By creating a form in Acess I was
able to make the term coloum serachable. When the word was found that I
wanted, I could press enter and the definition in the corresponding
colum would appear.

I am trying to get this same effect in excel, yet I am not sure how to
do it. Someone mentioned using pivit tables and forms.

I would apreciate any help I can get.

Thanks,
Dan


--
dfisch8
------------------------------------------------------------------------
dfisch8's Profile:

http://www.excelforum.com/member.php...o&userid=26515
View this thread: http://www.excelforum.com/showthread...hreadid=397822