Suppression retour chariot

Suppression retour chariot - VB/VBA/VBS - Programmation

Marsh Posté le 21-04-2004 à 15:27:38    

Salut salut,
 
Je voudrais savoir quel est le nom de la fonction qui permet de supprimer tous les retour chariots dans une zone de texte.
 
Merci d'avance.  :jap:

Reply

Marsh Posté le 21-04-2004 à 15:27:38   

Reply

Marsh Posté le 22-04-2004 à 07:56:17    

En supposant que ta zone de texte s'appelle lstText, tu récupères le contenu de la liste dans la variable strTemp sans retour chariot...
 
 
Dim strTemp As String
Dim i As Integer
 
    For i = 0 To lstText.ListCount - 1
        strTemp = strTemp & lstText.List(i)
    Next i
    Debug.Print strTemp


---------------
J'ai un message.."Cliquez OK pour continuer."...Qu'est ce que je fais ?
Reply

Marsh Posté le 22-04-2004 à 09:41:14    

JihEmAir a écrit :

En supposant que ta zone de texte s'appelle lstText, tu récupères le contenu de la liste dans la variable strTemp sans retour chariot...
 
 
Dim strTemp As String
Dim i As Integer
 
    For i = 0 To lstText.ListCount - 1
        strTemp = strTemp & lstText.List(i)
    Next i
    Debug.Print strTemp
 


 
ca marchera pas ton code ! Dans une boucle c'est des chiffres qu'il faut mettre et pas des caractères ce n'est pas ce que t'as mis en seconde partie (lsttex...)
 

Code :
  1. dim i as integer
  2. for i = 1 to len(zonetexte)
  3. strTemp  = mid(zonetexte,1,i)
  4. if strTemp  <> chr(13) then
  5. strTemp  =strTemp  + strTemp
  6. end if
  7. next i
  8. msgbox(strTemp)


 
 
superpingu : vérifie la fonction "mid" j'ai peut-être inversé le '1' et le 'i', j'ai pas Vb sous les yeux, et ensuite le code ASCII du retour chariot, je crois que c'est chr(13); mais sans conviction non +. Le but de de petit bout c'est le prendre chaque caractère, de détecter si le caractère retournée est = chr(13) et de les reasembler !


Message édité par cvb le 22-04-2004 à 09:42:21
Reply

Marsh Posté le 22-04-2004 à 10:32:41    

A cbv:
Si c'est comme tu dis, c'est que je n'ai pas compris la question. Mon code marche sur des listbox multi-lignes. Si c'est une chaine de caractères, c'est toi qui as raison. A voir.


---------------
J'ai un message.."Cliquez OK pour continuer."...Qu'est ce que je fais ?
Reply

Marsh Posté le 22-04-2004 à 10:59:25    

JihEmAir a écrit :

A cbv:
Si c'est comme tu dis, c'est que je n'ai pas compris la question. Mon code marche sur des listbox multi-lignes. Si c'est une chaine de caractères, c'est toi qui as raison. A voir.

j'entends zone de texte, par un contrôle texte ! en voyant ton code aprés coup, j'ai compris pourquoi tu l'avais mis. Mais c'est à superpingu de préciser la question  [:spamafote]  

Reply

Marsh Posté le 22-04-2004 à 12:16:36    

Merci merci les gars c'était pas pour moi ce problème mais en fait la personne qui voulait le renseignement voulait savoir s'il n'existait pas une fonction toute faite pour ca, sans être obligé de faire une macro.  :sweat:  
 
Bon bah je retourne a ma place sur le forum Windows, software & réseaux. Merci bcp.  :jap:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed