Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Combo et date

Combo et date

8 réponses
Avatar
Michel.Girard
Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "=DATE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup
Signaler un problème avec ce contenu

8 réponses

Supprimer
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
Avatar
Pounet95
Bonsoir,
Qu'espère tu mettre dans Date( cmb,1,1) ??
D'où vient cette syntaxe ? Explicite ton problème , STP.

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message de
news:
Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "ÚTE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup






Avatar
Michel.Girard
Bonsoir Pounet95

en fait j'essaie d'avoir dans mon label la formule suivante au lancement de
mon userform Úte(A1,1,1)
ici en remplaçant A1 par la valeur du combobox
Merci
Michel


"Pounet95" a écrit dans le message de news:
%
Bonsoir,
Qu'espère tu mettre dans Date( cmb,1,1) ??
D'où vient cette syntaxe ? Explicite ton problème , STP.

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:
Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "ÚTE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup









Avatar
Rai
Bonsoir,

Le mieux est de générer ton propre format Date :
Label2.Caption = "01/01/" & ComboBox1.Text

Bonne continuation

Rai

Bonsoir Pounet95

en fait j'essaie d'avoir dans mon label la formule suivante au lancement de
mon userform Úte(A1,1,1)
ici en remplaçant A1 par la valeur du combobox
Merci
Michel


"Pounet95" a écrit dans le message de news:
%

Bonsoir,
Qu'espère tu mettre dans Date( cmb,1,1) ??
D'où vient cette syntaxe ? Explicite ton problème , STP.

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:

Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "ÚTE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup













Avatar
Pounet95
Re,
si je comprends, tu veux mettre la FORMULE dans le label
label1.caption="ÚTE(" &combobox.value &",1,1)"
.... mais je suis toujours étonné de la syntaxe de Date !!!!

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message de
news:
Bonsoir Pounet95

en fait j'essaie d'avoir dans mon label la formule suivante au lancement
de mon userform Úte(A1,1,1)
ici en remplaçant A1 par la valeur du combobox
Merci
Michel


"Pounet95" a écrit dans le message de news:
%
Bonsoir,
Qu'espère tu mettre dans Date( cmb,1,1) ??
D'où vient cette syntaxe ? Explicite ton problème , STP.

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:
Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "ÚTE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup













Avatar
Michel.Girard
Ok merci Raimond
Michel

"Rai" a écrit dans le message de news:

Bonsoir,

Le mieux est de générer ton propre format Date :
Label2.Caption = "01/01/" & ComboBox1.Text

Bonne continuation

Rai

Bonsoir Pounet95

en fait j'essaie d'avoir dans mon label la formule suivante au lancement
de mon userform Úte(A1,1,1)
ici en remplaçant A1 par la valeur du combobox
Merci
Michel


"Pounet95" a écrit dans le message de news:
%

Bonsoir,
Qu'espère tu mettre dans Date( cmb,1,1) ??
D'où vient cette syntaxe ? Explicite ton problème , STP.

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:

Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "ÚTE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup














Avatar
Michel.Girard
Bonsoir Pounet95
je vais contourner, mais cela fonctionne dans la cellule.
ÚTE(A1;1;1)
Merci
Michel

"Pounet95" a écrit dans le message de news:
e87%
Re,
si je comprends, tu veux mettre la FORMULE dans le label
label1.caption="ÚTE(" &combobox.value &",1,1)"
.... mais je suis toujours étonné de la syntaxe de Date !!!!

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:
Bonsoir Pounet95

en fait j'essaie d'avoir dans mon label la formule suivante au lancement
de mon userform Úte(A1,1,1)
ici en remplaçant A1 par la valeur du combobox
Merci
Michel


"Pounet95" a écrit dans le message de news:
%
Bonsoir,
Qu'espère tu mettre dans Date( cmb,1,1) ??
D'où vient cette syntaxe ? Explicite ton problème , STP.

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:
Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "ÚTE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup
















Avatar
Pounet95
Re,
OK : confusion entre DATE ( focntion ) et DATE ( instruction VBA )
induite par le fait qu'il était question de label ......

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message de
news:
Bonsoir Pounet95
je vais contourner, mais cela fonctionne dans la cellule.
ÚTE(A1;1;1)
Merci
Michel

"Pounet95" a écrit dans le message de news:
e87%
Re,
si je comprends, tu veux mettre la FORMULE dans le label
label1.caption="ÚTE(" &combobox.value &",1,1)"
.... mais je suis toujours étonné de la syntaxe de Date !!!!

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:
Bonsoir Pounet95

en fait j'essaie d'avoir dans mon label la formule suivante au lancement
de mon userform Úte(A1,1,1)
ici en remplaçant A1 par la valeur du combobox
Merci
Michel


"Pounet95" a écrit dans le message de news:
%
Bonsoir,
Qu'espère tu mettre dans Date( cmb,1,1) ??
D'où vient cette syntaxe ? Explicite ton problème , STP.

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le
message de news:
Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "ÚTE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup




















Avatar
Rai
En VBA, la fonction DATE ne s'utilise pas comme sous Excel.
Date renvoie la date système en cours

Bonsoir Pounet95
je vais contourner, mais cela fonctionne dans la cellule.
ÚTE(A1;1;1)
Merci
Michel

"Pounet95" a écrit dans le message de news:
e87%

Re,
si je comprends, tu veux mettre la FORMULE dans le label
label1.caption="ÚTE(" &combobox.value &",1,1)"
.... mais je suis toujours étonné de la syntaxe de Date !!!!

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:

Bonsoir Pounet95

en fait j'essaie d'avoir dans mon label la formule suivante au lancement
de mon userform Úte(A1,1,1)
ici en remplaçant A1 par la valeur du combobox
Merci
Michel


"Pounet95" a écrit dans le message de news:
%

Bonsoir,
Qu'espère tu mettre dans Date( cmb,1,1) ??
D'où vient cette syntaxe ? Explicite ton problème , STP.

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Michel.Girard" a écrit dans le message
de news:

Bonsoir
J'essaie quelque chose comme cela :
Bien maladroitement ;-'

Private Sub ComboBox1_Change()
Label2.Caption = "ÚTE(ComboBox1.Value,1,1)"
End Sub

Merci beaucoup