Copier une variable VBA dans une cellule XLS

Résolu
ben13.51 Messages postés 112 Date d'inscription   Statut Membre Dernière intervention   -  
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

Je souhaite copier dans une cellule EXCEL la valeur d'une variable VBA recevant la saisie d'une inputbox...

Voilà le code que j'ai entré:

Sub AfficheInbox_NumPoisson()
'InputBox Numéro du Poisson
NumPoisson = InputBox("Saisissez le N° du Poisson", "N° Poisson")
NumPoissonNum = Val(NumPoisson)
Cells("NuméroPoisson") = NumPoissonNum

La cellule que j'ai appellée NuméroPoisson doit recevoir la valeur de la variable type Integer NumPoissonNum

Mais c'est sur cette dernière ligne que ma macro plante... elle n'aime pas le = NumCoeurNum

Si quelqu'un peut m'aider la dessus je lui en serais très reconnaissant

Merci d'avance
A voir également:

4 réponses

Réponse 1 / 4
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

C'est le Cells("NuméroPoisson") qui ne passe pas. Il faut mettre les coordonnées de la cellule qui doit recevoir la valeur de la variable : Cells(1,1) correspond à A1, Cells (1,2) à B1, Cells(3,5) à E3 etc ...

;o)
1
Réponse 2 / 4
leplot Messages postés 191 Date d'inscription   Statut Membre Dernière intervention   131
 
Bonjour

il suffit de mettre range("NuméroPoisson") et non cells.

LePlot
0
Réponse 3 / 4
ben13.51 Messages postés 112 Date d'inscription   Statut Membre Dernière intervention   7
 
Effectivement l'erreur n'était pas où elle semblait être
Merci bcp, me voilà sauvé!!
0
Réponse 4 / 4
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
De rien,

Bonne continuation.

;o)
0

Discussions similaires

dessin avec symbole clavier
JSS -
Adraen -

79 réponses
VBA : Range avec références variables..
Antoine -
MIKE59 -

7 réponses
excel fractionner une cellule horizontalement
jalil -
barbiy -

5 réponses
Remplir une cellule (texte) en fonction d'une autre (texte).
SOMUM -
SOMUM -

4 réponses