varNewDateAnswer = MsgBox(Title:="Contract Dates Confirmation", _
Buttons:=vbYesNoCancel + vbQuestion, _
Prompt:="Your current Contract dates are:" & vbLf & _
vbLf & _
"DESIGN:" & Chr(9) & Chr(9) & Chr(32) & DesignDate & Chr(9) & "for " & oldDesign_rowsCount & " month(s)" & vbLf & _
"CONSTRUCTION:" & Chr(9) & Chr(32) & ConstDate & Chr(9) & "for " & oldConst_rowsCount & " month(s)" & vbLf & _
"POST-OCCUPANCY:" & Chr(32) & PostDate & Chr(9) & "for " & oldPost_rowsCount & " month(s)" & vbLf & _
vbLf & _
"Do you need to change them?!")
EDIT: Beat to it by TMS
Bookmarks