Hi Guys,
I think a simple task, not used to many user forms in the past
I am looking to enter a numeric value these are the green columns.
it then needs to search the workbook for that number (Barcode Number)
then if the cell to the right has a value, it needs to pull that number into the userform' if no number is next to it, then I manually write and post it the cell next to the one just found.......
easy peasy (NOT)
cheers in advance
Stephen![]()
Last edited by stephen1000; 07-05-2009 at 05:57 AM.
Does this do the trick?
I guess I ought to provide some instructions:
To open the form go to Tools > Macro > Macros > "DoForm"
The first button is a "read" button - it looks up the invoice number corresponding to the barcode number, and puts it into the second text box.
The second button is a "write" button - it takes whatever's in the second text box and writes it into the data.
I haven't made it very error proof, secure or intuitive but after all, I'm not getting paid.
Your post does not comply with Rule 9 of our Forum RULES. If you solve a problem yourself before anyone else has responded, please take a moment to describe your solution, chances are some other member will benefit. And please never edit a thread in which someone else has responded.
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
Hope that helps.
RoyUK
--------
If you are pleased with a member's answer then use the Star icon to rate it, if you are pleased enough to part with cash consider a donation to Children in Need
For Excel consulting, free examples and tutorials visit Excel Consulting-Excel VBA
Check out the free Excel Toolbar
New members please read & follow the Forum Rules
Remember to mark your questions Solved and rate the answer(s)
Code Tags: Make your code easier for us to read
Hi Ancalagon,
Thanks for that, its a start; just dicovered that all the numbers in green have formulas not values in,so it does not work unless i change cells to numeric values.
I did organize this sheet, will need a bit of re-thinking.
cheers for what you did
stephen
Stephen: Find the line of code that uses "Find" and change it from this:
to this:Code:something.Find(something)
Code:something.Find(something, LookIn:=xlValues)
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks