Ilino
XLDnaute Barbatruc
Bonjour Forum
je souhaite effacer les valeurs des cellules fusionnées ( de 2 colonnes) avec ce code mais ca bug ???
je souhaite effacer les valeurs des cellules fusionnées ( de 2 colonnes) avec ce code mais ca bug ???
Code:
Private Sub CommandButton1_Click()
'
If MsgBox("Toutes les données de la colonne Italie et France vont être effacées ! Êtes-vous sûr(e) de vouloir continuer ?", _
vbYesNo, "Attention !") = vbYes Then Range("E3: e18;H3:h18").ClearContents
Range("E3").Select 'la cellule E3 est sélectionnée
End Sub