Format de nombres

milom · 9 Mai 2005

Bonjour à tous .
Je voudrais générer une liste de numéros de portable de façon aléatoire.
J utilise donc cette formule :
='06'&' '&ALEA.ENTRE.BORNES(0;99)&' '&ALEA.ENTRE.BORNES(0;99)&' '&ALEA.ENTRE.BORNES(0;99)&' '&ALEA.ENTRE.BORNES(0;99)

Seulement au lieu de m'afficher 06 01 46 02 57 , il m'affiche 06 1 46 2 57....

Comment forcer l'écriture de chaque nombre sous la forme -- c'est a dire obtenir des 01 et pas des 1....

Merci d'avance

robby · 9 Mai 2005

essaye ca:

Sub numeroaleatoire()
Dim numero As String
Dim c As String
numero = '06'
For x = 1 To 4
a = Rnd
a = a * 100
b = CInt(a)
If b < 10 Then
c = '0' & b
Else: c = b
End If
numero = numero & ' ' & c
Next x
MsgBox numero
End Sub

milo · 9 Mai 2005

Euh merci beaucoup pour ton aide...Mais comment j'utilise du code dans excel ?? je ne l'ai jamais fait auparavant !!!!

JPM · 9 Mai 2005

Bonjour à tous,

Pourquoi pas mettre ça :
='06'&' '&ALEA.ENTRE.BORNES(0;9)&ALEA.ENTRE.BORNES(0;9)&' '&ALEA.ENTRE.BORNES(0;9)&ALEA.ENTRE.BORNES(0;9)&' '&ALEA.ENTRE.BORNES(0;9)&ALEA.ENTRE.BORNES(0;9)&' '&ALEA.ENTRE.BORNES(0;9)&ALEA.ENTRE.BORNES(0;9)

Bonne journée

Jean-Pierre

PascalXLD · 9 Mai 2005

Bonjour

sans macro essaies ceci

='06'&' '&TEXTE(ALEA.ENTRE.BORNES(0;99);'00')&' '&TEXTE(ALEA.ENTRE.BORNES(0;99);'00')&' '&TEXTE(ALEA.ENTRE.BORNES(0;99);'00')&' '&TEXTE(ALEA.ENTRE.BORNES(0;99);'00')

Bon courage

PascalXLD · 9 Mai 2005

OUPS excuse Jean-Pierrre pas rafraichi

Mais 2 solutions différentes

Bonne journée

Milom · 9 Mai 2005

Merci beaucoup pour ton aide
Voila un forum ou je viendrai plus souvent

Format de nombres

milom

Guest

robby

Guest

milo

Guest

JPM

Guest

PascalXLD

XLDnaute Barbatruc

PascalXLD

XLDnaute Barbatruc

Milom

Guest

Discussions similaires