Journal de ventes

Denis15 -  
Gyrus Messages postés 3360 Statut Membre -
Bonjour,

Voila mon soucis :

J'ai un fichier dans lequel j'ai plusieurs onglets correspondant à des factures...

Je voudrai faire un onglet "Journal" reprenant des éléments de chaque factures à savoir :

Date, nom du client, hors taxe, TVA et TTC...

Une ligne par facture, sachant que le nombre d'onglet peut évoluer selon les mois (j'ai un classeur par mois).

Certaines factures sont plus longues que d'autres ( le TTC est en F56 dans 90% des cas et en F110 dans les autres cas...

J'avais pensé donner un nom aux cellules mais je n'ai pu donner le même nom sur deux onglets différents...

Je ne vois que le VBA pour me sortir de là, mais je coïnce un peu, beaucoup.

Merci par avance de votre aide...

Denis



A voir également:

2 réponses

Réponse 1 / 2
redaiwa Messages postés 370 Statut Membre 119
 
Salam Denis15. :)

Je pense que la fonction Find() fera l'affaire comme dans cet exemple :
https://www.cjoint.com/?DKcl2yKYycz

Voici le code utilisé dans l'exemple : 

Private Sub BoutonJournal_Click()
For f = 1 To Sheets.Count - 1
  Cells(f + 1, 1) = Sheets(f).Cells.Find("Facture n°").Offset(0, 1)
  Cells(f + 1, 2) = Sheets(f).Cells.Find("Date").Offset(0, 1)
  Cells(f + 1, 3) = Sheets(f).Cells.Find("Total TTC").Offset(0, 1)
Next f
End Sub

J'ai supposé que la feuille "Journal" se trouve en dernier.

C'est bien ça que tu voulais ?
0
Réponse 2 / 2
Gyrus Messages postés 3360 Statut Membre 526
 
Bonjour,

Pour info :
Tu peux spécifier l'étendue d'un nom.
Dans "Zone", tu sélectionnes Classeur ou le nom d'une feuille de ton classeur.

https://www.cjoint.com/?DKcnLFCM1DI

A+
0