aide facture

[HASSAN]

salut a tous.
je joins a ma demande mon appli de facture.
je suis au bout de la realisation de mon outil de travail mais je rencontre un dernier probleme.
dans la feuille 'archivage des donnes', il y a les factures qui y sont repertoriés avec le n° de table, nb de pers? montant et moyen de paiement.
ce que j'aimerai faire c ke lorsque je clique sur un n°de facture, je puisse retrouver le détail de la facture: càd les plats qu'ils ont pris, le vin etc....
comment faire merci bocou bocou
slt Hassan [file name=FACTURE_20051030021921.zip size=49407]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/FACTURE_20051030021921.zip[/file]

 

[Dugenou]

Salut Hassan,

Je crois que tu n'est pas au bout de tes peines. Si tu veux retrouver le détail de chaque facture, il faut d'abord l'enregistrer !
Dans la macro du bouton d'impression, il faut ajouter l'enregistrement dans la feuille archive du détail de chaque addition

Bon courage

 

[ziopizza]

Bonjour Hassan,Dugenou,

Comme le dit Dugenou il y a du boulo,
je vais essayer d’adapter le code mais il me faut un peu de temps.


Yves

 

[excalibur]

bonjour HASSAN Dugenou le forum pour faire simple tu peus completer ton code par ex:With Sheets('ARCHIVE')
.Range('a' & l).Value = Date
.Range('b' & l).Value = Range('e37').Value
.Range('c' & l).Value = Range('g15').Value
.Range('d' & l).Value = Range('b38').Value
.Range('e' & l).Value = nombre
.Range('y' & l).Value = [b13]
.Range('aa' & l).Value = [c13]
.Range('ab' & l).Value = [b14]
.Range('ac' & l).Value = [c14] 'ect
End With.....puis dans ta feuille archives tu peus traiter l evenement en cliquer sur une cell Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range('F:F')) Is Nothing Then
ActiveWindow.LargeScroll ToRight:=2
End If
End Sub'on peut faire plus sophistique par ex en cliquant sur un n° de facture ca ouvre un userform avec les details de la facture salutations

 

[excalibur]

bonjour ziopizza excuse pas vu

 

[ziopizza]

Bonjour a tous,

voici l'adaptation du code .

Yves @+
(suis absent jusqu'à Mardi)

 

[ziopizza]

Excuse moi le fichier étais trop gros.

Yves

 

[ziopizza]

peut étre va passer ?
Yves [file name=facture.zip size=48323]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/facture.zip[/file]