Suppression de colonne si vide

Fermé
manuSP Messages postés 70 Date d'inscription mercredi 21 juillet 2010 Statut Membre Dernière intervention 7 janvier 2012 - 23 juil. 2010 à 12:32
manuSP Messages postés 70 Date d'inscription mercredi 21 juillet 2010 Statut Membre Dernière intervention 7 janvier 2012 - 23 juil. 2010 à 15:14
Bonjour,

Est ce qu'il est possible de supprimer des colonnes lorsqu'elles sont vides ?
j'ai 10 checkbox qui envoient des informations dans des colonnes excel de M à U. Est ce qu'il serait possible de supprimer par exemple la colonne M si je coche la checkbox9 qui envoie une info dans la colonne N ...?

Private Sub CheckBox8_Click()
Range("M3").Value = CheckBox8.Caption
End Sub

Private Sub CheckBox9_Click()
Range("N3").Value = CheckBox9.Caption
End Sub
Private Sub CheckBox10_Click()
Range("O3").Value = CheckBox10.Caption
End Sub

Private Sub CheckBox11_Click()
Range("Q3").Value = CheckBox11.Caption
End Sub

Private Sub CheckBox12_Click()
Range("V3").Value = CheckBox12.Caption
End Sub

Private Sub CheckBox13_Click()
Range("P3").Value = CheckBox13.Caption
End Sub

Private Sub CheckBox14_Click()
Range("R3").Value = CheckBox14.Caption
End Sub

Private Sub CheckBox15_Click()
Range("S3").Value = CheckBox15.Caption
End Sub

Private Sub CheckBox16_Click()
Range("T3").Value = CheckBox16.Caption
End Sub

Private Sub CheckBox17_Click()
Range("U3").Value = CheckBox17.Caption
End Sub

Merci

2 réponses

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 193
23 juil. 2010 à 12:58
Bonjour,
    Columns("M").Delete Shift:=xlToLeft

A+
0
manuSP Messages postés 70 Date d'inscription mercredi 21 juillet 2010 Statut Membre Dernière intervention 7 janvier 2012
23 juil. 2010 à 15:14
bonjour,

Merci de votre réponse, mais en fait je voudrais changer ma façon de faire.
Donc j'ai un bouton de commande qui valide mon formulaire de saisi et j'aimerais que se soit lui qui supprime les colonnes (de M à U) inutilisées.
0