Aide code erreur d'exécution VB

Résolu
mediascan_2108 Messages postés 3 Statut Membre -  
mediascan_2108 Messages postés 3 Statut Membre -
Bonjour,


Bonjour,
j'ai un petit problème dans mon code VB.
je suis sur projet de réalisation du formulaire permettant l'enregistrement automatique des personnels. pendant l'exécution de mon formaulaire une erreure d'exécution '9' s'affiche l'indice n'appartient pas à la selection.
Aider moi SVP

derligne = Sheets("Base").Range("A65000").End(xlUp).Row + 1

Configuration: Windows / Chrome 79.0.3945.88
A voir également:

2 réponses

yg_be Messages postés 24281 Statut Contributeur Ambassadeur 1 584
 
bonjour, si tu as bien une feuille nommée "Base", tu peux peut-être essayer ceci:
derligne = Sheets("Base").Cells(Rows.Count, 1).End(xlUp).Row + 1
0
mediascan_2108 Messages postés 3 Statut Membre
 
Merci !
J'ai Notamment modifié et valider et votre code , mais une erreu s'est parvenu pendant l'exécution,
Erreur d'Exécution '438' propiété ou méthode non gerer par cet obejt

Sheets("Base").Cell(derligne, Colonne) = ctrl
alors je ne comprend plus
0
jordane45 Messages postés 40050 Statut Modérateur 4 754
 
Bonjour,

Cells avec un S ... sinon ça ne fonctionnera pas. :-)


NB: J'ai déplacé la question dans le forum vb/vba ...
0
mediascan_2108 Messages postés 3 Statut Membre
 
tiaaaaaaaaaa!!! Yes ça marcher

grand merci
0