Bonjour à toutes et tous,
OUUUUUUUUUIIIIIIIIIII merciiiiiiiiiiiiiiii Michel.
Désolé pour cet enthousiasme mais là je suis aux anges.
Je ne croyais pas cela possible. Je reste persuadé que cete exemple va servir à d'autres personnes débutantes comme moi. Car le code rest compréhensible.
Michel tu es un dieu.
Euhhhh :whistle: quand à faire si Dieu pouvait une dernière foi se pencher sur mon cas pour paufiner la chose :
- Serait-il possible de faire mettre dans la cellule du mode de paiement : CB quand c'est 2 et CHQ quand c'est 1 ??
- Et enfin je pourrai passer un super Noël sans me retourner l'esprit :
J'ai besoin de faire cette recherche sur 10 lignes. là il en reste 9 donc à faire.
Le principe étant que si j'entre le devis n° 6, il me mette en 1ère ligne le 6, puis le 7, le 8, le 9 .... jusqu'au 15. avec toujours les données sur les factures et le reste se rapportant au devis.
Je pense que la modification à apporter est au niveau du
Range('A5:F5').ClearContents et du
Range('A5') = numDevis
For i = 0 To rsT.Fields.Count - 1
Cells(5, i + 2) = rsT.Fields(i).Value
Next imais suis pas très sur encore.
Voilà ma dernière exigeance pour ce travail Mr. PERE MICHEL (ehhhh oui depuis ce matin le père Noël ne s'appelle plus père Noël mais père Michel, ah au fait pour la statue que je vais ériger en ton honneur dans mon salon tu l'as veux en quoi comme matière !!!!
