Bonjour à toutes et tous,
Je cherche à créer une macro pour supprimer toutes les validations (données, validation) de toutes les feuilles d'un classeur.
Le classeur pouvant contenir un nombre variable de feuille et toutes sortes de validations de données (liste, nombre, date, etc...) sur 1 ou plusieurs cellules.
J'ai écrit une amorce de code mais qui ne fonctionne pas comme souhaité. cf classeur joint.
Pourriez vous m'aider à finaliser ma macro ?
Merci
Cordialement
Hugues
Sub DELVALIDATION()
'supprimer toutes les listes de validation de toutes les feuilles du classeur actif
Dim sh As Sheets
On Error Resume Next
For Each sh In ActiveWorkbook
ActiveCell.SpecialCells(xlCellTypeAllValidation).Delete
Next sh
End Sub