Bonjour Marie, le Forum
S'il te plait, je te conseille de lire un petit peu notre
Charte et tout particulièrement les articles
4°)-a- et
4°)-b-...
Car je te signale, que t'ayant donné cette échantillon pour te permettre d'utiliser une "Application.InputBox" (
Lien supprimé... je finissais ce post, en te posant la question "Mais est-ce au moins ceci que tu cherches ?"
Donc selon toute vraissemblance oui !! Mais tu aurais dû rester dans le même fil de discussion puisque c'est toujours lié à la même macro et au même problème...
Pour te répondre, oui bien sûr on peut gérer cette erreur en cas de fermeture de l'InputBox, d'action "Cancel" ou de non sélection..., voici un moyen tout simple :
Sub MarieGestionCancel()
Dim Plage As Range
On Error GoTo ErrorHandler
Set Plage = Application.InputBox("Sélectionner une plage avec votre souris...", "SELECTION DE LA PLAGE A LA SOURIS", Type:=8)
MsgBox "Vous avez sélectionné : " & Plage.Address _
& vbCrLf & "Soit : " & Plage.Count & " cellules"
Exit Sub
ErrorHandler:
MsgBox "Vous n'avez pas fait de sélection, Opération annulée", vbExclamation
End Sub
Bonne Fin de Journée
@+Thierry