Based on my limited VBA knowledge as well, the following procedure should work.
I think waiting for an expert's answer is better though.![]()
Sub IdentifyBlanksinDataValidation() On Error Resume NoBlank Cells.SpecialCells(xlCellTypeAllValidation).SpecialCells(xlCellTypeBlanks).Select MsgBox "There are blank cells...", vbCritical Exit Sub NoBlank: ' Your copying fields to other sheet statements go here... End Sub
Bookmarks