OVH Cloud OVH Cloud

Split ou Deconcatener?

4 réponses
Avatar
Denys
Bonjour à tous,

Sur une feuille Excel en cellule C13, on retrouve la ville de résidence du
client, ainsi que sa province en deux lettres... Voici deux exemples:

Montreal,QC
Toronto,ON

Lors de l'initialisation d'un Userform, j'aimerais que le Textbox3 aille
chercher la valeur en cellule C13 jusqu'à la virgule. De même, je
souhaiterais que le Combobox2 inscrive les deux caractères suivant la virgule
dans cette même cellulle C13....

Devrais-je d'abord "Deconcatener" le contenu de la cellule C13 en 2 cellules
différentes, puis lors de l'initialisation du Userform aller chercher les
valeurs dans ces 2 cellules, ou est-il possible de le faire directement?

Merci pour votre aide...

Denys

4 réponses

Avatar
Elliac
Bonjour Denys,

TextBox3 = Left(Range("c13"), Application.Find(",", Range("c13")) - 1)
ComboBox2 = Right(Range("c13"), 2)

Camille

"Denys" wrote:

Bonjour à tous,

Sur une feuille Excel en cellule C13, on retrouve la ville de résidence du
client, ainsi que sa province en deux lettres... Voici deux exemples:

Montreal,QC
Toronto,ON

Lors de l'initialisation d'un Userform, j'aimerais que le Textbox3 aille
chercher la valeur en cellule C13 jusqu'à la virgule. De même, je
souhaiterais que le Combobox2 inscrive les deux caractères suivant la virgule
dans cette même cellulle C13....

Devrais-je d'abord "Deconcatener" le contenu de la cellule C13 en 2 cellules
différentes, puis lors de l'initialisation du Userform aller chercher les
valeurs dans ces 2 cellules, ou est-il possible de le faire directement?

Merci pour votre aide...

Denys


Avatar
Youky
Salut Denys,
il te sera aisé de mettre la ville ou la province ou tu veux
verifier le nom de la feuille

Private Sub CommandButton1_Click()
tout = Feuil1.[C13]
ville = Left(tout, Len(tout) - 3)
code = Right(tout, 2)
MsgBox ville
MsgBox code
End Sub

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

Bonjour à tous,

Sur une feuille Excel en cellule C13, on retrouve la ville de résidence du
client, ainsi que sa province en deux lettres... Voici deux exemples:

Montreal,QC
Toronto,ON

Lors de l'initialisation d'un Userform, j'aimerais que le Textbox3 aille
chercher la valeur en cellule C13 jusqu'à la virgule. De même, je
souhaiterais que le Combobox2 inscrive les deux caractères suivant la
virgule

dans cette même cellulle C13....

Devrais-je d'abord "Deconcatener" le contenu de la cellule C13 en 2
cellules

différentes, puis lors de l'initialisation du Userform aller chercher les
valeurs dans ces 2 cellules, ou est-il possible de le faire directement?

Merci pour votre aide...

Denys


Avatar
Denys
Bonjour Camille,

C'est absolument parfait !!!!!

Merci infiniment

Bonne journée

Denys


Bonjour Denys,

TextBox3 = Left(Range("c13"), Application.Find(",", Range("c13")) - 1)
ComboBox2 = Right(Range("c13"), 2)

Camille

"Denys" wrote:

Bonjour à tous,

Sur une feuille Excel en cellule C13, on retrouve la ville de résidence du
client, ainsi que sa province en deux lettres... Voici deux exemples:

Montreal,QC
Toronto,ON

Lors de l'initialisation d'un Userform, j'aimerais que le Textbox3 aille
chercher la valeur en cellule C13 jusqu'à la virgule. De même, je
souhaiterais que le Combobox2 inscrive les deux caractères suivant la virgule
dans cette même cellulle C13....

Devrais-je d'abord "Deconcatener" le contenu de la cellule C13 en 2 cellules
différentes, puis lors de l'initialisation du Userform aller chercher les
valeurs dans ces 2 cellules, ou est-il possible de le faire directement?

Merci pour votre aide...

Denys




Avatar
Denys
Bonjour Youky,

Merci, ta réponse pourra m'être utile dans le futur....

Bonne journée

Denys


Salut Denys,
il te sera aisé de mettre la ville ou la province ou tu veux
verifier le nom de la feuille

Private Sub CommandButton1_Click()
tout = Feuil1.[C13]
ville = Left(tout, Len(tout) - 3)
code = Right(tout, 2)
MsgBox ville
MsgBox code
End Sub

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

Bonjour à tous,

Sur une feuille Excel en cellule C13, on retrouve la ville de résidence du
client, ainsi que sa province en deux lettres... Voici deux exemples:

Montreal,QC
Toronto,ON

Lors de l'initialisation d'un Userform, j'aimerais que le Textbox3 aille
chercher la valeur en cellule C13 jusqu'à la virgule. De même, je
souhaiterais que le Combobox2 inscrive les deux caractères suivant la
virgule

dans cette même cellulle C13....

Devrais-je d'abord "Deconcatener" le contenu de la cellule C13 en 2
cellules

différentes, puis lors de l'initialisation du Userform aller chercher les
valeurs dans ces 2 cellules, ou est-il possible de le faire directement?

Merci pour votre aide...

Denys