D
Dja64
Guest
Bonjour,
Je rencontre actuellement un problème avec une petite base de donnée que je fais sous excel. J'ai créé un bouton "supprimer" et quand on clique dessus une boite de dialogue s'ouvre pour demander le numéro de la ligne que l'on veut supprimer. La suppression de ligne fonctionne bien mais, quand on décide de supprimer aucune ligne et que l'on clique sur annuler un message d'erreur apparait. Ma macro est la suivante:
Dim titre As String
titre = InputBox("Pour supprimer une ligne, tapez le numéro de cette ligne puis cliquez sur entrée." & vbCrLf & "Pour supprimer les lignes de 2 à 6, tapez 2:6, puis cliquez sur entrée")
If titre = vbCancel then
Else
Rows(titre).Select
Selection.Delete Shift:=xlUp
Range("A3").Select
End If
Aidez moi SVP!
Je rencontre actuellement un problème avec une petite base de donnée que je fais sous excel. J'ai créé un bouton "supprimer" et quand on clique dessus une boite de dialogue s'ouvre pour demander le numéro de la ligne que l'on veut supprimer. La suppression de ligne fonctionne bien mais, quand on décide de supprimer aucune ligne et que l'on clique sur annuler un message d'erreur apparait. Ma macro est la suivante:
Dim titre As String
titre = InputBox("Pour supprimer une ligne, tapez le numéro de cette ligne puis cliquez sur entrée." & vbCrLf & "Pour supprimer les lignes de 2 à 6, tapez 2:6, puis cliquez sur entrée")
If titre = vbCancel then
Else
Rows(titre).Select
Selection.Delete Shift:=xlUp
Range("A3").Select
End If
Aidez moi SVP!