mathiouze22
XLDnaute Junior
bonjour
J'ai développé une macro qui permet de saisir des lignes comptables dans un budget.
le principe, c'est de vérifier d'abord si la référence a déjà été saisie avant de la (re)créer.
L'outil de saisie est sur la Feuil1 et la Feuil2 est l'onglet où sont recopiées les données.
Pour trouver si la référence existe, je passe par ce bout de code parce que je n'arrive pas à gérer le find + with, ca me retourne une erreur.
le problème avec ce code c'est que c'est bcp plus long à tourner donc j'aimerais bien savoir comment le gérer avec un "with"
j'espère que tout est clair sinon n'hésitez pas à me poser des questions
J'ai développé une macro qui permet de saisir des lignes comptables dans un budget.
le principe, c'est de vérifier d'abord si la référence a déjà été saisie avant de la (re)créer.
L'outil de saisie est sur la Feuil1 et la Feuil2 est l'onglet où sont recopiées les données.
Pour trouver si la référence existe, je passe par ce bout de code parce que je n'arrive pas à gérer le find + with, ca me retourne une erreur.
le problème avec ce code c'est que c'est bcp plus long à tourner donc j'aimerais bien savoir comment le gérer avec un "with"
Code:
sheets("Liste budget").activate
Cells.Find(what:=ref).activate
'ligne de la référence
X = ActiveCell.Row
'colonne de la référence
j = ActiveCell.End(xlToRight).Column + 1
'référence
Cells(X, j).Value = refd
j'espère que tout est clair sinon n'hésitez pas à me poser des questions
Dernière édition: