Bonjour, je recherche un petit coup de main sur le code concerant une
case à cocher :
la 1ere condition fonctionne,
la 2eme, doit vider de son contenu le controle nomremplacement
Merci de m'aider pour la syntaxe.
Sylvere
Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire.Value = "-1" Then
Me.nomremplacement = Me.nomstagiaire
End If
'If modif_stagiaire.Value = "0" Then
'Me.nomremplacement = (vider du contenu)
'End If
End Sub
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
Bauwens François
Salut,
Moi j'aurais plutôt fait un truc genre : Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire.Value = -1 Then Me.nomremplacement = Me.nomstagiaire else Me.nomremplacement = null End If End Sub Mais je ne l'ai pas testé et je ne suis pas une bête en vba
"sylvere" a écrit dans le message de news:
Bonjour, je recherche un petit coup de main sur le code concerant une case à cocher : la 1ere condition fonctionne, la 2eme, doit vider de son contenu le controle nomremplacement Merci de m'aider pour la syntaxe. Sylvere
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire.Value = "-1" Then Me.nomremplacement = Me.nomstagiaire End If 'If modif_stagiaire.Value = "0" Then 'Me.nomremplacement = (vider du contenu) 'End If End Sub
Salut,
Moi j'aurais plutôt fait un truc genre :
Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire.Value = -1 Then
Me.nomremplacement = Me.nomstagiaire
else
Me.nomremplacement = null
End If
End Sub
Mais je ne l'ai pas testé et je ne suis pas une bête en vba
"sylvere" <zaza@fifi.fr> a écrit dans le message de
news:mn.e1a37d599f0a28e4.39268@fifi.fr...
Bonjour, je recherche un petit coup de main sur le code concerant une
case à cocher :
la 1ere condition fonctionne,
la 2eme, doit vider de son contenu le controle nomremplacement
Merci de m'aider pour la syntaxe.
Sylvere
Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire.Value = "-1" Then
Me.nomremplacement = Me.nomstagiaire
End If
'If modif_stagiaire.Value = "0" Then
'Me.nomremplacement = (vider du contenu)
'End If
End Sub
Moi j'aurais plutôt fait un truc genre : Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire.Value = -1 Then Me.nomremplacement = Me.nomstagiaire else Me.nomremplacement = null End If End Sub Mais je ne l'ai pas testé et je ne suis pas une bête en vba
"sylvere" a écrit dans le message de news:
Bonjour, je recherche un petit coup de main sur le code concerant une case à cocher : la 1ere condition fonctionne, la 2eme, doit vider de son contenu le controle nomremplacement Merci de m'aider pour la syntaxe. Sylvere
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire.Value = "-1" Then Me.nomremplacement = Me.nomstagiaire End If 'If modif_stagiaire.Value = "0" Then 'Me.nomremplacement = (vider du contenu) 'End If End Sub
Fred
Moi je vois plutôt ça: (mais je ne sais pas ce qu'est "modif_stagiaire.Value ")
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire Then Me.nomremplacement = Me.nomstagiaire Else Me.nomremplacement = "" End If End Sub
Fred "sylvere" a écrit dans le message de news:
Bonjour, je recherche un petit coup de main sur le code concerant une case à cocher : la 1ere condition fonctionne, la 2eme, doit vider de son contenu le controle nomremplacement Merci de m'aider pour la syntaxe. Sylvere
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire.Value = "-1" Then Me.nomremplacement = Me.nomstagiaire End If 'If modif_stagiaire.Value = "0" Then 'Me.nomremplacement = (vider du contenu) 'End If End Sub
Moi je vois plutôt ça:
(mais je ne sais pas ce qu'est "modif_stagiaire.Value ")
Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire Then
Me.nomremplacement = Me.nomstagiaire
Else
Me.nomremplacement = ""
End If
End Sub
Fred
"sylvere" <zaza@fifi.fr> a écrit dans le message de news:
mn.e1a37d599f0a28e4.39268@fifi.fr...
Bonjour, je recherche un petit coup de main sur le code concerant une case
à cocher :
la 1ere condition fonctionne,
la 2eme, doit vider de son contenu le controle nomremplacement
Merci de m'aider pour la syntaxe.
Sylvere
Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire.Value = "-1" Then
Me.nomremplacement = Me.nomstagiaire
End If
'If modif_stagiaire.Value = "0" Then
'Me.nomremplacement = (vider du contenu)
'End If
End Sub
Moi je vois plutôt ça: (mais je ne sais pas ce qu'est "modif_stagiaire.Value ")
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire Then Me.nomremplacement = Me.nomstagiaire Else Me.nomremplacement = "" End If End Sub
Fred "sylvere" a écrit dans le message de news:
Bonjour, je recherche un petit coup de main sur le code concerant une case à cocher : la 1ere condition fonctionne, la 2eme, doit vider de son contenu le controle nomremplacement Merci de m'aider pour la syntaxe. Sylvere
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire.Value = "-1" Then Me.nomremplacement = Me.nomstagiaire End If 'If modif_stagiaire.Value = "0" Then 'Me.nomremplacement = (vider du contenu) 'End If End Sub
Bauwens François
Woueps et même :
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire = true Then Me.nomremplacement = Me.nomstagiaire Else Me.nomremplacement = "" End If End Sub "Fred" a écrit dans le message de
news:433a2e74$0$11157$
Moi je vois plutôt ça: (mais je ne sais pas ce qu'est "modif_stagiaire.Value ")
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire Then Me.nomremplacement = Me.nomstagiaire Else Me.nomremplacement = "" End If End Sub
Fred "sylvere" a écrit dans le message de news:
Bonjour, je recherche un petit coup de main sur le code concerant une case
à cocher : la 1ere condition fonctionne, la 2eme, doit vider de son contenu le controle nomremplacement Merci de m'aider pour la syntaxe. Sylvere
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire.Value = "-1" Then Me.nomremplacement = Me.nomstagiaire End If 'If modif_stagiaire.Value = "0" Then 'Me.nomremplacement = (vider du contenu) 'End If End Sub
Woueps et même :
Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire = true Then
Me.nomremplacement = Me.nomstagiaire
Else
Me.nomremplacement = ""
End If
End Sub
"Fred" <fred@memorys.fr> a écrit dans le message de
news:433a2e74$0$11157$626a14ce@news.free.fr...
Moi je vois plutôt ça:
(mais je ne sais pas ce qu'est "modif_stagiaire.Value ")
Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire Then
Me.nomremplacement = Me.nomstagiaire
Else
Me.nomremplacement = ""
End If
End Sub
Fred
"sylvere" <zaza@fifi.fr> a écrit dans le message de news:
mn.e1a37d599f0a28e4.39268@fifi.fr...
Bonjour, je recherche un petit coup de main sur le code concerant une
case
à cocher :
la 1ere condition fonctionne,
la 2eme, doit vider de son contenu le controle nomremplacement
Merci de m'aider pour la syntaxe.
Sylvere
Private Sub modif_stagiaire_AfterUpdate()
If modif_stagiaire.Value = "-1" Then
Me.nomremplacement = Me.nomstagiaire
End If
'If modif_stagiaire.Value = "0" Then
'Me.nomremplacement = (vider du contenu)
'End If
End Sub
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire = true Then Me.nomremplacement = Me.nomstagiaire Else Me.nomremplacement = "" End If End Sub "Fred" a écrit dans le message de
news:433a2e74$0$11157$
Moi je vois plutôt ça: (mais je ne sais pas ce qu'est "modif_stagiaire.Value ")
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire Then Me.nomremplacement = Me.nomstagiaire Else Me.nomremplacement = "" End If End Sub
Fred "sylvere" a écrit dans le message de news:
Bonjour, je recherche un petit coup de main sur le code concerant une case
à cocher : la 1ere condition fonctionne, la 2eme, doit vider de son contenu le controle nomremplacement Merci de m'aider pour la syntaxe. Sylvere
Private Sub modif_stagiaire_AfterUpdate() If modif_stagiaire.Value = "-1" Then Me.nomremplacement = Me.nomstagiaire End If 'If modif_stagiaire.Value = "0" Then 'Me.nomremplacement = (vider du contenu) 'End If End Sub