Bonjour,
Je viens tout juste de commencer un stage en programmation VBA sous excel mais malheureusement pour moi je galère un petit peu...![]()
Je viens donc pour poster mes différentes questions, j'espère que vous pourrez m'aider, car malheureusement pour vous je vais beaucoup vous solliciter.
On ferra étape par étage, je vais commencer mais vous expliquer le sujet de mon stage:
Dans un premier temps je dois faire des modifs sur 2 fichiers excel afin de les rendre plus maniables.
Dans un deuxieme temps je dois faire une liaison entre mes 2 fichiers excel et un ficher word
Mais pour le moment j'ai pas mal de modif a faire sur les fichers excel!
Mes 2 fichiers excel
Le premier est un "bon de commande", je dois pour y ajouter la date d'aujourd'hui si le fichier est un nouveau fichier. (Mon premier probleme :s)
j'ai fait une fonction qui lors de l'ouverture de mon fichier, si celui ci est l'original ("offres.xls"), je mets la date dans plusieurs cellules
Quand j'ouvre alors mon ficher la date ne s'affiche pourtant pas!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Private Sub Workbook_Open() If ActiveWorkbook.Name = "offres.xls" Then Today = "=AUJOURDHUI()" Worksheets("offre").Range("C12,E12").Value = Today Worksheets("offre").Range("D13").Formula = Today End If End Sub
C'est un de mes nombreux problemes, j'espere que vous pourrez m'aider, merci d'avance
Aurore
Partager