Update cell from form. Please help, running out of time.

[DearAppeciatedHelper]

Firstly sorry for my to you easy to me impossible problem.

Working in dairy need others to enter each cows daily milk production. Want form for cow by cow entry.

Row 1 Date
Colomn A cow's id no
Colomn B cows name(vlookup on form)
C: Amount of milk

VB to update now() for column, entered id for row, update value for liters of milk.

What would take me a week will take someone out there 5 mins.

 

[Smitty]

Welcome to the Board!

How many people will be accessing the workbook at once? Will the workbook be on a network?

If you want to build a user form, see this tutorial: http://www.contextures.com/xlUserForm01.html

Here's some sample code that will add a Date stamp, Cow ID (TextBox1), lookup formula, Amount of milk (TextBox2):

<font face=Calibri><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> CommandButton1_Click()<br>    <SPAN style="color:#00007F">Dim</SPAN> lr <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN><br>    <SPAN style="color:#00007F">Dim</SPAN> ws <SPAN style="color:#00007F">As</SPAN> Worksheet<br>    <br>    <SPAN style="color:#00007F">Set</SPAN> ws = Sheets("Totals")<br>    lr = ws.Cells(Rows.Count, "A").End(xlUp).Row<br>    <br>    ws.Cells(lr + 1, "A").Value = <SPAN style="color:#00007F">Date</SPAN><br>    ws.Cells(lr + 1, "B").Value = Me.TextBox1.Value<br>    ws.Cells(lr + 1, "C").Value = "=LookupFormula"<br>    ws.Cells(lr + 1, "D").Value = Me.TextBox2.Value<br>    <br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>

HTH,

 

[DearAppeciatedHelper]

Sorry for the time between contact... electricty down.

Yes on network
Only one person entering production (litres) data.

Now watching video.

 

[DearAppeciatedHelper]

Hoping this makes sense.

 

[Smitty]

I'd change your structure so that you enter the data for each cow/day as a single row.

E.G.

Cow ID | Date | Litres

That way you can use Pivot Tables to summarize the data; as you have it structured now you can't do a whole lot.