Peut on récupérer des information données par un utilisateurs?
7 réponses
Angelo
Bonjour à tous,
je souhaiterais faire une petite application qui construisse un tableau avec
les dates en enlevant les week end
J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel
jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date
Le seul problème c'est que je sais vraiment pas comment faire pour :
- demander l'information à l'utilisateur
- récupérer cette info
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message de news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
Bonjour.
Tu n'as pas besoin de demander pour connaître le jour de la semaine :
Jour = WorksheetFunction.Weekday("01/01/2005")
Sinon, tu peux utiliser "inputbox" :
Jour = InputBox("Entre le jour de la semaine du premier du mois.")
Ensuite, tu devras vérifier que la réponse est correcte.
Cordialement.
Daniel
"Angelo" <Angelo@discussions.microsoft.com> a écrit dans le message de news:
3F72388B-9038-423F-90B9-32F3B913508E@microsoft.com...
Bonjour à tous,
je souhaiterais faire une petite application qui construisse un tableau
avec
les dates en enlevant les week end
J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe
quel
jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne
date
Le seul problème c'est que je sais vraiment pas comment faire pour :
- demander l'information à l'utilisateur
- récupérer cette info
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message de news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
Michel Gaboly
Bonjour Daniel,
Pas besoin d'utiliser WorksheetFunction
Il exite une fonction native en VBA, Weekday également.
Par ailleurs, personnellement, je déconseille l'emploi d'InputBox, je p réconise d'employer systématiquement un UserForm, beaucoup + souple d'emploi.
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message d e news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois t ombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bo nne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
-- Cordialement,
Michel Gaboly www.gaboly.com
Bonjour Daniel,
Pas besoin d'utiliser WorksheetFunction
Il exite une fonction native en VBA, Weekday également.
Par ailleurs, personnellement, je déconseille l'emploi d'InputBox, je p réconise d'employer systématiquement un UserForm,
beaucoup + souple d'emploi.
Bonjour.
Tu n'as pas besoin de demander pour connaître le jour de la semaine :
Jour = WorksheetFunction.Weekday("01/01/2005")
Sinon, tu peux utiliser "inputbox" :
Jour = InputBox("Entre le jour de la semaine du premier du mois.")
Ensuite, tu devras vérifier que la réponse est correcte.
Cordialement.
Daniel
"Angelo" <Angelo@discussions.microsoft.com> a écrit dans le message d e news:
3F72388B-9038-423F-90B9-32F3B913508E@microsoft.com...
Bonjour à tous,
je souhaiterais faire une petite application qui construisse un tableau
avec
les dates en enlevant les week end
J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois t ombe
quel
jour (lundi, mardi...) puis en fonction de la réponse enlevé les bo nne
date
Le seul problème c'est que je sais vraiment pas comment faire pour :
- demander l'information à l'utilisateur
- récupérer cette info
Il exite une fonction native en VBA, Weekday également.
Par ailleurs, personnellement, je déconseille l'emploi d'InputBox, je p réconise d'employer systématiquement un UserForm, beaucoup + souple d'emploi.
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message d e news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois t ombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bo nne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
-- Cordialement,
Michel Gaboly www.gaboly.com
Daniel
Par ailleurs, personnellement, je déconseille l'emploi d'InputBox, je préconise d'employer systématiquement un UserForm, beaucoup + souple d'emploi.
Euh, si tu veux, néanmoins, notre ami ne sachant pas dialoguer avec son utilisateur, on peut supposer qu'il n'est pas trop familier avec les userforms. De plus, personnellement, dans ce cas précis, je trouve que un inputbox est bien adapté à la simplicité de la question.
Daniel
Par ailleurs, personnellement, je déconseille l'emploi d'InputBox, je
préconise d'employer systématiquement un UserForm,
beaucoup + souple d'emploi.
Euh, si tu veux, néanmoins, notre ami ne sachant pas dialoguer avec son
utilisateur, on peut supposer qu'il n'est pas trop familier avec les
userforms.
De plus, personnellement, dans ce cas précis, je trouve que un inputbox est
bien adapté à la simplicité de la question.
Par ailleurs, personnellement, je déconseille l'emploi d'InputBox, je préconise d'employer systématiquement un UserForm, beaucoup + souple d'emploi.
Euh, si tu veux, néanmoins, notre ami ne sachant pas dialoguer avec son utilisateur, on peut supposer qu'il n'est pas trop familier avec les userforms. De plus, personnellement, dans ce cas précis, je trouve que un inputbox est bien adapté à la simplicité de la question.
Daniel
Angelo
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile pas voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$ Message = "Entrer le mois en chiffre (janvier= 01, décembre " Message3 = "Entrer l'année" Titre = "création du tableau" Message2 = "Entrer le nombre de jour compris dans le mois" Mois = InputBox(Message, Titre) Année = InputBox(Message3$, Titre) Nb_jour = InputBox(Message2, Titre) Jour = WeekDay("1/Mois/Année")
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message de news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile pas
voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$
Message = "Entrer le mois en chiffre (janvier= 01, décembre "
Message3 = "Entrer l'année"
Titre = "création du tableau"
Message2 = "Entrer le nombre de jour compris dans le mois"
Mois = InputBox(Message, Titre)
Année = InputBox(Message3$, Titre)
Nb_jour = InputBox(Message2, Titre)
Jour = WeekDay("1/Mois/Année")
Bonjour.
Tu n'as pas besoin de demander pour connaître le jour de la semaine :
Jour = WorksheetFunction.Weekday("01/01/2005")
Sinon, tu peux utiliser "inputbox" :
Jour = InputBox("Entre le jour de la semaine du premier du mois.")
Ensuite, tu devras vérifier que la réponse est correcte.
Cordialement.
Daniel
"Angelo" <Angelo@discussions.microsoft.com> a écrit dans le message de news:
3F72388B-9038-423F-90B9-32F3B913508E@microsoft.com...
Bonjour à tous,
je souhaiterais faire une petite application qui construisse un tableau
avec
les dates en enlevant les week end
J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe
quel
jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne
date
Le seul problème c'est que je sais vraiment pas comment faire pour :
- demander l'information à l'utilisateur
- récupérer cette info
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile pas voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$ Message = "Entrer le mois en chiffre (janvier= 01, décembre " Message3 = "Entrer l'année" Titre = "création du tableau" Message2 = "Entrer le nombre de jour compris dans le mois" Mois = InputBox(Message, Titre) Année = InputBox(Message3$, Titre) Nb_jour = InputBox(Message2, Titre) Jour = WeekDay("1/Mois/Année")
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message de news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
Daniel
Remplace : Jour = WeekDay("1/Mois/Année") par Jour = Weekday(DateSerial(Année, Mois, 1)) Daniel
"Angelo" a écrit dans le message de news:
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile pas voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$ Message = "Entrer le mois en chiffre (janvier= 01, décembre " Message3 = "Entrer l'année" Titre = "création du tableau" Message2 = "Entrer le nombre de jour compris dans le mois" Mois = InputBox(Message, Titre) Année = InputBox(Message3$, Titre) Nb_jour = InputBox(Message2, Titre) Jour = WeekDay("1/Mois/Année")
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message de news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
Remplace :
Jour = WeekDay("1/Mois/Année")
par
Jour = Weekday(DateSerial(Année, Mois, 1))
Daniel
"Angelo" <Angelo@discussions.microsoft.com> a écrit dans le message de news:
E09BD30E-AC10-4A6C-A967-CF3B6B5C19BB@microsoft.com...
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile
pas
voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$
Message = "Entrer le mois en chiffre (janvier= 01, décembre "
Message3 = "Entrer l'année"
Titre = "création du tableau"
Message2 = "Entrer le nombre de jour compris dans le mois"
Mois = InputBox(Message, Titre)
Année = InputBox(Message3$, Titre)
Nb_jour = InputBox(Message2, Titre)
Jour = WeekDay("1/Mois/Année")
Bonjour.
Tu n'as pas besoin de demander pour connaître le jour de la semaine :
Jour = WorksheetFunction.Weekday("01/01/2005")
Sinon, tu peux utiliser "inputbox" :
Jour = InputBox("Entre le jour de la semaine du premier du mois.")
Ensuite, tu devras vérifier que la réponse est correcte.
Cordialement.
Daniel
"Angelo" <Angelo@discussions.microsoft.com> a écrit dans le message de
news:
3F72388B-9038-423F-90B9-32F3B913508E@microsoft.com...
Bonjour à tous,
je souhaiterais faire une petite application qui construisse un tableau
avec
les dates en enlevant les week end
J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe
quel
jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne
date
Le seul problème c'est que je sais vraiment pas comment faire pour :
- demander l'information à l'utilisateur
- récupérer cette info
Remplace : Jour = WeekDay("1/Mois/Année") par Jour = Weekday(DateSerial(Année, Mois, 1)) Daniel
"Angelo" a écrit dans le message de news:
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile pas voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$ Message = "Entrer le mois en chiffre (janvier= 01, décembre " Message3 = "Entrer l'année" Titre = "création du tableau" Message2 = "Entrer le nombre de jour compris dans le mois" Mois = InputBox(Message, Titre) Année = InputBox(Message3$, Titre) Nb_jour = InputBox(Message2, Titre) Jour = WeekDay("1/Mois/Année")
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message de news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
Daniel
Ou : Jour = WorksheetFunction.Weekday("1/" & Mois & "/" & Année) Si tu mets tes variables entre quotes, le nom des variables est considéré comme du texte. Daniel "Angelo" a écrit dans le message de news:
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile pas voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$ Message = "Entrer le mois en chiffre (janvier= 01, décembre " Message3 = "Entrer l'année" Titre = "création du tableau" Message2 = "Entrer le nombre de jour compris dans le mois" Mois = InputBox(Message, Titre) Année = InputBox(Message3$, Titre) Nb_jour = InputBox(Message2, Titre) Jour = WeekDay("1/Mois/Année")
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message de news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info
quelqu'un pourrai m'aider ?
Ou :
Jour = WorksheetFunction.Weekday("1/" & Mois & "/" & Année)
Si tu mets tes variables entre quotes, le nom des variables est considéré
comme du texte.
Daniel
"Angelo" <Angelo@discussions.microsoft.com> a écrit dans le message de news:
E09BD30E-AC10-4A6C-A967-CF3B6B5C19BB@microsoft.com...
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile
pas
voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$
Message = "Entrer le mois en chiffre (janvier= 01, décembre "
Message3 = "Entrer l'année"
Titre = "création du tableau"
Message2 = "Entrer le nombre de jour compris dans le mois"
Mois = InputBox(Message, Titre)
Année = InputBox(Message3$, Titre)
Nb_jour = InputBox(Message2, Titre)
Jour = WeekDay("1/Mois/Année")
Bonjour.
Tu n'as pas besoin de demander pour connaître le jour de la semaine :
Jour = WorksheetFunction.Weekday("01/01/2005")
Sinon, tu peux utiliser "inputbox" :
Jour = InputBox("Entre le jour de la semaine du premier du mois.")
Ensuite, tu devras vérifier que la réponse est correcte.
Cordialement.
Daniel
"Angelo" <Angelo@discussions.microsoft.com> a écrit dans le message de
news:
3F72388B-9038-423F-90B9-32F3B913508E@microsoft.com...
Bonjour à tous,
je souhaiterais faire une petite application qui construisse un tableau
avec
les dates en enlevant les week end
J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe
quel
jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne
date
Le seul problème c'est que je sais vraiment pas comment faire pour :
- demander l'information à l'utilisateur
- récupérer cette info
Ou : Jour = WorksheetFunction.Weekday("1/" & Mois & "/" & Année) Si tu mets tes variables entre quotes, le nom des variables est considéré comme du texte. Daniel "Angelo" a écrit dans le message de news:
ok j'ai fait ce que vous m'avez dis mais ma fonction weekday ne compile pas voici ce que j'ai fais:
Dim Jour, Nb_jour, Mois, Année, Message$, Message2$, Message3$, Titre$ Message = "Entrer le mois en chiffre (janvier= 01, décembre " Message3 = "Entrer l'année" Titre = "création du tableau" Message2 = "Entrer le nombre de jour compris dans le mois" Mois = InputBox(Message, Titre) Année = InputBox(Message3$, Titre) Nb_jour = InputBox(Message2, Titre) Jour = WeekDay("1/Mois/Année")
Bonjour. Tu n'as pas besoin de demander pour connaître le jour de la semaine : Jour = WorksheetFunction.Weekday("01/01/2005") Sinon, tu peux utiliser "inputbox" : Jour = InputBox("Entre le jour de la semaine du premier du mois.") Ensuite, tu devras vérifier que la réponse est correcte. Cordialement. Daniel "Angelo" a écrit dans le message de news:
Bonjour à tous, je souhaiterais faire une petite application qui construisse un tableau avec les dates en enlevant les week end J'ai eu donc comme idée de demander à l'utlisateur le 1er du mois tombe quel jour (lundi, mardi...) puis en fonction de la réponse enlevé les bonne date Le seul problème c'est que je sais vraiment pas comment faire pour : - demander l'information à l'utilisateur - récupérer cette info