Discussion :

[Mag06]

Bonjour à tous,

J'espère que je serais claire dans mes explications car j'ai moi-même du mal à mettre par écrit ce que je souhaite faire. Alors je m'excuse par avance...

Voilà je créé un menu avec des useforms qui me permettre d'enregistrer les factures puis dans un second temps d'enregistrer les paiements de ces factures.

J'ai donc une feuille de classeur contenant ma liste de facture avec date, numéro de facture, montant...

Je voudrais que lorsque je rempli mon useform de PAIEMENT FACTURE je renseigne le numéro de facture et les infos sur le paiement se renseignent sur la ligne correpondant à la facture en question.

Merci d'avance pour votre aide.

A bientôt.
Magali

[EngueEngue]

bah quand tu cliques:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
numligne=Range(lerangedetafacture).find(tonnumerodefacture).row
 
cells(numligne,numcolonnedate)=textboxdate

Et ainsi desuite

[Didier Gonard]

Bonjour,
Tu as ta feuille de données, ce dont tu as besoin ce sont les données x,y de le cellule cible.

Dans ton USF, tu fais une listbox ou combo que tu alimentes avec ta liste de facture non payées (c’est le boulot d’une boucle pour faire simple), mais tu la fais multi colonnes et en colonne 2 tu mets le N° de la ligne de chaque facture (propriété Row de la cellule N° facture considérée). Du coup quand tu cliques sur la facture choisie, ta cellule cible est :

Cells (N° de ligne récupéré, N° de colonne retourné par la propriété Column de la cellule d’entête qui est nommée xxxx).

Pour plusieurs colonnes à renseigner, tu fais idem mais en faisant varier le N° de colonne selon le nom….

voir si besoin ce tuto sur les contrôles d'un USF :
http://silkyroad.developpez.com/VBA/...serForm/#LII-G


Cordialement,

Didier

[Mag06]

Bonjour Merci pour ton retour.

Mais dans ce code la valeur renvoyer sera toujours la même ?

Moi je voudrais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
no_ligne = Sheets("TABLEAU_FACTURES").Range("celui du numero de facture renseigner dans mon Textbox7").find(retrouver numero dans la colonne2).Row

Je sais pas si c'est clair ?

Bonjour Ormonth,

Merci pour ton aide, je vais aller voir si ton lien peux me venir en aide.

Je te dirais si j'ai trouver une solution.
Merci

[EngueEngue]

Mag.. tu n'as pas compris l'utilité de la fonction find

[Mag06]

Non c'est vrai pas du tout ...
en fait je suis un peu perdue quand il y a trop de conditions.

[EngueEngue]

Zero conditions tu trouves ton code facture tu prends son argument row et en fonction de cette row tu remplis tes autres cases. 3 lignes de code..