Intégration de la date d'aujourd'hui dans une phrase

Bonjour,

Voulant rajouter la date dans une cellule mais précédé par un texte j'ai écrit ce code

    With Workbooks("Rapport Facturation Lutterbach du " & Replace(Format(du, "dd/mm/yyyy"), "/", "_") & " au " & Replace(Format(au, "dd/mm/yyyy"), "/", "_") & ".xlsx")
        .Sheets("Rapport").Cells("A1").Value = "Rapport suivi commande du " & du & " au " & au & " , généré le " & Date
        .Sheets("Rapport").Range("A1:E1").Interior.ColorIndex = 6
        .Save
        .Close
    End With

Le problème est que la première ligne sous le With est erroné, l'erreur 5 en ressort,pouvez-vous m'aidez à la résoudre car je ne vois pas mon erreur

Cordialement.

Arthur.

EDIT: "du" et "au" sont des variables remplis par l'utilisateur via un textbox d'un userform et vous aurez deviné que ce sont des dates :0

Probleme solved,

il fallait juste remplacer le Cells("A1") par Range("A1") .....

Erreur débile mais bon, au passage si quelqu'un pouvait m'expliquer la différence entre les deux ce serait sympas

Cordialement.

Arthur.

Bonjour Arthur,

Range("A1") indique la cellule A1.

Cells("A1") n'est pas valable car la syntaxe est : Cells(ligne, colonne)

Exemple : Cells(5, 3) est la même chose que Range("C5"),

mais tu peux aussi écrire : Cells(5, "C")


De plus, dans un Range(), on peut indiquer plusieurs cellules ; exemple :

Range("A5, C12, G8").ClearContents


Il y a aussi une syntaxe spéciale du Range() :

Range(Cells(8, 3), Cells(20, 6)) = C8:F20

Regarde l'aide VBA pour plus d'infos.

dhany

Bonjour dhany,

merci beaucoup pour tes explications

passe une bonne après midi .

Cordialement.

Arthur.

Rechercher des sujets similaires à "integration date aujourd hui phrase"