supprimer les lignes relatives à une cellule fusionnée

[Jeecer]

Bonsoir à tous!

Ma question est simple mais me semble compliquée..

Je cherche à créer une macro qui supprimerait toutes les lignes relatives à une cellule fusionnée préalablement sélectionnée par un clic, dont on ne sais pas combien de cellules au juste ont été fusionnée...

Voilà, ça fait un bout de temps que je planche dessus, si qqun a la réponse, il aurait toute ma considération et même plus!

Merci!

 

[job75]

Re : supprimer les lignes relatives à une cellule fusionnée

Bonjour Jeecer,

Si j'ai bien compris :

Sub SupprimeLignes()
Dim c As Range
Set c = ActiveCell 'peut être définie autrement...
With c.MergeArea
  If .Count > 1 Then .EntireRow.Delete
End With
End Sub

A+

 

[Jeecer]

Re : supprimer les lignes relatives à une cellule fusionnée

merci beaucoup c'est efficace, exactement ce que je recherchais!
J'aurais appris un truc super utile!

Merci encore