PDA

View Full Version : Solved: Show All Data From Two Columns Matching Todays Date In A Msgbox



BigDawg15
03-08-2013, 09:07 AM
Good day,

Attached is a workbook containing code I have pieced mostly from different threads and forums. Also posted here with no replies:
http://www.excelforum.com/excel-programming-vba-macros/905160-show-all-data-from-two-columns-matching-todays-date-in-a-msgbox.html

The workbook works for displaying the first column of data matching today's date, but I don't know enough code to get it to also display the second column data.

Code is setup to run on worksheet_activate. If anyone could help reach the desired output, it would be much appreciated. Once completed, and I understand it, I have a couple other projects that I can apply it to. Always learning. Love XL.

Thank you in advance,

BigDawg15

Kenneth Hobs
03-08-2013, 12:51 PM
Use the Range object's Offset method.
message = message & vbLf & "* " & cell.Text & " vs " & " " & cell.Offset(0, 1).Text & vbLf

BigDawg15
03-08-2013, 12:55 PM
Kenneth,

Thank you so much. Worked perfectly as I suspect you knew it would! :clap:

Appreciate your response and help.

Mike