Je d=E9veloppe un petit Userform pour supprmier les caract=E8res de texte
au d=E9but ou =E0 la fin de cellules.
Concr=E8tement, j'ai deux checkbox qui demandent =E0 l'utilisateur si il
veut supprmer les caract=E8res =E0 gauche ou =E0 droite de la cellule et
j'ai un textbox, qui demande le nombre de caract=E8res =E0 supprmier.
Je n'arrive pas =E0 r=E9cup=E9rer et utiliser la valeur num=E9rique entr=E9=
e par
l'utilisateur dans le textbox.
Bonjour Richard G. L'erreur est dans la ligne : ActiveCell.FormulaR1C1 = "=LEFT(RC[1],LEN(RC[1])- UserForm1.TextBox1.Value)" Si tu mets UserForm1.TextBox1.Value entre les guillemets, la formule n'est pas évaluée. => ActiveCell.FormulaR1C1 = "=LEFT(RC[1],LEN(RC[1])-" & _ UserForm1.TextBox1.Value & ")"
Corto
Bonjour à tous,
Je développe un petit Userform pour supprmier les caractères de texte au début ou à la fin de cellules. Concrètement, j'ai deux checkbox qui demandent à l'utilisateur si il veut supprmer les caractères à gauche ou à droite de la cellule et j'ai un textbox, qui demande le nombre de caractères à supprmier. Je n'arrive pas à récupérer et utiliser la valeur numérique entrée par l'utilisateur dans le textbox.
ça coince sur la ligne de la formule. Merci par avance pour votre aide.
A+
Bonjour Richard G.
L'erreur est dans la ligne : ActiveCell.FormulaR1C1 =
"=LEFT(RC[1],LEN(RC[1])- UserForm1.TextBox1.Value)"
Si tu mets UserForm1.TextBox1.Value entre les guillemets, la formule
n'est pas évaluée.
=> ActiveCell.FormulaR1C1 = "=LEFT(RC[1],LEN(RC[1])-" & _
UserForm1.TextBox1.Value & ")"
Corto
Bonjour à tous,
Je développe un petit Userform pour supprmier les caractères de texte
au début ou à la fin de cellules.
Concrètement, j'ai deux checkbox qui demandent à l'utilisateur si il
veut supprmer les caractères à gauche ou à droite de la cellule et
j'ai un textbox, qui demande le nombre de caractères à supprmier.
Je n'arrive pas à récupérer et utiliser la valeur numérique entrée par
l'utilisateur dans le textbox.
Bonjour Richard G. L'erreur est dans la ligne : ActiveCell.FormulaR1C1 = "=LEFT(RC[1],LEN(RC[1])- UserForm1.TextBox1.Value)" Si tu mets UserForm1.TextBox1.Value entre les guillemets, la formule n'est pas évaluée. => ActiveCell.FormulaR1C1 = "=LEFT(RC[1],LEN(RC[1])-" & _ UserForm1.TextBox1.Value & ")"
Corto
Bonjour à tous,
Je développe un petit Userform pour supprmier les caractères de texte au début ou à la fin de cellules. Concrètement, j'ai deux checkbox qui demandent à l'utilisateur si il veut supprmer les caractères à gauche ou à droite de la cellule et j'ai un textbox, qui demande le nombre de caractères à supprmier. Je n'arrive pas à récupérer et utiliser la valeur numérique entrée par l'utilisateur dans le textbox.
ça coince sur la ligne de la formule. Merci par avance pour votre aide.
A+
JB
Bonjour,
Pour convertir en numérique:
Val(UserForm1.TextBox1)
ou Cint(UserForm1.TextBox1)
JB
On 4 juin, 16:09, "Richard G." wrote:
Bonjour à tous,
Je développe un petit Userform pour supprmier les caractères de texte au début ou à la fin de cellules. Concrètement, j'ai deux checkbox qui demandent à l'utilisateur si il veut supprmer les caractères à gauche ou à droite de la cellule et j'ai un textbox, qui demande le nombre de caractères à supprmier. Je n'arrive pas à récupérer et utiliser la valeur numérique entr ée par l'utilisateur dans le textbox.
ça coince sur la ligne de la formule. Merci par avance pour votre aide.
A+
Bonjour,
Pour convertir en numérique:
Val(UserForm1.TextBox1)
ou Cint(UserForm1.TextBox1)
JB
On 4 juin, 16:09, "Richard G." <sylvainpelllet...@gmail.com> wrote:
Bonjour à tous,
Je développe un petit Userform pour supprmier les caractères de texte
au début ou à la fin de cellules.
Concrètement, j'ai deux checkbox qui demandent à l'utilisateur si il
veut supprmer les caractères à gauche ou à droite de la cellule et
j'ai un textbox, qui demande le nombre de caractères à supprmier.
Je n'arrive pas à récupérer et utiliser la valeur numérique entr ée par
l'utilisateur dans le textbox.
Je développe un petit Userform pour supprmier les caractères de texte au début ou à la fin de cellules. Concrètement, j'ai deux checkbox qui demandent à l'utilisateur si il veut supprmer les caractères à gauche ou à droite de la cellule et j'ai un textbox, qui demande le nombre de caractères à supprmier. Je n'arrive pas à récupérer et utiliser la valeur numérique entr ée par l'utilisateur dans le textbox.