Bonjour,
Ce code fonctionne normalement :
Celui-ci plante (erreur 1004 pas de cellules correspondantes) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Sub test2() Dim C As Range With Sheets("Feuil1") .Range("A1").Clear Set C = .Range("A1").SpecialCells(xlCellTypeBlanks) End With End Sub
Pouvez-vous m'expliquer ? J'ai bien lu qu'il y avait un bug si la plage concernait plus de 8192 cellules non consécutives mais ce n'est évidemment pas le cas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Sub test1() Dim C As Range With Sheets("Feuil1") .Range("L18:W140").Clear Set C = .Range("L18:W140").SpecialCells(xlCellTypeBlanks) End With End Sub
Merci d'avance.
NB. J'ai fermé et redémarré Excel au cas où. Sans succès.
Partager