Istext

bonjour

AU fait je lai teste mais comme ca

If Not WorksheetFunction.IsText(TextBox1.Value) Then
MsgBox "ce nest pas un text "

Else
Range("a1") = TextBox1.Value
End If

ce que je veux si textebox1 nest pas un text le msgbox va mafficher ce message "ce nest pas un text "

si le textbox1 est remplis par un text le range("a1") = au text qui dans textbox1

le probleme c que meme si c un nombre qui dans textbox1 le programe sexcutera (range("a1")= le nombre

alors que moi je veux que le programme sexcutera que si textbox1 est un text
si c un nombre ou vide c le MsgBox "ce nest pas un text " qui doit safficher

au fait c ou cas ou jai oublie de cliquer sur combox
dans ce cas la textbox reste vide et c la que le programme va entrer

merci

jespere que vous avez compris ce que je voudrais faire

Re,

If TextBox1 <> "" Then  'test si textbox pas vide
    Range("a1") = TextBox1.Value
Else
    MsgBox "veuillez selectionner un texte"
End If

re

merci beaucoup

bonjour

Bonjour
jai cree userform
dans cette userform il ya des texbox
textebox.value=ComboBox1.value

donc textbox1 prend toujours ce qui est dans combox1

et combox1 je lai charge avec : "coude arrondi" et "coude brusque"

alors le textbox1 va prendre soit "coude arrondi" ou"coude brusque"

ce que je veux c

quand le textbox1 est vide (ca veut dire que je pas choisi dans combox1 ) le programe ne va pas sexcuter

voila tout

si cetait un nombre
on met : isnumeric(....)

mais pour le text je ne sais pas

merci

a

Car c'est la syntaxe...

ok merci