Bonjour le forum,
J'ai un classeur me servant de suivi de projet, j'ai pour contrainte de ne pouvoir le faire circuler, je vais donc essayer d'être le plus clair possible.
Explication: j'ai dans une feuille(appelée: projets) le suivi de plusieurs projets détaillés, et comme tout projet avance il me faut pouvoir insérer des lignes tout en gardant mes formules (calcul de date, liste de choix déroulante...)
J'ai donc crée une petite macro me permettant de réaliser en appuyant sur un bouton. Voici le petit code:
Sur ma seconde feuille (appelé: tab, feuille caché) qui est un tableau récapitulatif des projets qui se composent des mêmes données que ma feuille ma feuille "projets" (avec quelques conneries en plus). Cette feuille génère une feuille nommée "macroprojet", qui comme son nom l'indique fait office de vue globale sur les différents projets en cours.
J'ai besoin que l'insertion de ligne sur la feuille "projet" soit générer automatique sur ma feuille "tab"aussi.
La solution qui me semble la plus efficace, serait de recopier les coordonnées de ma cellule active, et de transférer ces coordonnées sur la feuille "tab" et de ré-exécuter le code que j'ai écrit.
Mais je n'ai aucune idée pour faire cela. J'en viens donc vers vous pour m'aider à résoudre ce problème.
Cdlt,
Founguex
J'ai un classeur me servant de suivi de projet, j'ai pour contrainte de ne pouvoir le faire circuler, je vais donc essayer d'être le plus clair possible.
Explication: j'ai dans une feuille(appelée: projets) le suivi de plusieurs projets détaillés, et comme tout projet avance il me faut pouvoir insérer des lignes tout en gardant mes formules (calcul de date, liste de choix déroulante...)
J'ai donc crée une petite macro me permettant de réaliser en appuyant sur un bouton. Voici le petit code:
Code:
Sub Macroinsert()
Application.ScreenUpdating = False
ActiveCell(2).Resize(1).EntireRow.Insert
ActiveCell(1).EntireRow.Copy ActiveCell(2).Resize(1).EntireRow
On Error Resume Next 'au cas où il n'y ait pas de constantes
ActiveCell(2).Resize(1).EntireRow. _
SpecialCells(xlConstants).ClearContents
End Sub
Sur ma seconde feuille (appelé: tab, feuille caché) qui est un tableau récapitulatif des projets qui se composent des mêmes données que ma feuille ma feuille "projets" (avec quelques conneries en plus). Cette feuille génère une feuille nommée "macroprojet", qui comme son nom l'indique fait office de vue globale sur les différents projets en cours.
J'ai besoin que l'insertion de ligne sur la feuille "projet" soit générer automatique sur ma feuille "tab"aussi.
La solution qui me semble la plus efficace, serait de recopier les coordonnées de ma cellule active, et de transférer ces coordonnées sur la feuille "tab" et de ré-exécuter le code que j'ai écrit.
Mais je n'ai aucune idée pour faire cela. J'en viens donc vers vous pour m'aider à résoudre ce problème.
Cdlt,
Founguex