Split avec "Guillemet" """

A

alexga78

XLDnaute Occasionnel

• 24 Février 2009

• #2

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

 

Pièces jointes

• Classeur1.zip

  9.2 KB · Affichages: 21
• Classeur1.zip

  9.2 KB · Affichages: 25
• Classeur1.zip

  9.2 KB · Affichages: 21

Vote positif 0 Vote négatif

vbacrumble

XLDnaute Accro

• 24 Février 2009

• #3

Re : Split avec "Guillemet" """

Bonsoir

Code:

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+

 

Vote positif 0 Vote négatif

A

alexga78

XLDnaute Occasionnel

• 24 Février 2009

• #4

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 :

Code:

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 & ?

 

Dernière édition: 24 Février 2009

Vote positif 0 Vote négatif

vbacrumble

XLDnaute Accro

• 24 Février 2009

• #5

Re : Split avec "Guillemet" """

Bonsoir alexga

alexga

& = Long

Cliquez pour agrandir...

Mais en me relisant j'aurai du marqué

Code:

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

 

Dernière édition: 24 Février 2009

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 24 Février 2009

• #6

Re : Split avec "Guillemet" """

bonjour

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

Code:

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

 

Vote positif 0 Vote négatif

P

pacoako

XLDnaute Occasionnel

• 24 Février 2009

• #7

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!

 

Vote positif 0 Vote négatif

A

alexga78

XLDnaute Occasionnel

• 24 Février 2009

• #8

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 = ?

Code:

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

 

Vote positif 0 Vote négatif