Maintenance log

[Dennis Allen]

Hi. Got a client who wants to add features to his excel file. Hoping someone here could help.

Got a xls file with 400 sheets, one sheet for each widget. On each widget sheet is an area for people to enter maintenance logs.
Log entries (rows) include a column for the date, description, price, status, an whether it's preventative maintenance Y/N. Need a
couple of things: One, I need to create a summary sheet (400 rows) showing the most recent log entry of each widget. Two, I need
another summary sheet but only showing those widgets those most recent log entry is flagged preventative maintenance.

I asked last week, but didn't get a response. Probably the holiday. Any advice would be greatly appreciated...Dennis

 

[Harald Staff]

Hi Dennis

Try putting this code into the ThisWorkbook module, and add a worksheet
names Maintenance into the file.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Sh.Name <> "Maintenance" Then _
Sheets("Maintenance").Cells(Sh.Index, 1).Value = Sh.Name & _
" last changed " & Now
End Sub

Hope this get you started. Best wishes Harald

Hi. Got a client who wants to add features to his excel file. Hoping someone here could help.

Got a xls file with 400 sheets, one sheet for each widget. On each widget

sheet is an area for people to enter maintenance logs.

Log entries (rows) include a column for the date, description, price,

status, an whether it's preventative maintenance Y/N. Need a

couple of things: One, I need to create a summary sheet (400 rows)

showing the most recent log entry of each widget. Two, I need

another summary sheet but only showing those widgets those most recent log

entry is flagged preventative maintenance.

I asked last week, but didn't get a response. Probably the holiday. Any

advice would be greatly appreciated...Dennis