Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Message Box - More help please !!
Hi,
Thanks to Rowen and Michael for their help with my (simple) question, but I have another. The menu button I have created has the following code attached to it Sub add_monday_jobs() With Sheets("monday'S LOG").Range("A8:N34") Sheets("Log").Range("A" & Rows.Count).End(xlUp).Offset( _ 1, 0).Resize(.Rows.Count, .Columns.Count).Value = .Value End With MsgBox "All Today's Jobs Added Successfully !", vbInformation End Sub However is it possible to use this code so that it will add the required data to the "log" regardless which sheet is open at the time. As at present it will only work with worksheet "Monday's Log" and I want it to do the given task regardless of which worksheet is being used. eg if 'Mondays Log' worksheet is being used then copy that data only, if 'Tuesdays Log' worksheet is being used then copy that data only..........etc etc Hope that makes sense, and thanks in advance Cheers Anthony |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Message Box - More help please !!
Sub add_Anydays_jobs()
With Activesheet.Range("A8:N34") Sheets("Log").Range("A" & Rows.Count).End(xlUp).Offset( _ 1, 0).Resize(.Rows.Count, .Columns.Count).Value = .Value End With MsgBox "All Today's Jobs Added Successfully !", vbInformation End Sub -- Regards, Tom Ogilvy "Anthony" wrote in message ... Hi, Thanks to Rowen and Michael for their help with my (simple) question, but I have another. The menu button I have created has the following code attached to it Sub add_monday_jobs() With Sheets("monday'S LOG").Range("A8:N34") Sheets("Log").Range("A" & Rows.Count).End(xlUp).Offset( _ 1, 0).Resize(.Rows.Count, .Columns.Count).Value = .Value End With MsgBox "All Today's Jobs Added Successfully !", vbInformation End Sub However is it possible to use this code so that it will add the required data to the "log" regardless which sheet is open at the time. As at present it will only work with worksheet "Monday's Log" and I want it to do the given task regardless of which worksheet is being used. eg if 'Mondays Log' worksheet is being used then copy that data only, if 'Tuesdays Log' worksheet is being used then copy that data only..........etc etc Hope that makes sense, and thanks in advance Cheers Anthony |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Message Box - More help please !!
Tom,
thank you !!!!!!!!!!!!!!!! regds Anthony "Tom Ogilvy" wrote: Sub add_Anydays_jobs() With Activesheet.Range("A8:N34") Sheets("Log").Range("A" & Rows.Count).End(xlUp).Offset( _ 1, 0).Resize(.Rows.Count, .Columns.Count).Value = .Value End With MsgBox "All Today's Jobs Added Successfully !", vbInformation End Sub -- Regards, Tom Ogilvy "Anthony" wrote in message ... Hi, Thanks to Rowen and Michael for their help with my (simple) question, but I have another. The menu button I have created has the following code attached to it Sub add_monday_jobs() With Sheets("monday'S LOG").Range("A8:N34") Sheets("Log").Range("A" & Rows.Count).End(xlUp).Offset( _ 1, 0).Resize(.Rows.Count, .Columns.Count).Value = .Value End With MsgBox "All Today's Jobs Added Successfully !", vbInformation End Sub However is it possible to use this code so that it will add the required data to the "log" regardless which sheet is open at the time. As at present it will only work with worksheet "Monday's Log" and I want it to do the given task regardless of which worksheet is being used. eg if 'Mondays Log' worksheet is being used then copy that data only, if 'Tuesdays Log' worksheet is being used then copy that data only..........etc etc Hope that makes sense, and thanks in advance Cheers Anthony |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
#DIV/0! message | Excel Discussion (Misc queries) | |||
Message Box | Excel Discussion (Misc queries) | |||
changing the message in an error message | Excel Worksheet Functions | |||
OWC Message | Excel Programming | |||
Displaying a message in a message box without requiring user to click anything to proceed | Excel Programming |