Auto enter data
 

Hi Folks,

I volunteer time to a non-profit organization that monitors
agricultural chemical applications. The recordkeeping is tedious. My
skills with VB are self-taught, and limited in scope. In an attempt
to speed up data entry, I've written some successful procedures.
However, now I'm stuck.

I'd like to enter a chemical name such as "Roundup" in cell G10, that
would trigger an automatic entry in cell H10 of "Monsanto", and
another auto-entry in cell I10 of "123-456", and yet another
auto-entry in J10 of "12 Hours". In the next row, cell G11 could be a
different chemical and require different info in the subsequent cells.

I've toyed with an IFTHEN procedure, and experimented with ToLeft to
jump to the next empty cell in the row. No luck. I think I'm in over
my head (or skill levels) and removed the entire module in
frustration.

Please help, and if you would, give explicit details about how it
works......I'm eager to learn.

Auto enter data
 

Assume you have data laid out as a table in another sheet
A B C C
Key Name Alias Serial Resouces
Roundup Monsanto 123-456 12 Hours
T-Other Something 86-222 6 Hours

Headers in Row 1

so in H10

=If($G10="","",Vlookup(G10,Sheet2!$A$1:$D$500,2,Fa lse))

in I 10
=If($G10="","",Vlookup(G10,Sheet2!$A$1:$D$500,3,Fa lse))

in J10
=If($G10="","",Vlookup(G10,Sheet2!$A$1:$D$500,4,Fa lse))

This will then do what you describe.

--
Regards,
Tom Ogilvy



"Don" wrote in message
...
Hi Folks,

I volunteer time to a non-profit organization that monitors
agricultural chemical applications. The recordkeeping is tedious. My
skills with VB are self-taught, and limited in scope. In an attempt
to speed up data entry, I've written some successful procedures.
However, now I'm stuck.

I'd like to enter a chemical name such as "Roundup" in cell G10, that
would trigger an automatic entry in cell H10 of "Monsanto", and
another auto-entry in cell I10 of "123-456", and yet another
auto-entry in J10 of "12 Hours". In the next row, cell G11 could be a
different chemical and require different info in the subsequent cells.

I've toyed with an IFTHEN procedure, and experimented with ToLeft to
jump to the next empty cell in the row. No luck. I think I'm in over
my head (or skill levels) and removed the entire module in
frustration.

Please help, and if you would, give explicit details about how it
works......I'm eager to learn.

Auto enter data
 

On Thu, 2 Oct 2003 10:23:37 -0400, "Tom Ogilvy"
wrote:

Assume you have data laid out as a table in another sheet
A B C C
Key Name Alias Serial Resouces
Roundup Monsanto 123-456 12 Hours
T-Other Something 86-222 6 Hours

Headers in Row 1

so in H10

=If($G10="","",Vlookup(G10,Sheet2!$A$1:$D$500,2,F alse))

in I 10
=If($G10="","",Vlookup(G10,Sheet2!$A$1:$D$500,3,F alse))

in J10
=If($G10="","",Vlookup(G10,Sheet2!$A$1:$D$500,4,F alse))

This will then do what you describe.


Tom,

I works!!! Thanks so much! You are definately a lifesaver!

Don