Posez votre question Format imprimable Liste des forums Aidez-les Statistiques Rechercher Charte Forum Programmation

[Excel] Lien dynamique

Dernière réponse le 19 déc 2004 à 10:34:44 Keep, le 26 nov 2004 à 09:37:20

Signaler ce message aux modérateurs

Bonjour,

J’ai un fichier Excel (Fichier client) imposé par le client qui reprend par ligne l’état d’avancement chronologique des différents chantiers. Chaque ligne reprend un chantier avec des dates validées (Interior.ColorIndex=1) et des dates prévisionnelles (Interior.ColorIndex=2). Je souhaite importer dans un second fichier excel certaines colonnes du fichier client (données et formats) avec mises à jour automatique ainsi que des colonnes supplémentaires me permettant d’assurer un tracking efficace sur les dates. Je ne suis pas autoriser à modifier le fichier client et ce dernier ne me permet pas d’assurer un suivi efficace. Le problème est que le nombre de chantiers (et donc de lignes) n’est pas fixe. Quelqu’un peut-il m’aider.

Merci d’avance

Posez votre question Répondre

Kobaya, le 26 nov 2004 à 10:25:15

Salut,

une procédure comme celle-ci pourrait peut-être t'aider :

sub Traitement()
Range("A1").Select
Do

' ton traitement

ActiveCell.Offset(1, 0).Select
Loop Until ActiveCell.Value = ""
End Sub

A+.

Répondre à Kobaya

Keep, le 26 nov 2004 à 12:01:32

Salut kobaya,

Merci pour le réponse qui me permet de faire un loop jusqu'à la dernière cellule vide. Mais je voudrais importer de manière dynamique toutes les cellules (data et mise en forme) dans un nouveau fichier et ceci sans ouvrir le fichier client (si possible). Je n'ai pas besoin d'importer les formules. Ceci me permettrait de travailler sur mon propre fichier avec mises à jour automatique à partir du fichier client.

A bientôt

Keep

Répondre à Keep

random, le 14 déc 2004 à 10:05:48

Puisque la boucle te permet de defiler les cellules il te reste à mettre en place

if CELL.interior.color = red then
je mets ma valeur la
else
je la mets ici
end if

Répondre à random

keep, le 19 déc 2004 à 10:34:44

Merci Random,

J'y suis arrivé avec beaucoup de patience.
A+

Répondre à keep

Posez votre question Répondre