View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Stefi Stefi is offline
external usenet poster
 
Posts: 2,646
Default MsgBox containing text from cell

Sorry, I should have noticed before, the correct reference to cell F29 in VBA
is Range("F29") or Cells(29,6). Check the format of F29, it should be Date!

Sub ReminderMessageOnOpening()

Dim ReportType As String

If ThisWorkbook.Sheets("Instructions").Range("C29") < "" Then
ReportType = ThisWorkbook.Sheets("Instructions").Range("C29")
If ThisWorkbook.Sheets("Instructions").Range("F29") = Date Then
MsgBox ("Reminder.... Project " & ReportType & "due today")
End If
End If
End Sub

Regards,
Stefi