Discussion :

[mikmak78]

Bonjour,

J essaye de faire un code qui me permet dans la cellule (A1) de mettre du texte pour que dans la cellule (A2) il y ait le nom d'utilisateur plus le texte en A1, tout en gardant les messages precedants. CAD que tous les messages des differents utilisateurs restent sur la cellule A2.
J'espere que je suis assez claire...
voici ou j en suis mais mon code efface le nom d utilisateur precedant ainsi que son texte

Code :

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

1
2
3
4
5
6
7
8
 
Sub test()
If Not IsEmpty(Range("A1")) Then
Range("A2") = Chr(10) & Environ("username") & ":" & Range("A1")
Else
Range("A2") = ""
End If
End Sub

merci d avance

[78chris]

Bonjour

Si le contenu de a2 doit être complété il faut placer A2 au début de la concaténation : range("A2")= range("A2") &....

[mikmak78]

BOn je suis un boulet mais je me soigne

merci