XL 2019 enlever * dans un combobox
Bonjour Escudo,
On pourrait supprimer "*", seulement "*" peut signifier aussi "n'importe quel caractère".
C'est mieux d'utiliser :
On pourrait supprimer "*", seulement "*" peut signifier aussi "n'importe quel caractère".
C'est mieux d'utiliser :
VB:
N = Mid(ComboBox1, 1, Len(ComboBox1) - 1)
job75
XLDnaute Barbatruc
Bonsoir escudo, sylvanu,
Pas bien clair mais bon :
A+
Pas bien clair mais bon :
VB:
ComboBox1 = Replace(ComboBox1, "*", "")MERCI infiniment à vous deux pour votre aide.
la solution de job75 fonctionne tres bien
la solution de job75 fonctionne tres bien
job75
XLDnaute Barbatruc
Mais s'il s'agit de conserver uniquement les chiffres :
Code:
Dim x$, y$, i%, z$
'---
x = ComboBox1
y = ""
For i = 1 To Len(x)
z = Mid(x, i, 1)
If IsNumeric(z) Then y = y & z
Next
ComboBox1 = yDiscussions similaires
- Résolu(e)
