Compteur Excel
Bonjour
Je suis avec le fichier DDhiFacture.xls quand je fini de faire la facture je ferme le fichier et si je ne sauvegarde pas le modele il reviens a T1000. Mais si je sauvegarde il garde le nos de facture ou je suis rendu, mais il garde aussi le nom du dernier client avec sa commande.
Je m'excuse de ne pas avoir été aussi clair dans mes messges précèdent.
Panda
re,
Remplace la macro que je t'ai donnée par celle ci-dessous :
Sub Archiver()
'Macro par Dan pour Panda200 - 11/06/08
Dim nomfichier
Dim PO As String
Dim nom_client As String, num As String
With ThisWorkbook.ActiveSheet
.Copy
nom_client = .Range("B6")
num = .Range("P3")
PO = .Range("I12")
chemin = "C:\Facture\" 'repertoire d'archive
nomfichier = num & "_" & nom_client & "_" & PO & ".xls"
MsgBox "Votre sauvegarde porte la référence : " & nomfichier
With ActiveWorkbook
.SaveAs Filename:=chemin & nomfichier
.Close
End With
.Range("P3") = Left(num, 1) & Right(num, 4) + 1
End With
Range("B6:I6").ClearContents
Range("I12:M12").ClearContents
ThisWorkbook.Save
End SubA te relire
Dan
allo
j'ai installer ton listing,mais comment fait-on pour faire la sauvegarde ?
Merci et excuse mon ignorance
panda
Bonjour a toi
je te mets le fichier avec lequel j'ai mis ta mise a jour, pour etre sur que nous avons la meme chose.
https://www.excel-pratique.com/~files/doc/DD1fhFACTURE2.xls
je te remercie de ton attention.
Je ne sais pas comment sauvegarder, et j'aimerai savoir si c'est possible de mettre une seconde page dans le meme fichier xls, je sais que ce n'est pas trop clair,meme moi je me perd.
je m'explique mieux ( j'espere) dans le fichier DD1fhFACTURE2.xls peut-on avoir deux onglet de la meme facture, car une facture client et une facture (payer en argent) c'est la meme facture sauf un a les taxes et l'autre non, un onglet serai facture client et l'autre facture (argent + taxe) on se sert soit l'un ou l'autre.
sinon si tu es de la province du Québec on pourrait se parler par téléphone, pour plus de facilité.
Merci
Panda
Re,
OK ta macro est bien placée. Pour sauvegarder fais ceci
1. Veille à ce que le répertoire de sauvegarde soit bien C:\Facture . Si ce n'est pas le cas, mets le répertoire correct dans la macro. Tu peux le voir en regard de l'instruction "CHEMIN". Fais aussi attention à laisser le --> \ derrière ce que tu mettras.
2. Dans excel, va dans OUTILS / MACRO /MACRO puis sélectionne la macro ARCHIVER puis clique sur le bouton "OPTION". Dans la fenêtre tu verras une rubrique "raccourci". Là tu mets la lettre --> e
clique sur OK et enregistre ton fichier.
Il te reste à compléter une facture puis lorsque tu veux la sauvegarder, appuie sur la touche "CTRL" et la lettre "e". Cela sauvegardera la facture dans le répertoire c:facture ou celui que tu as mis..
Pour ce qui est de la deuixème facture sans taxe, tu as créé une deuxième feuille dans ton fichier mais elle semble la même. dis moi ce qui est changé ?
A te relire
Dan
Allo
c'est mon erreur (je suis débutant) tu trouveras dans le fichier ddhf1facture2.xls
https://www.excel-pratique.com/~files/doc/iOczTDD1fhFACTURE2.xls
un onglet INVOICE et un autre CASH
je dois modifier INVOICE ( je te fait parvenir le INVOICE.XLS original ) que je dois mettre dans l'onglet INVOICE de DD1fhFACTURE@.XLS
https://www.excel-pratique.com/~files/doc/INVOICE1.xls
avec lui aussi le script que tu as si bien réussi
Merci de prendre tant de temps pour moi c'est tres apprécier
Panda
ALLO
JE SUIS DÉSOLER JE T'AI ENVOYER LE MAUVAIS INVOICE1.XLS
https://www.excel-pratique.com/~files/doc/s25MYINVOICE1.xls
CELUI-CI A TROIS ONGLETS
ENCORE DÉSOLÉ DE L'ERREUR
PANDA
re,
Je ne comprends pas ce que tu veux faire
dans le fichier Facture2, il y a deux onglets Invoice et Cash
dans le fichier Invoice, il y a 4 onglets 1 ST PAGE, 2 ST PAGE, 3 ST PAGE et Counter
quel onglet dois-tu mettre dans le fichier Facture2 ?
En bref c'est Invoice ton fichier de travail ou Facture 2 ?
A te relire
Dan
Re-Bonjour
Je crois que je suis aussi meler que vous.......
J'ai pris mon courage a deux mains et je me suis lancé dans l'action
J'ai créé un fichier qui se nomme FACTURE BETA.XLS
https://www.excel-pratique.com/~files/doc/I1A7dFACTURE_BETA.xls
Est-ce possible de mettre le compteur dans l'onglet INVOICE et celui de CASH SALE ?
Je ne suis pas assez a l'aise avec les macro
et la je crois que j'aurai enfin la bonne solution grace a vous tous.
Désolé pour tout le dérangement
Panda
re,
Il y a aussi une feuille INVOICE2. Là le numéro en P3 doit aussi changer ou pas ?
Dan
Bonjour
il ne faut pas, car le invoice2 est la suite de invoice 1.
Merci encore de votre attention
Panda
Bonjour,
Ton fichier en retour.
Pour sauvegarder, appuie sur CTRL + e sur ton clavier et ta facture INVOICE ou CASH sera sauvegardée dans ton répertoire C:\FACTURE\
Le numéro est incrémenté dans INVOICE et dans CASH à chaque facture.
https://www.excel-pratique.com/~files/doc/FACTURE_BETA1.xls
Amicalement
Dan
Un gros merci pour ce programme
Je vais le tester au bureau lundi,pour l'instant je prends ma fin de semaine OFF pour me reposer et je vous reviens lundi pour vous donner le résultat, qui en passant
devrai etre excellent
Merci encore
Panda
Bonjour
J'ai eu un petit probleme avec incrémentation du nos de facture
notre facturation est rendu a T110000 et quand je le sauvegarde le nos qu'il me donne est T2
merci de votre attention
je vous joint le fichier au cas
https://www.excel-pratique.com/~files/doc/KpWxqFACTURE_BETA1.xls
Merci
Panda
re,
Dans ta macro remplace les instructions
Sheets("Invoice").Range("P3") = Left(num, 1) & Right(num, 4) + 1
Sheets("Cash sale").Range("P3") = Left(num, 1) & Right(num, 4) + 1par celles-ci
Sheets("Invoice").Range("P3") = Left(num, 1) & Right(num, Len(num) - 1) + 1
Sheets("Cash sale").Range("P3") = Left(num, 1) & Right(num, Len(num) - 1) + 1Amicalement
Dan
Un gros MERCI
Je vais tester ca,dans la journée
A bientot
Panda
Désolé de vous déranger encore
mais dans l'onglet CASH SALE
quand je fais mon CTRL E et que je ferme le fichier et que je l'ouvre a nouveau
je retrouve dans l'onglet CASH SALE dans le NOS DE STOCK ,DESCRIPTION,QUANTITE,PRIX etc , la commande précedente.
ca ne fais pas ca dans INVOICE et INVOICE1
Merci encore
Panda
Bonjour
j'ai reussi a résoudre mon probleme précèdent,mais je n'arrive pas a effacer les cellules A20 a P31, la commande du client avec la commande RANGE( XX:XX) car je dois garder mes formules de calculs.
Merci
Panda
Re,
Bien entendu les cellule A20 à P31 ne sont pas effacées. Tu n'avais d'ailleurs pas précisé cela dans ta demande.
Tu veux supprimer A20 à P31 dans la feuille CASH SALE uniquement et à quel moment surtout ?
A te relire
Dan
Re-bonjour
Je fais la commande du client, je rempli mes cellule A20 a P31 et je sauvegarde avec le CTRL E ,ensuite je passe a un nouveau client,c'est la que je dois retrouver mes cellules (A20 a P31) vide. Car le prochain client ne prends pas les memes items,mais les formule de calcul doivent rester.
Merci
Panda