bonjour
comment récupérer le contenu d'une cellule dans un textbox?
merci
begin 666 pierre.vcf
M0D5'24XZ5D-!4D0-"E9%4E-)3TXZ,BXQ#0I..CMP:65R<F4-"D9..G!I97)R
M90T*14U!24P[4%)%1CM)3E1%4DY%5#HB>'!I97)R934R>") =&ES8V%L:2YF
D<@T*4D56.C(P,#0P,C$U5#$R-30Q.5H-"D5.1#I60T%21 T*
`
end
-- RaMa "pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
michdenis
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news: bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1")
'Tu utilises un OU l'autre
'récupère le contenu du textbox
Me.TextBox1.Text = .Range("A2")
End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:ui2SzG88DHA.2432@TK2MSFTNGP10.phx.gbl...
bonjour
comment récupérer le contenu d'une cellule dans un textbox?
merci
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news: bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
pierre
merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
merci beaucoup
textbox renvoie du texte non?
comment faire car j'y entre une date et j'ai besoin de cette date pour faire
des calculs?
merci encore à tous et toutes
pierre
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
#NCz4r88DHA.3348@TK2MSFTNGP09.phx.gbl...
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1")
'Tu utilises un OU l'autre
'récupère le contenu du textbox
Me.TextBox1.Text = .Range("A2")
End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:ui2SzG88DHA.2432@TK2MSFTNGP10.phx.gbl...
bonjour
comment récupérer le contenu d'une cellule dans un textbox?
merci
merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
michdenis
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable .. et si tu y tiens , tu afficheras cette date dans un textbox...mais continuera d'utiliser la variable pour tes calculs.
'-------------------------- dim LaDate as date
With worksheets("Feuil1") if isdate(.range("A1") = True Ladate= .range("A1") 'Pour afficher le format désiré de la date dans ton textbox Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate" End if end With '--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news: merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable .. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'--------------------------
dim LaDate as date
With worksheets("Feuil1")
if isdate(.range("A1") = True
Ladate= .range("A1")
'Pour afficher le format désiré de la date dans ton textbox
Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate"
End if
end With
'--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:O0tp2v88DHA.3064@TK2MSFTNGP09.phx.gbl...
merci beaucoup
textbox renvoie du texte non?
comment faire car j'y entre une date et j'ai besoin de cette date pour faire
des calculs?
merci encore à tous et toutes
pierre
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
#NCz4r88DHA.3348@TK2MSFTNGP09.phx.gbl...
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1")
'Tu utilises un OU l'autre
'récupère le contenu du textbox
Me.TextBox1.Text = .Range("A2")
End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:ui2SzG88DHA.2432@TK2MSFTNGP10.phx.gbl...
bonjour
comment récupérer le contenu d'une cellule dans un textbox?
merci
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable .. et si tu y tiens , tu afficheras cette date dans un textbox...mais continuera d'utiliser la variable pour tes calculs.
'-------------------------- dim LaDate as date
With worksheets("Feuil1") if isdate(.range("A1") = True Ladate= .range("A1") 'Pour afficher le format désiré de la date dans ton textbox Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate" End if end With '--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news: merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
pierre
ok ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui contient le textbox1où je dois inscrire une date (jusque là ça va) et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui s'affiche au format date dans la cellule A2 de la Feuil1 pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable .. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'-------------------------- dim LaDate as date
With worksheets("Feuil1") if isdate(.range("A1") = True Ladate= .range("A1") 'Pour afficher le format désiré de la date dans ton textbox Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate" End if end With '--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire
des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
ok
ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui
contient le textbox1où je dois inscrire une date (jusque là ça va)
et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui
s'affiche au format date dans la cellule A2 de la Feuil1
pierre
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
#2hBE988DHA.2316@TK2MSFTNGP09.phx.gbl...
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu
veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un
formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel,
utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable
.. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'--------------------------
dim LaDate as date
With worksheets("Feuil1")
if isdate(.range("A1") = True
Ladate= .range("A1")
'Pour afficher le format désiré de la date dans ton textbox
Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate"
End if
end With
'--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:O0tp2v88DHA.3064@TK2MSFTNGP09.phx.gbl...
merci beaucoup
textbox renvoie du texte non?
comment faire car j'y entre une date et j'ai besoin de cette date pour
faire
des calculs?
merci encore à tous et toutes
pierre
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
#NCz4r88DHA.3348@TK2MSFTNGP09.phx.gbl...
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1")
'Tu utilises un OU l'autre
'récupère le contenu du textbox
Me.TextBox1.Text = .Range("A2")
End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:ui2SzG88DHA.2432@TK2MSFTNGP10.phx.gbl...
bonjour
comment récupérer le contenu d'une cellule dans un textbox?
merci
ok ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui contient le textbox1où je dois inscrire une date (jusque là ça va) et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui s'affiche au format date dans la cellule A2 de la Feuil1 pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable .. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'-------------------------- dim LaDate as date
With worksheets("Feuil1") if isdate(.range("A1") = True Ladate= .range("A1") 'Pour afficher le format désiré de la date dans ton textbox Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate" End if end With '--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire
des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
michdenis
Bonjour Pierre,
à l'ouverture de ton classeur, tu ne dis pas comment tu t'y prends pour récupérer une date...Il est préférable lorsque cela est possible de récupérer directement une date dans une Variable de type date ... Cela évite d'être obligé de tester le contenu du textbox si le contenu de celui-ci exhibe bien un format date reconnu par excel.
If isdate(me.textbox1) = True then 'Le format que tu veux avoir dans ta cellule affichant la date Range("A1").NumberFormat = "dd/mm/yy" Range("A1").valeur = Me.textbox1 end if
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:% ok ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui contient le textbox1où je dois inscrire une date (jusque là ça va) et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui s'affiche au format date dans la cellule A2 de la Feuil1 pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable .. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'-------------------------- dim LaDate as date
With worksheets("Feuil1") if isdate(.range("A1") = True Ladate= .range("A1") 'Pour afficher le format désiré de la date dans ton textbox Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate" End if end With '--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire
des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
Bonjour Pierre,
à l'ouverture de ton classeur, tu ne dis pas comment tu t'y prends pour récupérer une date...Il est préférable lorsque cela
est possible de récupérer directement une date dans une Variable de type date ... Cela évite d'être obligé de tester le
contenu du textbox si le contenu de celui-ci exhibe bien un format date reconnu par excel.
If isdate(me.textbox1) = True then
'Le format que tu veux avoir dans ta cellule affichant la date
Range("A1").NumberFormat = "dd/mm/yy"
Range("A1").valeur = Me.textbox1
end if
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:%23BvTzS98DHA.1052@TK2MSFTNGP12.phx.gbl...
ok
ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui
contient le textbox1où je dois inscrire une date (jusque là ça va)
et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui
s'affiche au format date dans la cellule A2 de la Feuil1
pierre
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
#2hBE988DHA.2316@TK2MSFTNGP09.phx.gbl...
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu
veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un
formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel,
utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable
.. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'--------------------------
dim LaDate as date
With worksheets("Feuil1")
if isdate(.range("A1") = True
Ladate= .range("A1")
'Pour afficher le format désiré de la date dans ton textbox
Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate"
End if
end With
'--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:O0tp2v88DHA.3064@TK2MSFTNGP09.phx.gbl...
merci beaucoup
textbox renvoie du texte non?
comment faire car j'y entre une date et j'ai besoin de cette date pour
faire
des calculs?
merci encore à tous et toutes
pierre
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
#NCz4r88DHA.3348@TK2MSFTNGP09.phx.gbl...
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1")
'Tu utilises un OU l'autre
'récupère le contenu du textbox
Me.TextBox1.Text = .Range("A2")
End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:ui2SzG88DHA.2432@TK2MSFTNGP10.phx.gbl...
bonjour
comment récupérer le contenu d'une cellule dans un textbox?
merci
à l'ouverture de ton classeur, tu ne dis pas comment tu t'y prends pour récupérer une date...Il est préférable lorsque cela est possible de récupérer directement une date dans une Variable de type date ... Cela évite d'être obligé de tester le contenu du textbox si le contenu de celui-ci exhibe bien un format date reconnu par excel.
If isdate(me.textbox1) = True then 'Le format que tu veux avoir dans ta cellule affichant la date Range("A1").NumberFormat = "dd/mm/yy" Range("A1").valeur = Me.textbox1 end if
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:% ok ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui contient le textbox1où je dois inscrire une date (jusque là ça va) et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui s'affiche au format date dans la cellule A2 de la Feuil1 pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable .. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'-------------------------- dim LaDate as date
With worksheets("Feuil1") if isdate(.range("A1") = True Ladate= .range("A1") 'Pour afficher le format désiré de la date dans ton textbox Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate" End if end With '--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire
des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
pierre
"michdenis" a écrit dans le message news: O3#
Bonjour Pierre,
à l'ouverture de ton classeur, tu ne dis pas comment tu t'y prends pour récupérer une date
je la rentre avec mon clavier dans le textbox1
...Il est préférable lorsque cela est possible de récupérer directement une date dans une Variable de type date ... Cela évite d'être obligé de tester le
contenu du textbox si le contenu de celui-ci exhibe bien un format date reconnu par excel.
If isdate(me.textbox1) = True then 'Le format que tu veux avoir dans ta cellule affichant la date Range("A1").NumberFormat = "dd/mm/yy" Range("A1").valeur = Me.textbox1 end if
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:%
ok ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui contient le textbox1où je dois inscrire une date (jusque là ça va) et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui s'affiche au format date dans la cellule A2 de la Feuil1 pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu
veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable
.. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'-------------------------- dim LaDate as date
With worksheets("Feuil1") if isdate(.range("A1") = True Ladate= .range("A1") 'Pour afficher le format désiré de la date dans ton textbox Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate" End if end With '--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire
des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
O3#EjZ98DHA.2832@tk2msftngp13.phx.gbl...
Bonjour Pierre,
à l'ouverture de ton classeur, tu ne dis pas comment tu t'y prends pour
récupérer une date
je la rentre avec mon clavier dans le textbox1
...Il est préférable lorsque cela
est possible de récupérer directement une date dans une Variable de type
date ... Cela évite d'être obligé de tester le
contenu du textbox si le contenu de celui-ci exhibe bien un format date
reconnu par excel.
If isdate(me.textbox1) = True then
'Le format que tu veux avoir dans ta cellule affichant la date
Range("A1").NumberFormat = "dd/mm/yy"
Range("A1").valeur = Me.textbox1
end if
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:%23BvTzS98DHA.1052@TK2MSFTNGP12.phx.gbl...
ok
ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui
contient le textbox1où je dois inscrire une date (jusque là ça va)
et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui
s'affiche au format date dans la cellule A2 de la Feuil1
pierre
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
#2hBE988DHA.2316@TK2MSFTNGP09.phx.gbl...
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que
tu
veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un
formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel,
utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la
variable
.. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'--------------------------
dim LaDate as date
With worksheets("Feuil1")
if isdate(.range("A1") = True
Ladate= .range("A1")
'Pour afficher le format désiré de la date dans ton textbox
Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate"
End if
end With
'--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:O0tp2v88DHA.3064@TK2MSFTNGP09.phx.gbl...
merci beaucoup
textbox renvoie du texte non?
comment faire car j'y entre une date et j'ai besoin de cette date pour
faire
des calculs?
merci encore à tous et toutes
pierre
"michdenis" <michdenis@hotmail.com> a écrit dans le message news:
#NCz4r88DHA.3348@TK2MSFTNGP09.phx.gbl...
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1")
'Tu utilises un OU l'autre
'récupère le contenu du textbox
Me.TextBox1.Text = .Range("A2")
End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:ui2SzG88DHA.2432@TK2MSFTNGP10.phx.gbl...
bonjour
comment récupérer le contenu d'une cellule dans un textbox?
merci
à l'ouverture de ton classeur, tu ne dis pas comment tu t'y prends pour récupérer une date
je la rentre avec mon clavier dans le textbox1
...Il est préférable lorsque cela est possible de récupérer directement une date dans une Variable de type date ... Cela évite d'être obligé de tester le
contenu du textbox si le contenu de celui-ci exhibe bien un format date reconnu par excel.
If isdate(me.textbox1) = True then 'Le format que tu veux avoir dans ta cellule affichant la date Range("A1").NumberFormat = "dd/mm/yy" Range("A1").valeur = Me.textbox1 end if
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:%
ok ce que je veux c'est à l'ouverture de mon classeur afficher userform1 qui contient le textbox1où je dois inscrire une date (jusque là ça va) et qu'en cliquant sur le commandbutton1 du userform1 j'ai cette date qui s'affiche au format date dans la cellule A2 de la Feuil1 pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
Il ne faut pas te gêner Pierre pour donner des informations sur ce que tu
veux faire.
Tu veux récupérer une date dans une cellule à partir d'un textbox d'un formulaire. Quel type de calcul veux-tu effectuer ?
Si ta cellule de la feuille de calcul est une date reconnu par excel, utilise une variable dans ton formulaire pour récupérer
le contenu de ta cellule. Tu feras tes calculs avec l'aide de la variable
.. et si tu y tiens , tu afficheras cette date dans
un textbox...mais continuera d'utiliser la variable pour tes calculs.
'-------------------------- dim LaDate as date
With worksheets("Feuil1") if isdate(.range("A1") = True Ladate= .range("A1") 'Pour afficher le format désiré de la date dans ton textbox Me.textbox1.text = format(ladate,"DD/MMM/YY")
'le reste des calculs en utilisant la variable "LaDate" End if end With '--------------------------
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
merci beaucoup textbox renvoie du texte non? comment faire car j'y entre une date et j'ai besoin de cette date pour faire
des calculs? merci encore à tous et toutes pierre
"michdenis" a écrit dans le message news: #
Bonjour Pierre,
à mettre sous un bouton de commande tu formulaire :
With Worksheets("Feuil1") 'Tu utilises un OU l'autre 'récupère le contenu du textbox Me.TextBox1.Text = .Range("A2") End With
Salutations!
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonjour comment récupérer le contenu d'une cellule dans un textbox? merci
