Bonjour à tous,
 
je suis très débutante dans la vba. c'est un sujet qui m'intéresse beaucoup.
je me perfectionne tranquillement ...
je suis bloquée sur mon fichier excel,  
j'ai réalisé cette formule pour effacer la saisie d'une ligne complète (B)ou sur la cellule du bout de la ligne j'ai positionné un bouton qui efface bien la ligne concernée
j'aurai souhaité reproduire le même cheminement sur les autres lignes si j'étire la série vers le bas (via une chaine ?) car le fichier se rempli via un formulaire de saisie.  
 
merci beaucoup vraiment pour votre aide.
 
bonne fin de journée
 
cécile
 
'**************************
' effacer saisie de la ligne
'***************************
Sub supprimer()
 
    If MsgBox("Etes-vous certain de vouloir supprimer le contenu de la ligne ?", vbYesNo, "Demande de confirmation" ) = vbYes Then
        Range("B5:S5" ).ClearContents
        MsgBox "Le contenu de la ligne a été effacé !"
    End If

Ce sujet a été déplacé de la catégorie Hardware vers la categorie Programmation par Neji Hyuga

J'avance lentement mais surement, voici ma saisie pour le moment sachant que j'aimerais mettre mes lignes en variable et pouvoir décaler la ligne a effacer en fonction du bouton qui s'y trouvera ( a chaque ligne se trouve un bouton "effacer".
 
'*************************
' effacer saisie de la ligne
'***************************
Sub supprimer()
   'Déclaration de la variable
    Dim var1_explicite As Integer
     
     
    'Attribution d'une valeur à la variable
    var1 = "B" + "5" + ":" + "s" + "5"
    If MsgBox("Etes-vous certain de vouloir supprimer le contenu de la ligne ?", vbYesNo, "Demande de confirmation" ) = vbYes Then
        Range(var1).ClearContents
        MsgBox "Le contenu de la ligne a été effacé !"
    End If
 
     
    End Sub

Bonjour,
 
Pour bien débuter :