Bonjour,
J’aimerais ajouter du texte dans un champ " Obs " (observations) après
introduire une modification dans un autre champ (Text1).
Si je fais comme ça
Private Sub Text1_AfterUpdate()
Obs.Value = " valeur changé pour " & Text1 & " le " & Date
End Sub
c’est bien s’il n’y a pas de texte dans Obs, mais si texte déjà existant il
sera remplacé pour le nouveau, et ce que je veux c’est de l’ajouter à la fin.
Je vous remercie d’avance
A. Costa
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michel
Bonjour Tout simplement garde l'ancienne en concatenant Obs.Value = obs.value & " " & " valeur changé pour " & Text1 & " le " & Date @plus Michel "A COSTA" a écrit dans le message de news:
Bonjour, J’aimerais ajouter du texte dans un champ " Obs " (observations) après introduire une modification dans un autre champ (Text1). Si je fais comme ça
Private Sub Text1_AfterUpdate() Obs.Value = " valeur changé pour " & Text1 & " le " & Date End Sub
c’est bien s’il n’y a pas de texte dans Obs, mais si texte déjà existant il sera remplacé pour le nouveau, et ce que je veux c’est de l’ajouter à la fin. Je vous remercie d’avance A. Costa
Bonjour
Tout simplement garde l'ancienne en concatenant
Obs.Value = obs.value & " " & " valeur changé pour " & Text1 & " le " &
Date
@plus
Michel
"A COSTA" <ACOSTA@discussions.microsoft.com> a écrit dans le message de
news:2B18F945-B858-4464-A728-844174C1E507@microsoft.com...
Bonjour,
J’aimerais ajouter du texte dans un champ " Obs " (observations) après
introduire une modification dans un autre champ (Text1).
Si je fais comme ça
Private Sub Text1_AfterUpdate()
Obs.Value = " valeur changé pour " & Text1 & " le " & Date
End Sub
c’est bien s’il n’y a pas de texte dans Obs, mais si texte déjà existant
il
sera remplacé pour le nouveau, et ce que je veux c’est de l’ajouter à la
fin.
Je vous remercie d’avance
A. Costa
Bonjour Tout simplement garde l'ancienne en concatenant Obs.Value = obs.value & " " & " valeur changé pour " & Text1 & " le " & Date @plus Michel "A COSTA" a écrit dans le message de news:
Bonjour, J’aimerais ajouter du texte dans un champ " Obs " (observations) après introduire une modification dans un autre champ (Text1). Si je fais comme ça
Private Sub Text1_AfterUpdate() Obs.Value = " valeur changé pour " & Text1 & " le " & Date End Sub
c’est bien s’il n’y a pas de texte dans Obs, mais si texte déjà existant il sera remplacé pour le nouveau, et ce que je veux c’est de l’ajouter à la fin. Je vous remercie d’avance A. Costa
A COSTA
Bonjour, Un grand merci. Parfois on ne pense pas aux choses simples ... Bonne journée. A. Costa
"michel" a écrit :
Bonjour Tout simplement garde l'ancienne en concatenant Obs.Value = obs.value & " " & " valeur changé pour " & Text1 & " le " & Date @plus Michel "A COSTA" a écrit dans le message de news: > Bonjour, > J’aimerais ajouter du texte dans un champ " Obs " (observations) après > introduire une modification dans un autre champ (Text1). > Si je fais comme ça > > Private Sub Text1_AfterUpdate() > Obs.Value = " valeur changé pour " & Text1 & " le " & Date > End Sub > > c’est bien s’il n’y a pas de texte dans Obs, mais si texte déjà existant > il > sera remplacé pour le nouveau, et ce que je veux c’est de l’ajouter à la > fin. > Je vous remercie d’avance > A. Costa >
Bonjour,
Un grand merci.
Parfois on ne pense pas aux choses simples ...
Bonne journée.
A. Costa
"michel" a écrit :
Bonjour
Tout simplement garde l'ancienne en concatenant
Obs.Value = obs.value & " " & " valeur changé pour " & Text1 & " le " &
Date
@plus
Michel
"A COSTA" <ACOSTA@discussions.microsoft.com> a écrit dans le message de
news:2B18F945-B858-4464-A728-844174C1E507@microsoft.com...
> Bonjour,
> J’aimerais ajouter du texte dans un champ " Obs " (observations) après
> introduire une modification dans un autre champ (Text1).
> Si je fais comme ça
>
> Private Sub Text1_AfterUpdate()
> Obs.Value = " valeur changé pour " & Text1 & " le " & Date
> End Sub
>
> c’est bien s’il n’y a pas de texte dans Obs, mais si texte déjà existant
> il
> sera remplacé pour le nouveau, et ce que je veux c’est de l’ajouter à la
> fin.
> Je vous remercie d’avance
> A. Costa
>
Bonjour, Un grand merci. Parfois on ne pense pas aux choses simples ... Bonne journée. A. Costa
"michel" a écrit :
Bonjour Tout simplement garde l'ancienne en concatenant Obs.Value = obs.value & " " & " valeur changé pour " & Text1 & " le " & Date @plus Michel "A COSTA" a écrit dans le message de news: > Bonjour, > J’aimerais ajouter du texte dans un champ " Obs " (observations) après > introduire une modification dans un autre champ (Text1). > Si je fais comme ça > > Private Sub Text1_AfterUpdate() > Obs.Value = " valeur changé pour " & Text1 & " le " & Date > End Sub > > c’est bien s’il n’y a pas de texte dans Obs, mais si texte déjà existant > il > sera remplacé pour le nouveau, et ce que je veux c’est de l’ajouter à la > fin. > Je vous remercie d’avance > A. Costa >