strText = RecSet("text")
If InStr(strText, ",") > 0 Then strText = Replace(strText, ",", vbCrLf)
Frågan#1
jag har en Replace funktion som fungerar
varje gång "," finns så byter den ut den till radavbrytning
[kod]
text= Replace(RecSet("text"),",",vbCrLf)
[kod]
problemet är om det inte finns någon ,
jag behöver en if sats
tex
[kod]
if RecSet("text") = "," then
text= Replace(RecSet("text"),",",vbCrLf)
else
text= RecSet("text")
end if
[kod]
