INPUTBOX ANNULER MSG ERREUR
Résolu/Fermé
CHARLYJACK
Messages postés
351
Date d'inscription
mardi 19 octobre 2010
Statut
Membre
Dernière intervention
21 février 2023
-
Modifié par Chris 94 le 23/09/2016 à 15:20
CHARLYJACK Messages postés 351 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 21 février 2023 - 23 sept. 2016 à 15:49
CHARLYJACK Messages postés 351 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 21 février 2023 - 23 sept. 2016 à 15:49
1 réponse
jordane45
Messages postés
37253
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
17 mars 2023
4 551
23 sept. 2016 à 15:26
23 sept. 2016 à 15:26
Bonjour,
Tu as déclaré "lig" comme "long".
Lorsque tu cliques sur annuler... la valeur retournée est vide : "" (donc pas un nombre....)
Tu as déclaré "lig" comme "long".
Lorsque tu cliques sur annuler... la valeur retournée est vide : "" (donc pas un nombre....)
Dim lig
lig = InputBox("Numéro de ligne où effectuer l'insertion ?", "Numéro de ligne")
If IsNumeric(lig) And lig > 0 Then
Rows("26:27").Select
Selection.Copy
Rows(lig).Select
Selection.Insert Shift:=xlDown
End If
23 sept. 2016 à 15:43
j'ai essayé plusieurs variables mais sans succès
je pensais qu'il fallait nécessairement présenter les variable sous la forme
Dim lig as ... Variant, integer, long ....
Cdt
23 sept. 2016 à 15:48
Mais bon.
Si la question est résolue... pense à clore le sujet ( lien marquer comme résolu sous le titre de ta question)
Merci.
23 sept. 2016 à 15:49