LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 385
Default Match and find entry

I have a listbox in a userform the user makes his multiple selections, I need
the macro to search the range database to find the matching row and place
"Paid" in it there. The following code assumes:
the entries in your listbox correspond to the rows of the range Database,
but that isn't correct they don't correspond. So can anyone show me how to
fix this. Tom said to record a macro using the EDITFIND method but i
couldn't make that work. Thank you so much for you help!

'Set sh = Worksheets("ProduceData")
'Dim rng As Range
'Set rng = sh.Range("Database").Columns(1).Cells
'Dim i As Long
'Dim rw As Long
'
'For i = 0 To lstData.ListCount - 1
' If lstData.Selected(i) Then
' rw = rng(i + 1).Row
' sh.Cells(rw, "ag").Value = "Paid"
' End If
'Next
--
Though daily learning, I LOVE EXCEL!
Jennifer
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
If cell entry does not match options = error ZIPPOMA NEEDS HELP Excel Discussion (Misc queries) 1 October 14th 08 09:54 PM
Find Exact Match using INDEX, MATCH DoubleUU Excel Worksheet Functions 3 August 15th 08 02:42 PM
entry must match value in range JayBro Excel Worksheet Functions 5 May 23rd 08 08:10 PM
Find closest text match for each unique entry in a list Nathan_Decker Excel Discussion (Misc queries) 2 September 23rd 07 01:36 AM
How do I set up Data entry to match My Application Form Mr. Ziggy Excel Discussion (Misc queries) 10 April 6th 06 06:46 PM


All times are GMT +1. The time now is 02:04 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"