投稿日 | : 2004/08/25(Wed) 13:33 |
投稿者 | : LESIA |
Eメール | : |
URL | : |
タイトル | : Re^3: CSV出力について |
> すいません。説明不足でした。
> 変数AとBにダブルコーテーションまたはLFコードが含まれる場合にのみ、項目をダブルコーテーションでくくり
> たいのですが。
> A = "AAA"
> B = 5
> C = "BB""CC"
>
> Write #1, A, B, C
>
> 求める出力結果
> AAA , 5 , "BB""CC"
If (InStr(A, """") > 0) Or (InStr(A, vbLf) > 0) Then
A = """" & A & """"
End If
If (InStr(B, """") > 0) Or (InStr(B, vbLf) > 0) Then
B = """" & B & """"
End If
If (InStr(C, """") > 0) Or (InStr(C, vbLf) > 0) Then
C = """" & C & """"
End If
Print #1, A, B, C