online faq recherche accueil
 

Il y a 60 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici

 Mot :   Pseudo :  
 
Bas de page
Auteur
 Sujet :

Besoin d'aide Excel

 
n°4704123
okrane
demi-membre
Posté le 14-03-2008 à 13:19:15  profilanswer
 

Bonjour à tous,
 
Je rencontre une petite difficulté dans le cadre de l'évolution d'une macro.
Je m'explique, dans le cadre de mon travail, nous recevons des fichiers à mettre en page de manière bien spécifique (colorisation de certains code, suppression de certaines lignes, et masquage de certaines colonnes).  
Cette mise en page une fois exécutée, fait l'objet d'une impression manuelle, puisqu'il faut modifier le titre.
Or, la majorité des personnes traitant cette macro, oubli de modifier le titre dans mise en page.
 
Ma question est, est-il possible lors du lancement de la macro,  
 
- d'ouvrir une fenêtre demandant la saisie complète du titre et qui s'insérerai dans "mise en page/en tête"
- ou d'insérer la date du jour dans l'en-tête (et éviter que celle-ci change si le document doit être consulté dans les jours suivant) complété par le moment où nous avons réceptionné le document (Matin, midi, Pm ou Soir). Petite précision pour le complément. Ils ne sont jamais réceptionnés à heure fixe, et de ce fait, l'idéal serait une fenêtre proposant ces 4 choix à celui qui sort la macro.
 
Rappel : Le titre en finalité doit être du type : USU du "date du jour" Matin (Midi, pm ou soir selon le moment de la journée)
 
Merci d'avance pour votre aide.

n°4704127
devil-kata​na
Heresy
Posté le 14-03-2008 à 14:17:19  profilanswer
 

Alors, en vrac :
Manifestement, tu vas devoir passer par une macro complémentaire, vu que tu ne travailles pas dans le même classeur
De plus, si le titre est fixe, pas besoin de faire une fenêtre de saisie.
Si un fichier du matin ne peut-être généré l'après midi, pas besoin non plus d'une fenêtre à choix multiple, tu peux très bien te baser sur l'heure pour déterminer ton titre (du genre si heure du fichier avant midi-->matin, avant 14h-->midi, avant 18h-->pm, sinon soir)

 

Evolution de macro... Tu as donc quelque chose d'existant ?


Message édité par devil-katana le 14-03-2008 à 14:18:05

---------------
Sur Conseil des Ombres :  
Yamaël - Valium - Elleirys
________________________________________________________
Et je suis en prison pour un crime que je n'ai pas commis... Tentative de meurtre... Est-ce qu'on obtient un prix nobel de physique parcequ'on a presque fait une découverte?
n°4704134
okrane
demi-membre
Posté le 14-03-2008 à 15:42:46  profilanswer
 

Bon bah finalement, le sujet peut être clos. J'ai trouver la solution :  
 
Titre = InputBox("Merci d'inserer le titre des USU" )
With ActiveSheet.PageSetup
.CenterHeader = Titre
End With
 
C'est pas des plus élaboré, mais l'info n'étant pas mon boulot, le plus important c'est que cela fonctionne.


Aller à :
Ajouter une réponse