What I have so far:

Dim curWorkbook As Workbook
Set curWorkbook = ActiveWorkbook
Workbooks.Open "C:\logs\logbook.xls"
Workbooks("logbook.xls").Activate

What I need it to do is input information into columns A - C, using the next available row.

Basically it needs to open logbook.xls and do the following:


Take todays date and copy its value into A(whatever the next available row is) in logbook.xls
Take the filename of curWorkbook (minus its file extension) and copy its value into B(whatever the next available row is) in logbook.xls
Take the value of cell AM3 in curWorkbook and copy its value into C(whatever the next available row is) in logbook.xls