OVH Cloud OVH Cloud

Sauvegarder automatiquement des info dans un autre fichier

1 réponse
Avatar
frederic.bescond
Bonjour tout le monde,

J'ai cr=E9e un fichier facture.xlt que mes commerciaux utilisent quand
ils veulent faire leurs factures.
Je souhaite que certaines donn=E9es (nom du client, num=E9ro de facture,
prix HT...) soient sauvegard=E9es dans un fichier tableau.xls sous la
forme suivante : une ligne par facture.
Quelqu'un a une id=E9e?
Merci de votre aide,

fred

1 réponse

Avatar
frederic.bescond
Merci encore RGI,

fred
RGI wrote:
bonjour

dans le xlt créer une procédure de sauvegarde
dans cette procédure ouvrir le fichier tableau.xls
ex:
ChDir "c:"
Workbooks.Open Filename:= _
"c:tableau.xls", UpdateLinks:=0
Sheets("Sauvegarde").Select
[a1].Select
dans cette feuille verifier si le n° de facture existe
avec recherchev ou find
si le n0 exite quitter la procédure
sinon
trouver la première ligne vide
ex:
derlig = Range("A5000").End(xlUp).Row + 1
et inscrire les données à partir de cette cellule
sauvegarder
et fermer le fichier
pour ne pas avoir la visu à l'écran
mettre cette procédure entre Application.ScreenUpdating = False / True

salutations

RGI


Bonjour tout le monde,

J'ai crée un fichier facture.xlt que mes commerciaux utilisent quand
ils veulent faire leurs factures.
Je souhaite que certaines données (nom du client, numéro de facture,
prix HT...) soient sauvegardées dans un fichier tableau.xls sous la
forme suivante : une ligne par facture.
Quelqu'un a une idée?
Merci de votre aide,

fred




--------------000607050904070009010206
Content-Type: text/html; charset=ISO-8859-1
X-Google-AttachSize: 1873

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html;charset=ISO-8859-1" http-equiv="Content- Type">
</head>
<body bgcolor="#ffffff" text="#000000">
bonjour<br>
<br>
<font face="Courier New" size="2">dans le xlt cr&eacute;er une proc&e acute;dure de
sauvegarde<br>
dans cette proc&eacute;dure ouvrir le fichier tableau.xls<br>
ex:<br>
<font color="#000099"> </font>ChDir "c:"<br>
<font color="#000099"> </font>Workbooks.Open Filename:<font color="#0 00099"> </font>"c:tableau.xls", UpdateLinks:=0<br>
<font color="#000099"> </font>Sheets("Sauvegarde").Select<br>
<font color="#000099"> </font>[a1].Select<br>
dans cette feuille verifier si le n&deg; de facture existe<br>
avec recherchev ou find<br>
si le n0 exite quitter la proc&eacute;dure<br>
sinon<br>
trouver la premi&egrave;re ligne vide<br>
ex:<br>
derlig et inscrire les donn&eacute;es &agrave; partir de cette cellule<br>
sauvegarder <br>
et fermer le fichier<br>
pour ne pas avoir la visu &agrave; l'&eacute;cran<br>
mettre cette proc&eacute;dure entre Application.ScreenUpdating <br>
</font>salutations<br>
<br>
RGI<br>
<br>
<br>
<a class="moz-txt-link-abbreviated" href="mailto: il.com"></a> a &eacute;crit&nbsp;:
<blockquote
cite=""
type="cite">
<pre wrap="">Bonjour tout le monde,

J'ai cr&eacute;e un fichier facture.xlt que mes commerciaux utilisent qua nd
ils veulent faire leurs factures.
Je souhaite que certaines donn&eacute;es (nom du client, num&eacute;ro de facture,
prix HT...) soient sauvegard&eacute;es dans un fichier tableau.xls sous la
forme suivante : une ligne par facture.
Quelqu'un a une id&eacute;e?
Merci de votre aide,

fred

</pre>
</blockquote>
</body>
</html>

--------------000607050904070009010206--