ChemistB
Forum Guru

Smalls, simply repeat the main portion of the code (the If section) for each requirement;
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("Y:AD")) Is Nothing Then
Cells(Target.Row, 31) = Date
End If

If Not Intersect(Target, Range("AF:AG")) Is Nothing Then
Cells(Target.Row, 34) = Date
End If

End Sub
Make sense?

Chemist, I was reading a post you assisted on and you showed the following VBA code for a date to populate automatically when a data field is changed.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("Y:AD")) Is Nothing Then
Cells(Target.Row, 31) = Date
End If
End Sub

My question is, how would I do this for more than one range and dates? For example, i need column AE to show that date if Y thru AD is changed, then I need column AH to show a date if fields AF thru AG are changed, etc...

VBA links are at the bottom of the first post. ......Can't locate it !

http://www.excelforum.com/excel-gene...ml#post2632794

one more question please
http://www.excelforum.com/excel-gene...-next-day.html

Thanks, works great.
http://www.excelforum.com/excel-gene...-next-day.html

Can you guide me to a good link where I can learn Excel VB please

Haha, I saw that too ^^

Thanks for all your help.

Need you to guide me to two more things please.

How can I store all my T-SQL queries in Excel sheet, and be able to run it from Excel againt MySQL and SQL Server.

The other please, if you can look at the link below, he is showing a way to execute , not too sure how to program that ?
Executing Selected Tests through Excel Spreadsheet
http://relevantcodes.com/relevantcod...ion-framework/

Much appreciated.

Thank you biggie big for the scales tap!

Thanks for the scales tap!

Yep, it's difficult to get the "Column" part of the formula to match up because you have so many merged cells. Any of the gurus online will tell you to not merge cells for reasons like this. I'll work on it tomorrow.