View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
[email protected] alex.ferrazza@googlemail.com is offline
external usenet poster
 
Posts: 7
Default recalling named ranges as must fill cell

on my workbook I have some ranges that must be filled in prior to
saving the file:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel As Boolean)
Dim checkCells As Range
Dim cell As Range
Set checkCells = Sheets("Sheet1").Range("A1, B2, C3")
For Each cell In checkCells
Cancel = Cancel Or IsEmpty(cell)
Next cell
If Cancel Then
MsgBox "Cell(s) " & Replace(checkCells.Address( _
False, False), ",", ", ") & _
" must be filled in prior to saving."
End If
End Sub

What I want to acieve is this A1 cosrresponds to Name and B2
corresponds to Address I would like the user to have a flag that sais
you must fill in Name, Address etc and the cells are a different
colour on the spreadsheet.

id it possible?

thanks

Alex