Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox
(3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier
"calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs
avec ce userform seulement quand la textbox est visible (car c'est pas tout
le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc
je viens vous demander de l'aide. Merci bien
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
Daniel
Bonsoir. Commeça, sans tester :
with regl1 if .textbox3.value="" and .textbox3.visible=true then .textbox3.value=Usfdate.Calendar1.value end if end with
Cordialement. Daniel "j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
Bonsoir.
Commeça, sans tester :
with regl1
if .textbox3.value="" and .textbox3.visible=true then
.textbox3.value=Usfdate.Calendar1.value
end if
end with
Cordialement.
Daniel
"j0b" <j0b@discussions.microsoft.com> a écrit dans le message de news:
3BB5C4BD-A738-44CE-A167-B4C8FE34B2E1@microsoft.com...
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox
(3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier
"calandar1" nommé Usfdate. Je recherche à mettre des dates dans les
textboxs
avec ce userform seulement quand la textbox est visible (car c'est pas
tout
le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h
donc
je viens vous demander de l'aide. Merci bien
with regl1 if .textbox3.value="" and .textbox3.visible=true then .textbox3.value=Usfdate.Calendar1.value end if end with
Cordialement. Daniel "j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
j0b
Jusque la pas de problème j'avais quelque chose qui revenait a la meme chose mais le problème vient par la suite quand je veux compléter la textbox6 avec le meme userform. Merci
Bonsoir. Commeça, sans tester :
with regl1 if .textbox3.value="" and .textbox3.visible=true then .textbox3.value=Usfdate.Calendar1.value end if end with
Cordialement. Daniel "j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
Jusque la pas de problème j'avais quelque chose qui revenait a la meme chose
mais le problème vient par la suite quand je veux compléter la textbox6 avec
le meme userform. Merci
Bonsoir.
Commeça, sans tester :
with regl1
if .textbox3.value="" and .textbox3.visible=true then
.textbox3.value=Usfdate.Calendar1.value
end if
end with
Cordialement.
Daniel
"j0b" <j0b@discussions.microsoft.com> a écrit dans le message de news:
3BB5C4BD-A738-44CE-A167-B4C8FE34B2E1@microsoft.com...
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox
(3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier
"calandar1" nommé Usfdate. Je recherche à mettre des dates dans les
textboxs
avec ce userform seulement quand la textbox est visible (car c'est pas
tout
le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h
donc
je viens vous demander de l'aide. Merci bien
Jusque la pas de problème j'avais quelque chose qui revenait a la meme chose mais le problème vient par la suite quand je veux compléter la textbox6 avec le meme userform. Merci
Bonsoir. Commeça, sans tester :
with regl1 if .textbox3.value="" and .textbox3.visible=true then .textbox3.value=Usfdate.Calendar1.value end if end with
Cordialement. Daniel "j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
j0b
J'ai oublié de préciser que c'est une autre date que je cherche à saisir
Bonsoir. Commeça, sans tester :
with regl1 if .textbox3.value="" and .textbox3.visible=true then .textbox3.value=Usfdate.Calendar1.value end if end with
Cordialement. Daniel "j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
J'ai oublié de préciser que c'est une autre date que je cherche à saisir
Bonsoir.
Commeça, sans tester :
with regl1
if .textbox3.value="" and .textbox3.visible=true then
.textbox3.value=Usfdate.Calendar1.value
end if
end with
Cordialement.
Daniel
"j0b" <j0b@discussions.microsoft.com> a écrit dans le message de news:
3BB5C4BD-A738-44CE-A167-B4C8FE34B2E1@microsoft.com...
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox
(3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier
"calandar1" nommé Usfdate. Je recherche à mettre des dates dans les
textboxs
avec ce userform seulement quand la textbox est visible (car c'est pas
tout
le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h
donc
je viens vous demander de l'aide. Merci bien
J'ai oublié de préciser que c'est une autre date que je cherche à saisir
Bonsoir. Commeça, sans tester :
with regl1 if .textbox3.value="" and .textbox3.visible=true then .textbox3.value=Usfdate.Calendar1.value end if end with
Cordialement. Daniel "j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
MichDenis
Essaie ceci :
sub Test() With regl1 For A = 3 To 30 Step 3 If .Controls("textbox" & A).Value = "" And _ .Controls("textbox" & A).Visible = True Then .Controls("textbox" & A) = Usfdate.Calendar1.Value End If Next End With End Sub
"j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
Essaie ceci :
sub Test()
With regl1
For A = 3 To 30 Step 3
If .Controls("textbox" & A).Value = "" And _
.Controls("textbox" & A).Visible = True Then
.Controls("textbox" & A) = Usfdate.Calendar1.Value
End If
Next
End With
End Sub
"j0b" <j0b@discussions.microsoft.com> a écrit dans le message de news:
3BB5C4BD-A738-44CE-A167-B4C8FE34B2E1@microsoft.com...
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox
(3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier
"calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs
avec ce userform seulement quand la textbox est visible (car c'est pas tout
le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc
je viens vous demander de l'aide. Merci bien
sub Test() With regl1 For A = 3 To 30 Step 3 If .Controls("textbox" & A).Value = "" And _ .Controls("textbox" & A).Visible = True Then .Controls("textbox" & A) = Usfdate.Calendar1.Value End If Next End With End Sub
"j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
j0b
Ca fonctionne nickel mais le prob c'est que ca me m'est la meme date partout et que je cherche a changer la date a chaque textbox visible. Merci
Essaie ceci :
sub Test() With regl1 For A = 3 To 30 Step 3 If .Controls("textbox" & A).Value = "" And _ .Controls("textbox" & A).Visible = True Then .Controls("textbox" & A) = Usfdate.Calendar1.Value End If Next End With End Sub
"j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
Ca fonctionne nickel mais le prob c'est que ca me m'est la meme date partout
et que je cherche a changer la date a chaque textbox visible. Merci
Essaie ceci :
sub Test()
With regl1
For A = 3 To 30 Step 3
If .Controls("textbox" & A).Value = "" And _
.Controls("textbox" & A).Visible = True Then
.Controls("textbox" & A) = Usfdate.Calendar1.Value
End If
Next
End With
End Sub
"j0b" <j0b@discussions.microsoft.com> a écrit dans le message de news:
3BB5C4BD-A738-44CE-A167-B4C8FE34B2E1@microsoft.com...
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox
(3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier
"calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs
avec ce userform seulement quand la textbox est visible (car c'est pas tout
le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc
je viens vous demander de l'aide. Merci bien
Ca fonctionne nickel mais le prob c'est que ca me m'est la meme date partout et que je cherche a changer la date a chaque textbox visible. Merci
Essaie ceci :
sub Test() With regl1 For A = 3 To 30 Step 3 If .Controls("textbox" & A).Value = "" And _ .Controls("textbox" & A).Visible = True Then .Controls("textbox" & A) = Usfdate.Calendar1.Value End If Next End With End Sub
"j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
MichDenis
Après cette ligne de code, .Controls("textbox" & A) = Usfdate.Calendar1.Value
ajoute la ligne suivante dans la procédure. Exit for
"j0b" a écrit dans le message de news:
Ca fonctionne nickel mais le prob c'est que ca me m'est la meme date partout et que je cherche a changer la date a chaque textbox visible. Merci
Essaie ceci :
sub Test() With regl1 For A = 3 To 30 Step 3 If .Controls("textbox" & A).Value = "" And _ .Controls("textbox" & A).Visible = True Then .Controls("textbox" & A) = Usfdate.Calendar1.Value End If Next End With End Sub
"j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
Après cette ligne de code,
.Controls("textbox" & A) = Usfdate.Calendar1.Value
ajoute la ligne suivante dans la procédure.
Exit for
"j0b" <j0b@discussions.microsoft.com> a écrit dans le message de news:
89086E53-A5C9-4FFB-BB25-32358FAFFC30@microsoft.com...
Ca fonctionne nickel mais le prob c'est que ca me m'est la meme date partout
et que je cherche a changer la date a chaque textbox visible. Merci
Essaie ceci :
sub Test()
With regl1
For A = 3 To 30 Step 3
If .Controls("textbox" & A).Value = "" And _
.Controls("textbox" & A).Visible = True Then
.Controls("textbox" & A) = Usfdate.Calendar1.Value
End If
Next
End With
End Sub
"j0b" <j0b@discussions.microsoft.com> a écrit dans le message de news:
3BB5C4BD-A738-44CE-A167-B4C8FE34B2E1@microsoft.com...
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox
(3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier
"calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs
avec ce userform seulement quand la textbox est visible (car c'est pas tout
le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc
je viens vous demander de l'aide. Merci bien
Après cette ligne de code, .Controls("textbox" & A) = Usfdate.Calendar1.Value
ajoute la ligne suivante dans la procédure. Exit for
"j0b" a écrit dans le message de news:
Ca fonctionne nickel mais le prob c'est que ca me m'est la meme date partout et que je cherche a changer la date a chaque textbox visible. Merci
Essaie ceci :
sub Test() With regl1 For A = 3 To 30 Step 3 If .Controls("textbox" & A).Value = "" And _ .Controls("textbox" & A).Visible = True Then .Controls("textbox" & A) = Usfdate.Calendar1.Value End If Next End With End Sub
"j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
j0b
Oh le mot magique Exit for c'est ca que je cherche depuis 2h lol. Merci Michel Comme toujours trop fort, Encore merci pour le coup de pouce.
Essaie ceci :
sub Test() With regl1 For A = 3 To 30 Step 3 If .Controls("textbox" & A).Value = "" And _ .Controls("textbox" & A).Visible = True Then .Controls("textbox" & A) = Usfdate.Calendar1.Value End If Next End With End Sub
"j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
Oh le mot magique Exit for c'est ca que je cherche depuis 2h lol. Merci
Michel Comme toujours trop fort, Encore merci pour le coup de pouce.
Essaie ceci :
sub Test()
With regl1
For A = 3 To 30 Step 3
If .Controls("textbox" & A).Value = "" And _
.Controls("textbox" & A).Visible = True Then
.Controls("textbox" & A) = Usfdate.Calendar1.Value
End If
Next
End With
End Sub
"j0b" <j0b@discussions.microsoft.com> a écrit dans le message de news:
3BB5C4BD-A738-44CE-A167-B4C8FE34B2E1@microsoft.com...
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox
(3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier
"calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs
avec ce userform seulement quand la textbox est visible (car c'est pas tout
le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc
je viens vous demander de l'aide. Merci bien
Oh le mot magique Exit for c'est ca que je cherche depuis 2h lol. Merci Michel Comme toujours trop fort, Encore merci pour le coup de pouce.
Essaie ceci :
sub Test() With regl1 For A = 3 To 30 Step 3 If .Controls("textbox" & A).Value = "" And _ .Controls("textbox" & A).Visible = True Then .Controls("textbox" & A) = Usfdate.Calendar1.Value End If Next End With End Sub
"j0b" a écrit dans le message de news:
Bonsoir à vous, alors voila dans un userform "regl1" j'ai 10 textbox (3,6,9,12,15,18,21,24,27,30) et un autre userform avec un calendrier "calandar1" nommé Usfdate. Je recherche à mettre des dates dans les textboxs avec ce userform seulement quand la textbox est visible (car c'est pas tout le temps le cas) et quand sa valeur = "". Je bloque la dessus depuis 2h donc je viens vous demander de l'aide. Merci bien
