Mit dem folgenden Makro können Sie alle Zellen eines Tabellenblattes markieren, denen eine Datenüberprüfung hinterlegt worden ist.
Sub Alle_Zellen_mit_Datenueberpruefungen_markieren()
ActiveCell.SpecialCells(xlCellTypeAllValidation).Select
End Sub