lire le premier chiffre

B

bertrand

Guest

• 25 Avril 2005

• #2

bonjour,

voici un exemple qui devrait t'orienter.

le chiffre est en a1 :

Sub test()
a = Range('a1').Value
b = Left(a, 1)
msg = MsgBox(b)
End Sub


@+

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

Modérateur

• 25 Avril 2005

• #3

Bonjour

En gardant lidée de Bertrand tu peux te passer de la première variable en écrivant directement

Dim x as byte

x=Left(Range('A1'),1)

Bon courage

 

Vote positif 0 Vote négatif

D

david

Guest

• 25 Avril 2005

• #4

ok ca marche

merci encore

 

Vote positif 0 Vote négatif