Split avec "Guillemet" """

[pacoako]

Bonjour à tous! J'ai un petit blocage sur la fonction split.

J'essaie de split un string comportant des guillemets et je n'arrive pas à trouver la bonne syntaxe pour qu'il reconnaisse mon Delimiter.

Voici mon string
="R:\Tous\Agents recouvrement\"

Est-ce possible de split avec des guillemets?? Merci d'avance! A+

 

[alexga78]

Re : Split avec "Guillemet" """

bonsoir Pacoako,
Pas sûr d'avoir compris exactement la syntaxe exacte de ton string, un essai sans conviction avec différentes possibilités.
Bonne nuit à tous

 

[vbacrumble]

Re : Split avec "Guillemet" """

Bonsoir

Option Explicit
Sub exempleSplit()
Dim t, res$, a$, i&
a = "R:\Tous\Agents recouvrement\"
t = Split(a, "\")
For i = 0 To UBound(t) - 1
res = res & "item (" & i & "): " & t(i) & vbLf
Next i
MsgBox res
End Sub

A+

 

[alexga78]

Re : Split avec "Guillemet" """

Bonsoir vbacrumble,

en fait g un peu galéré pour trouver une réponse car dans le message initial il semble que le string de pacoako soit avec le égale (="R:\Tous\Agents recouvrement\").
donc j'ai essayé de le mettre en variable en doublant les "", je crois que c'est comme ca qu'il faut procéder :

a = "" = "R:\Tous\Agents recouvrement\"""

mais du coup impossible de spliter ???? seule réponse que j'ai trouvée en passant par une cellule.
je me suis peut être embrouillé pour rien c'est tard mais je suis curieux de savoir si c'est possible
Bonne nuit

Ps : un petit détail dans ton code pour la déclaration des variables
a$, i&
$ c'est pour string mais & ?

 

[vbacrumble]

Re : Split avec "Guillemet" """

Bonsoir alexga

alexga

& = Long

Mais en me relisant j'aurai du marqué

Dim t, res$, a$, i As Byte

 

[wilfried_42]

Re : Split avec "Guillemet" """

bonjour

à essayer, je n'ai pas testé, mais ca parrait logique

dim montablo
dim montxt as string
montext = """Montexte"""
montablo = split(montext,chr(34))

 

[pacoako]

Re : Split avec "Guillemet" """

Bonjour Alexga, VbaCrumble & Wilfried 42!!!

Merci beaucoup pour vos réflexions! En fait j'ai commencé par la réponse de wilfred et le chr(34) fonctionne à merveille! Je vais prendre le temps de vérifier vos autres réponses et vous en donnerai des news au courant de la journée!

Merci encore à tous! A ++ & bonne journée!

 

[alexga78]

Re : Split avec "Guillemet" """

Bonsoir wilfried_42, le forum
j'avais testé cette possibilité mais si tu mets le string dans le code ci dessous, ça ne split pas ça doit etre dû au = ?

Sub exempleSplit()
Dim t, res$, a$, i&
a = "" = "R:\Tous\Agents recouvrement\"""
t = Split(a, Chr(34))
For i = 0 To UBound(t) - 1
res = res & "item (" & i & "): " & t(i) & vbLf
Next i
MsgBox res
End Sub

à plus