VBA et chaine de caractères

VBA et chaine de caractères - VB/VBA/VBS - Programmation

Marsh Posté le 28-06-2013 à 11:38:58    

Bonjour, j'ai une chaine de caractère contenue dans une cellule de la forme 12 05 98 1 1 24
 
J'aimerais pouvoir récupérer distinctement le 12, le 05, le 98, le 1, le 1, le 24 pour pouvoir les réinsérer dans d'autres cellules distinctes.
 
Comment faire? String est-il la fonction solution? (à noter que les nombres entre les espaces peuvent être de longueur variable).
 
Cordialement,  
 
ArowBaz

Reply

Marsh Posté le 28-06-2013 à 11:38:58   

Reply

Marsh Posté le 28-06-2013 à 13:30:29    

 
           Bonjour,
 
           voir du côté de la fonction  Split  …
 

Reply

Marsh Posté le 28-06-2013 à 13:45:46    

 

Code :
  1. Sub DemoSplit()
  2.     S$ = "12 05 98 1 1 24"
  3.     M$ = S & vbLf
  4.      T = Split(S)
  5.     For N& = 0 To UBound(T)
  6.         M = M & vbLf & "T(" & N & " ) = " & T(N)
  7.     Next
  8.    
  9.     MsgBox M
  10. End Sub


Message édité par Marc L le 28-06-2013 à 14:13:50
Reply

Marsh Posté le 28-06-2013 à 14:33:55    

Merci beaucoup pour les réponses mais ayant débuté le VBA cette semaine j'ai encore quelques difficultés à comprendre.
 
A quoi sert le $ ?
 
On peut faire Range("A1" ).Value = S    ?
 
Et comment associé chaque groupe à une variable de manière à les insérer à des endroits différents?

Reply

Marsh Posté le 28-06-2013 à 18:56:07    

arowbaz a écrit :

A quoi sert le $ ?

           Optionnel, old fashion style, sert à typer la variable en String au lieu de la déclarer par l'instruction  Dim  …
 

arowbaz a écrit :

On peut faire Range("A1" ).Value = S    ?

           Oui, affectation classique dans une cellule.
 

arowbaz a écrit :

Et comment associé chaque groupe à une variable de manière à les insérer à des endroits différents?

           Groupe ?     Split effectue l'association à une variable tableau comme dans mon code de démonstration …
 

Reply

Marsh Posté le 28-06-2013 à 19:54:56    

En fait j'ai changé et je l'ai écris 5 fois car je voyais pas comment faire avec une boucle vu que je voulais une nouvelle variable à chaque groupe
 
merci ;)

Reply

Marsh Posté le 04-07-2013 à 12:56:25    

bonjour Marc,
je trouve ton macro intéressant , excuse moi en fait j’ai une chaine de caractère qui contient des valeurs séparé par des point virgule et je veux récupérer chaque un des valeurs sans le point virgule dans des variables pour le passé a des requêtes BO  
ex : chaine = "%142%;%5698%;%8756%;%258%"  
si tu peux m’aider
merci d’avance

Reply

Marsh Posté le 09-07-2013 à 09:54:59    

Bonjour,
j'ai un problme en vb.net
j'ai réaliser une application avec base de données Access .
j'ajoute des enregistrements et apres 2 ou 3 essai je vois que les enregistrements sont éliminer (tables vide) je sais pas ou est leproblemes
 
voila le code d'ajout
 
   da.InsertCommand = New OleDbCommand("insert into titreM(tm,nom,datecréation,description,images,dossier) values('" & TxtTM.Text & "', '" & TxtNom.Text & "', '" & DTPDate.Value.Date & "','" & TxtDescr.Text & "','" & str & "', '" & doss & "')", connection)
                da.InsertCommand.ExecuteNonQuery()
       

Reply

Sujets relatifs:

Leave a Replay

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