Je suis confronté au problème suivant.
J'ai une base de données "clients" dont les deux premières colonnes sont un
numéro d'ordre et le nom du client.
Une combobox me permet d'appeler le client à qui je dois envoyer une
facture. Le numéro d'ordre du client appelé s'inscrit dans la "linked cell"
en l'occurence J1. La donnée trouvée sert de support pour l'adressage de la
facture.
La difficulté est la suivante: le choix du client dans la combobox fait
apparaître le numéro d'ordre dans la cellule liée (J1): mais dans un format
texte (l'apostrophe précède le chiffre). Je dois retaper cette donnée en J1
pour que les formules fonctionnent.
Quelqu'un pourrait-il me trouver une solution?
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
MichDenis
Bonjour Jean,
Un combobox renvoie tu "Texte" au même titre qu'un textbox.
Si ton numéro d'ordre est une donnée numérique, tu peux faire ceci :
Ce code suppose qu'il est contenu dans le formulaire '------------------------ With worksheets("Feuil1") ' à adapter 'Met la cellule au format "Standard" 'Tu peux donner un format numérique de ton choix si tu le veux 'comme = "# ##0" .range("J1").NumberFormat = "General" If me.combobox1.listindex <>-1 then .range("J1").value = cdbl(trim(Me.Combobox1.text)) end if end with '------------------------
Salutations!
"JEAN MARTIN" a écrit dans le message de news: OKN98% Bonjour,
Je suis confronté au problème suivant. J'ai une base de données "clients" dont les deux premières colonnes sont un numéro d'ordre et le nom du client. Une combobox me permet d'appeler le client à qui je dois envoyer une facture. Le numéro d'ordre du client appelé s'inscrit dans la "linked cell" en l'occurence J1. La donnée trouvée sert de support pour l'adressage de la facture.
La difficulté est la suivante: le choix du client dans la combobox fait apparaître le numéro d'ordre dans la cellule liée (J1): mais dans un format texte (l'apostrophe précède le chiffre). Je dois retaper cette donnée en J1 pour que les formules fonctionnent. Quelqu'un pourrait-il me trouver une solution?
Merci d'avance Jean
Bonjour Jean,
Un combobox renvoie tu "Texte" au même titre qu'un textbox.
Si ton numéro d'ordre est une donnée numérique, tu peux faire ceci :
Ce code suppose qu'il est contenu dans le formulaire
'------------------------
With worksheets("Feuil1") ' à adapter
'Met la cellule au format "Standard"
'Tu peux donner un format numérique de ton choix si tu le veux
'comme = "# ##0"
.range("J1").NumberFormat = "General"
If me.combobox1.listindex <>-1 then
.range("J1").value = cdbl(trim(Me.Combobox1.text))
end if
end with
'------------------------
Salutations!
"JEAN MARTIN" <rousseau431@hotmail.com> a écrit dans le message de news: OKN98%23oSFHA.2432@TK2MSFTNGP12.phx.gbl...
Bonjour,
Je suis confronté au problème suivant.
J'ai une base de données "clients" dont les deux premières colonnes sont un
numéro d'ordre et le nom du client.
Une combobox me permet d'appeler le client à qui je dois envoyer une
facture. Le numéro d'ordre du client appelé s'inscrit dans la "linked cell"
en l'occurence J1. La donnée trouvée sert de support pour l'adressage de la
facture.
La difficulté est la suivante: le choix du client dans la combobox fait
apparaître le numéro d'ordre dans la cellule liée (J1): mais dans un format
texte (l'apostrophe précède le chiffre). Je dois retaper cette donnée en J1
pour que les formules fonctionnent.
Quelqu'un pourrait-il me trouver une solution?
Un combobox renvoie tu "Texte" au même titre qu'un textbox.
Si ton numéro d'ordre est une donnée numérique, tu peux faire ceci :
Ce code suppose qu'il est contenu dans le formulaire '------------------------ With worksheets("Feuil1") ' à adapter 'Met la cellule au format "Standard" 'Tu peux donner un format numérique de ton choix si tu le veux 'comme = "# ##0" .range("J1").NumberFormat = "General" If me.combobox1.listindex <>-1 then .range("J1").value = cdbl(trim(Me.Combobox1.text)) end if end with '------------------------
Salutations!
"JEAN MARTIN" a écrit dans le message de news: OKN98% Bonjour,
Je suis confronté au problème suivant. J'ai une base de données "clients" dont les deux premières colonnes sont un numéro d'ordre et le nom du client. Une combobox me permet d'appeler le client à qui je dois envoyer une facture. Le numéro d'ordre du client appelé s'inscrit dans la "linked cell" en l'occurence J1. La donnée trouvée sert de support pour l'adressage de la facture.
La difficulté est la suivante: le choix du client dans la combobox fait apparaître le numéro d'ordre dans la cellule liée (J1): mais dans un format texte (l'apostrophe précède le chiffre). Je dois retaper cette donnée en J1 pour que les formules fonctionnent. Quelqu'un pourrait-il me trouver une solution?
