OVH Cloud OVH Cloud

archivage de table

3 réponses
Avatar
Patoulatchy
bonjour,
j'ai fais des recherches au sein du forum, mais je n'ai=20
pas trouv=E9 ce que je cherchais surement parce ce que je=20
n'utilise pas le bon mot clef.

j'ai une base avec une seule table cr=E9e =E0 partir d'un=20
import de fichier .txt
Pour cela j'utilise une macro qui supprime la table et qui=20
en r=E9cr=E9e une =E0 partir d'un mod=E8le d'import.
Cette manip est a faire tous les mois. Pour archiver je=20
faisais une copie de la table auquel je rajoutais l'ann=E9e=20
et le mois -1 au format aaaamm, puis je lan=E7ais la macro=20
pour cr=E9er la nouvelle table.
J'aimerais automatiser cette manip'.
Peut t'on en auto duppliquer une table en lui ajoutant=20
l'ann=E9e et le mois-1, voire l'ann=E9e-1 si on est en janvier.

En esperant n'avoir pas =E9t=E9 confus
Merci

3 réponses

Avatar
Raymond
Bonjour.

tu peux utiliser ceci:

DoCmd.Rename Format(DateAdd("m", -1, Date), "yyyymm"), acTable, Format(Date,
"yyyymm")
ou
DoCmd.CopyObject , Format(DateAdd("m", -1, Date), "yyyymm"), acTable,
Format(Date, "yyyymm")

pas besoin de tester l'année, le dateadd et format s'en chargent.

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Patoulatchy" a écrit dans le message de
news:1a50601c38795$4eb53080$
bonjour,
j'ai fais des recherches au sein du forum, mais je n'ai
pas trouvé ce que je cherchais surement parce ce que je
n'utilise pas le bon mot clef.

j'ai une base avec une seule table crée à partir d'un
import de fichier .txt
Pour cela j'utilise une macro qui supprime la table et qui
en récrée une à partir d'un modèle d'import.
Cette manip est a faire tous les mois. Pour archiver je
faisais une copie de la table auquel je rajoutais l'année
et le mois -1 au format aaaamm, puis je lançais la macro
pour créer la nouvelle table.
J'aimerais automatiser cette manip'.
Peut t'on en auto duppliquer une table en lui ajoutant
l'année et le mois-1, voire l'année-1 si on est en janvier.

En esperant n'avoir pas été confus
Merci
Avatar
patoulatchy
Merci beaucoup
j'ai réussi à appliquer ce que tu m'a donné
Cela marche à une petite chose près
En utilisant le copyobjet ou même le rename, certains
caractères du nom de fichier destinataire ce change en
equivalence date
ex si mon nom de fichier contient un d il est remplacé par
un 1, et c est aussi remplacé par une date.
Voici l'adpatation de ce que tu m'as indiqué.

Public Function archivage()

DoCmd.CopyObject , Format(DateAdd("m", -1,
Date), "Ficobayyyymm"), acTable, "Ficoba"

End Function

Merci encore.
-----Message d'origine-----
Bonjour.

tu peux utiliser ceci:

DoCmd.Rename Format(DateAdd("m", -1, Date), "yyyymm"),
acTable, Format(Date,

"yyyymm")
ou
DoCmd.CopyObject , Format(DateAdd("m", -1,
Date), "yyyymm"), acTable,

Format(Date, "yyyymm")

pas besoin de tester l'année, le dateadd et format s'en
chargent.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Patoulatchy" a écrit dans le
message de

news:1a50601c38795$4eb53080$
bonjour,
j'ai fais des recherches au sein du forum, mais je n'ai
pas trouvé ce que je cherchais surement parce ce que je
n'utilise pas le bon mot clef.

j'ai une base avec une seule table crée à partir d'un
import de fichier .txt
Pour cela j'utilise une macro qui supprime la table et qui
en récrée une à partir d'un modèle d'import.
Cette manip est a faire tous les mois. Pour archiver je
faisais une copie de la table auquel je rajoutais l'année
et le mois -1 au format aaaamm, puis je lançais la macro
pour créer la nouvelle table.
J'aimerais automatiser cette manip'.
Peut t'on en auto duppliquer une table en lui ajoutant
l'année et le mois-1, voire l'année-1 si on est en
janvier.


En esperant n'avoir pas été confus
Merci

.



Avatar
patoulacthy
Je viens de trouver il faut mettre un avant le caractère
concerné

Encore merci pour ton aide.

-----Message d'origine-----
Merci beaucoup
j'ai réussi à appliquer ce que tu m'a donné
Cela marche à une petite chose près
En utilisant le copyobjet ou même le rename, certains
caractères du nom de fichier destinataire ce change en
equivalence date
ex si mon nom de fichier contient un d il est remplacé
par

un 1, et c est aussi remplacé par une date.
Voici l'adpatation de ce que tu m'as indiqué.

Public Function archivage()

DoCmd.CopyObject , Format(DateAdd("m", -1,
Date), "Ficobayyyymm"), acTable, "Ficoba"

End Function

Merci encore.
-----Message d'origine-----
Bonjour.

tu peux utiliser ceci:

DoCmd.Rename Format(DateAdd("m", -1, Date), "yyyymm"),
acTable, Format(Date,

"yyyymm")
ou
DoCmd.CopyObject , Format(DateAdd("m", -1,
Date), "yyyymm"), acTable,

Format(Date, "yyyymm")

pas besoin de tester l'année, le dateadd et format s'en
chargent.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Patoulatchy" a écrit dans le
message de

news:1a50601c38795$4eb53080$
bonjour,
j'ai fais des recherches au sein du forum, mais je n'ai
pas trouvé ce que je cherchais surement parce ce que je
n'utilise pas le bon mot clef.

j'ai une base avec une seule table crée à partir d'un
import de fichier .txt
Pour cela j'utilise une macro qui supprime la table et
qui


en récrée une à partir d'un modèle d'import.
Cette manip est a faire tous les mois. Pour archiver je
faisais une copie de la table auquel je rajoutais l'année
et le mois -1 au format aaaamm, puis je lançais la macro
pour créer la nouvelle table.
J'aimerais automatiser cette manip'.
Peut t'on en auto duppliquer une table en lui ajoutant
l'année et le mois-1, voire l'année-1 si on est en
janvier.


En esperant n'avoir pas été confus
Merci

.

.