strParameter = arrCollection(intCount, 1) & Chr(34) & _
" = " & _
Chr(34) & arrCollection(intCount, 2)
bringt folgendes Ergebnis:
"BoxMax"" = ""0"
Wie stelle ich es an, daß ich keine doppelten " bekomme?
Gruß Werner
bringt folgendes Ergebnis:
"BoxMax"" = ""0"
Wie stelle ich es an, daß ich keine doppelten " bekomme?
Gruß Werner
Gruß Werner
Und das möchtest Du ja vermutlich haben.
hans
das Ergebnis soll "BoxMax" = "0" lauten.
Heraus kommt aber "BoxMax"" = ""0"
Lasse ich Chr(34) weg ergibt es: "BoxMax = 0"
Es ist zum verzweifeln.
Gruß Werner
hans
die MsgBox zeigt es richtig an. Ich schreibe das Ganze jedoch in eine sequentielle Textdatei und dort finde ich die zusätzlichen Apostrophs.
der Code sieht so aus:
Open strFileName For Output As #1
For intCount = 1 To intLine - 1
strParameter = arrCollection(intCount, 1) & _
""" = """ & _
arrCollection(intCount, 2)
MsgBox strParameter ' hier wird der String so angezeigt wie ich ihn will
Write #1, strParameter
Next intCount
Close #1
Und das ist das Ergebnis:
"BoxMax"" = ""0"
die """ zeigen das gleiche Ergebnis wie einmal Chr(34).
Gruß Werner
hans
Gruß Werner.
========================================================================
Wenns um Excel geht, "Hans Herber"