Mise à jour journalière (quasi) automatique.

kr0osti

XLDnaute Nouveau
Bonjour à tous,

Après avoir cherché à me documenter, essayer différentes solutions, je me tourne vers vous pour vous demander votre aide. N’ayant eu aucune formation en VBA et par manque de temps, mes connaissances tendent vers zéro.

Actuellement en stage (nous utilisons office 2003 sur XP pro.) dans un entrepôt, je suis chargé (entre autre) de la mise à jour quotidienne (weekends exclus) d'un fichier excel synthétisant l'état de son remplissage (fichier exemple que vous pouvez trouver ci-joint).

Tout est fait manuellement, de l'extraction des données des BDD Access, à l'application des styles, des tableaux, etc.

Je souhaiterais, dans un premier temps, pouvoir automatiser les actions suivantes (je les ai classées par feuilles) :

- stock progression
1. Agrandir le tableau (et donc les styles) à L+1
2. Appliquer la date d’aujourd’hui en (A:x+1)
3. « Tirer » les formules contenues dans les colonnes (F:Q) à L+1

- BHC location
1. Agrandir le tableau (et donc les styles) à C+1
2. Appliquer la date d’aujourd’hui en (x+1:2), (x+1:26) et (x+1:49).
3. « Tirer » les formules contenues dans les liges (50:69) à C+1

- GP location
1. Agrandir le tableau (et donc les styles) à C+1
2. Appliquer la date d’aujourd’hui en (x+1:2), (x+1:40) et (x+1:77).
3. « Tirer » les formules contenues dans les liges (78:111) à C+1

- KPM_Diagramm
1. Agrandir le tableau (et donc les styles) à L+1
2. Appliquer la date d’aujourd’hui en (A:x+1)
3. « Tirer » les formules contenues dans les colonnes (B:E) à L+1

Concernant l’insertion des données, je devrais parvenir à déchiffrer et adapter certaines trouvailles.
Votre aide m’aiderait grandement, et puis les prises d’initiatives des stagiaires sont (presque) toujours bien vues !

D’avance, merci.

kr0osti
 

Pièces jointes

  • kr0osti_sample.xls
    270 KB · Affichages: 58

Discussions similaires

Réponses
5
Affichages
286

Statistiques des forums

Discussions
312 241
Messages
2 086 522
Membres
103 241
dernier inscrit
Peyo33