VBA concaténer deux réponses Userform

Résolu/Fermé

howiz Messages postés 20 Date d'inscription mercredi 1 avril 2015 Statut Membre Dernière intervention 21 août 2015 - 5 juin 2015 à 11:45
Maurice - 5 juin 2015 à 12:09

Bonjour,

J'ai un formulaire comme suit :

Prenom : TextBox1
Nom : TextBox2

Et je souhaite prendre les réponses et les placer dans une cellule sous la forme suivante: Prenom NOM.

Je n'arrive pas a les concaténer... J'ai essayé le code ci dessous sans réussite :



'nom = NOM
TextBox2 = UCase(TextBox2)

'prenom = Prenom
Dim st As String
st = TextBox1.Text
Mid(st, 1, 1) = UCase(Mid(st, 1, 1))
TextBox1.Text = st

'probleme ....
Dim identite as String
identite = TextBox1.Value & TextBox2.Value

Tout le reste de mon code marche sans problème, c'est vraiment pour assembler les réponses que j'épprouve des difficultés.

Merci d'avance pour votre aide !!

A voir également:

VBA concaténer deux réponses Userform
Concatener deux cellules excel - Guide
Deux comptes whatsapp - Guide
Concaténer pdf - Guide
Deux ecran pc - Guide
Inverse de concatener ✓ - Forum Excel

1 réponse

Réponse 1 / 1

Maurice
5 juin 2015 à 12:09

Bonjour
sans modele de ton fichier Dur a voir

il faut deja modifier tes TextBox Ex:

Private Sub TextBox1_Change()
   TextBox1.Value = Application.Proper(TextBox1.Value)
End Sub

Private Sub TextBox2_Change()
   TextBox2.Value = UCase(TextBox2.Value)
End Sub

Private Sub ButValide_Click()
   Cells(L, C).Value = TextBox1.Value & " " & TextBox2.Value
End Sub

A+
Maurice

Discussions similaires

Un seul de mes écouteurs marche. Que faire ?

Retour ligne dans une concaténation EXCEL ?

2 comptes facebook avec même mail et même nom

"L'indice n'appartient à la sélection" + VBA

VBA : Range avec références variables..

Discussions similaires

Newsletters