Discussion :

[alex830001]

Bonjour,

Voila tout est dans le titre

Je voudrais archiver dans un fichier ("data_log") la date les dates et heures auquelles les utilisateurs cliquent sur un bouton.

Donc j'enregistre la date et l'heure comme ceçi:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Dim log As String
log = Now()

et la il faut donc que je puisse enregistrer la valeur de la variable String log sur la premiere ligne vide de la colonne A du fichier "data_log". C'est ici que je bloque....

Merci pour votre aide.

[oOVaveOo]

Bonjour :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Data_log").Range("A65536").End(xlUp).Offset(1, 0).Select

[alex830001]

mon probleme réside plus dans le fait d'ouvrir le fichier data_log que dans le fait d'atteindre la premiere ligne vide.

Ce code permet de selectionner la premiere ligne vide de l'onglet data_log. Dans mon cas data_log n'est pas un onglet mais un autre fichier. C'est sur ça que je bloque.

[oOVaveOo]

Désolé, j'ai effectivement cru que tu parlais d'un onglet.

Il faut donc que tu ouvres ton fichier, que tu colle la valeur et que tu le referme ?

Si c'est ça, je te conseille d'utiliser l'enregistreur de macro, et d'adapter le code.

[alex830001]

C'est bon j'ai reussi.

Si y'en a que ça interresse voila mon code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
log = Now()
Workbooks.Open Filename:= _
        "C:\.....\data_log.xls"
 
Sheets("Feuil1").Range("A65536").End(xlUp).Offset(1, 0).Value = log
 
ActiveWorkbook.Save
ActiveWorkbook.Close

merci