Bonjour,

Je viens de me mettre a VBA, et je commence a faire des macro toute simple mais je bloque depuis plusieurs heure sur ce probleme. Je ne sais pas si j'ai poste au bonne endroit donc veuillez m'excuser si c'est le cas.

Je cherche a copier une fonction now() qui se trouve en H1 vers la derniere ligne de mon tableau en colonne 13. Le coller doit en valeur afin d'eviter de copier la fonction.

J'ai fait ce bout de code mais il ne marche pas.

Merci d'avance pour votre aide.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub dateheure()
 
    Dim nbrligne As Long
    Dim today As String
 
 
    Worksheets("donnees").Activate
 
    today = worksheets("donnees").range(H1)
    nbrligne = target.row.count
 
    Worksheets("donnees").Cells(nbrligne, 13).Paste= today 
 
End Sub