Ajout de caractères
Ajout de caractères - VB/VBA/VBS - Programmation
Marsh Posté le 16-06-2005 à 15:58:21
Salut !
Essaie ceci:
Code :
|
Marsh Posté le 16-06-2005 à 17:41:11
Y en a vraiment marre que tu postes chaque fois un autre topic pour une même question!
Je t'ai répondu là:
http://forum.hardware.fr/hardwaref [...] -1.htm#bas
Qu'en as-tu fait?
Il y a exactement ce que tu veux avec la possibilité de définir tes largeurs de colonnes.
On veut bien aider mais faudrait voir à avoir un minimum de respect pour ceux qui te répondent!
Marsh Posté le 16-06-2005 à 17:52:46
Pour mettre des zéros (devant) à la place d'espaces (derrière), essaye ceci:
sF = String(CLENF - Len(vI.Cells(1, 6)),"0" ) & vI.Cells(1, 6) |
Marsh Posté le 16-06-2005 à 18:48:47
Et puis, un petit merci si on a pu t'aider, ça ne ferait pas de mal non plus.
4 de tes topics sur 7 se terminent avec une info qu'on te donne ou une question qu'on te pose et...
Tu ouvres un autre topic.
On ne saura jamais si on a pu t'aider...
C'est un forum d'échange, ici. Ne l'oublie pas.
Message édité par AlainTech le 16-06-2005 à 22:23:37
---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
Sujets relatifs:
- Comparaison de chaines de caractères (dates)
- [vb.net] Contrôle des caractères saisis dans une InputBox
- [PHP] Ajout panier écrase le précédent
- DOMXML et encodage des caracteres
- trier un tableau à 2 dimensions de caracteres
- [vb.net] Interprétation d'une chaîne de caractères
- [C]Nb de caracteres dans le buffer liaison série??
- Les caractères accentués s'enregistrent mal dans ma base MySQL
- caractères bizarres dans mon EditBox
- [DOS] Renommer des fichiers + ajout de chaine de caractères
Marsh Posté le 16-06-2005 à 15:51:28
Salut,
Je dois ajouter un certain nombre de "0" devant la chaine de caractères appelée "ValeurF". 1 "0" si la chaine est composée de 4 caractères, 2 "0" si il y a 3 caractères et 3 "0" si il y a 2 caractères.
j'ai un petit problème.
LA CHAINE DOIT TOUJOURS AVOIR 5 CARACTERES AU FINAL
F = Len(ValeurF) 'Compte le nombre de caractères danc la chaine "ValeurF"
If F = 2 Then Add (ValeurF) "000"
If F = 3 Then Add (ValeurF) "00"
If F = 4 Then Add (ValeurF) "0"
VBA me dit "erreur de syntaxe" or je ne voi pa quelle est l'erreur. Si quelqu'un pouvait m'aider à corriger cette erreur...merci d'avance.