aide sur code

[savoir+40]

Bonsoir le forum,

Voilà je souhaiterais inclure du texte dans les cellulesde m9 à m26, il y a un petit souci

merci

Slt

If Not Application.Intersect(Target, Range("m9:m26")) Is Nothing Then
Target.Offset(0, 11) = Format(Text, "khkh")

 

[blord]

Re : aide sur code

Bonjour,

Peut-être :

Target.Offset(0, 11).value = "khkh"

 

[savoir+40]

Re : aide sur code

blord, bonsoir, le forum,

Merci de ta réponse, mais cela ne fonctionne pas, j'ai cette formule qui fonctionne qui me donne la date du jour et je souhaite aussi avoir un texte,

If Not Application.Intersect(Target, Range("B9:B26")) Is Nothing Then
Target.Offset(0, 2) = Format(Date, "mm/dd/yyyy")

merci, si tu as une autre piste,

Slt bonne soirée

 

[mth]

Re : aide sur code

Bonjour à tous,

cela ne fonctionne pas

Ah bon ???
Ce serait plutôt ta question qui est si mal formulée qu'on ne comprend pas ce que tu veux faire ...

Tu veux un texte suivi de la date ? Peut-être quelque chose comme ça ?:

Target.Offset(0, 2) = "Bonjour, nous sommes le " & Format(Date, "mm/dd/yyyy")

Bonne soirée.

 

[savoir+40]

Re : aide sur code

Bonjour mth, le forum,

Merci bien pour ta réponse, il me falait juste la première partie.

Cordialement

ps. Comment fait-on pour clôturer ce fil ??