Créer un bouton de msie a jour de feuilles excel

kuma_buzz

XLDnaute Nouveau
Bonjour,


Je souhaiterais trouver le moyen de garder une trace des modifications surune colonne de mon fichier excel au cours du temps.

En gros, j'ai un fichier client contenant mes contacts et je voudrais gérer un historique de ce qui a été fait.
Pour cela, j'ai tout d'abord pensé créer des liens vers des fichiers word (1 pour chaque client) et y inscrire la date ainsi que l'état d'avancé des échanges, mais l'utilisation en serait trop fastidieuse.

Ma deuxième idée fut de créer une nouvelle feuille pour chaque semaine pour pouvoir parcourir plus rapidement le document. Le problème dans ce cas est que chaque client n'étant pas toujours contacté aux mêmes intervals, je vais me retrouver avec des cellules vides partout et finalement un document beaucoup plus volumineux qu'utile.


L'idéal (oui je rève certainement, mais autant commencer par là pour arriver à quelquechose de réaliste) serait donc d'avoir une colonne "historique" dans laquelle je rentrerais ce qui a été fait à la date X, avec un bouton "stocker" qui me permette d'envoyer cette "mise à jour" sur une autre feuille (dans l'idéal ça serait même une autre feuille d'un autre classeur excel appelé "historique") portant le nom du client (par chance je n'ai pas plus d'un 50 aine de clients pour le moment) et listant les différentes actions en fonction des dates dans un tableau à 2 colonnes.

Ce bouton "stocker" devrait idéalement ne stocker que les nouvelles modifications, et ne rien ajouter si le contenu de la colonne "date" de la feuille "Fichier client" est identique à la derniere cellule de la colonne "date" de la feuille du client.


Je n'ai pas la sensation d'avoir été clair, alors je joint un fichier excel servant d'exemple.

Merci d'avance pour votre aide.
 

Pièces jointes

  • Fichier Client 2007.xls
    34 KB · Affichages: 105

kuma_buzz

XLDnaute Nouveau
Re : Créer un bouton de msie a jour de feuilles excel

Je me permet de faire remonter mon sujet parceque je n'ai toujours pas trouvé de réponse.

J'ai essayé d'aller lire des tutos en VBA mais il y a des commandes que je n'arrive pas a trouver comme par exemple une commande qui me permettrait de "tester" si une cellule est vide ou non et en fonction de ça d'écrire ou pas une donnée dedans.


J'espère que quelqu'un pourra m'aider.
 

kuma_buzz

XLDnaute Nouveau
Re : Créer un bouton de msie a jour de feuilles excel

Bonjour, et merci pour ta réponse.

C'est à peu près ce que je souhaite faire (mis à part que lors de mes quelques essais je n'ai réussi à visualiser que la modification précédente et non toutes celles que j'ai fait jusque là), mais en stockant les données dans une feuille séparée.
 

Staple1600

XLDnaute Barbatruc
Re : Créer un bouton de msie a jour de feuilles excel

Re


Pour ce qui est de:
J'ai essayé d'aller lire des tutos en VBA mais il y a des commandes que je n'arrive pas a trouver comme par exemple une commande qui me permettrait de "tester" si une cellule est vide ou non et en fonction de ça d'écrire ou pas une donnée dedans.
Code:
sub vide_ou_pas()
If IsEmpty(ActiveCell) Then
MsgBox "cellule vide"
Else
MsgBox "cellule non vide"
End if
end sub
 

kuma_buzz

XLDnaute Nouveau
Re : Créer un bouton de msie a jour de feuilles excel

Ah merci, cela va bien m'aider :)

Sans vouloir abuser de ton aide, j'ai 2 autres points que je n'arrive pas à élucider :

1/ Comment pointer sur cellule d'une autre feuille :

Par exemple dans pour un classeur composé de 2 feuilles Feuil1 et Feuil2 :

Sheets("Feuil1").Select
if "A1" = "Feuil2"."A2" then
Selection.Copy
etc....

2/ Comment déplacer la sélection d'une cellule ?

Par exemple :

Sheets("Feuil2").Select
Range("A1").Select
If IsEmpty(ActiveCell) Then
Goto "A2"
If IsEmpty(ActiveCell) Then
Goto "A3"
Etc ...

Que mettre pour remplacer le Goto "A3" qui permettrait de dire "passe à la cellule en dessous" ?


Merci beaucoup.
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 370
Messages
2 087 693
Membres
103 641
dernier inscrit
anouarkecita2