Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1461 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Ajout de caractères

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Ajout de caractères

n°1122143
wooceans
Posté le 16-06-2005 à 15:51:28  profilanswer
 

Salut,
j'ai un petit problème. :pt1cable:  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.
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.  ;)

mood
Publicité
Posté le 16-06-2005 à 15:51:28  profilanswer
 

n°1122159
dough29
Posté le 16-06-2005 à 15:58:21  profilanswer
 

Salut !
 
Essaie ceci:
 

Code :
  1. machaine = "ab"
  2. While Len(machaine) < 5
  3.     machaine = "0" & machaine
  4. Wend

n°1122340
AlainTech
Pas trouvé? Cherche encore!
Posté le 16-06-2005 à 17:41:11  profilanswer
 

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!

n°1122351
AlainTech
Pas trouvé? Cherche encore!
Posté le 16-06-2005 à 17:52:46  profilanswer
 

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)

n°1122398
AlainTech
Pas trouvé? Cherche encore!
Posté le 16-06-2005 à 18:48:47  profilanswer
 

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!

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Ajout de caractères

 

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édentDOMXML 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
Plus de sujets relatifs à : Ajout de caractères


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR