Envoie de données

[GClaire]

Salut a toutes et tous

Voila, j'ai une petite interrogation.
J'espère que vous allez me comprendre, lol.

J'ai prie l'habitude lors de l'envoie de donnée d'utiliser ce code .

.Range('L' & L).Value = NomDucontrole.Value

Donc pour ce qui est de chiffre je rajoute ''' & , pour éviter la suppression du zéro dans la cellule.

.Range('L' & L).Value = ''' & NomDuControle.Value

Es-ce le meilleur moyen ? Ou vaut il mieux fomater la celulle au bon format.

Quels problemes cela peux amener par la suite ?

Dans mon appli que je suis entrain de faire, je l'utilise pour :

N° de téléphone
Code postale
Prix €, Prix Frs, acompte, pourcentage (Les calculs se fond par VBA)
N° de rue, N° de batiment

Merci d'avance pour vos conseils, G'Claire

 

[bebere]

bonsoir Gclaire,le Forum
si tu fais
.Range('L' & L).Value = ''' & NomDuControle.Value
si NomDuControle.Value=100
dans ta cellule tu auras '100

tu écris tout simplement
.Range('L' & L).Value = NomDuControle.Value

à bientôt

 

[GClaire]

Bébere, le forum

Merci pour ta réponse.

Et si la valeur = 07500 comme pour un code postale, ou 04 75 00 00 00 pour un N° de téléphone?

Les zéros vont se supprimer?

Merci, G'Claire

 

[michel_m]

Bonjour Gclaire, Bebere et ze forum,

Pour ma part, je me prendrais pas la tête et je formaterais la feuille Excel au formats voulus.

Sinon, tu peux toujours mettre au format par une macro (enregistreur puis élagage de l'inutile)

Tu as aussi la fonction format en vba du style:
Range('L' & L).Value = format(NomDuControle.Value,'00 00 00 00 00') pour un numéro de bigo. a noter que si les O sont jointifs le 0 de tête n'apparaît pas

Voilà, voilà, je reste sur ma première proposition

A+
Michel_M

 

[bebere]

bonjour Gclaire,Michel,le Forum
il est charmant Michel,ilZéZaye(lol)
pour le reste tout à fait de son avis
à bientôt

 

[GClaire]

Salut a toutes et tous

Merci Bébere et Michel_M

Salut, G'Claire