Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13594 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【4691】教えて下さい 田村　尚規 03/4/3(木) 10:41 質問
【4698】Re:教えて下さい ｂｙｋｉｎ 03/4/3(木) 12:46 回答
【4701】Re:教えて下さい Jaka 03/4/3(木) 13:06 回答
【4702】すみません。 Jaka 03/4/3(木) 13:08 発言
【4715】Re:教えて下さい 田村　尚規 03/4/3(木) 15:44 お礼
【4691】教えて下さい
質問  田村　尚規 E-MAIL  - 03/4/3(木) 10:41 -
引用なし
パスワード
   初めて投稿します田村と言います。
ＶＢＡで判らない事がありまして、皆様にお助けしていただきたい。
ダブルクォテーション（”）の表示ですが、ＶＢＡ画面のイミディエイトと
ファイルに出力された内容が違っています。これを解決するには同様に定義すればよいのでしょうか？

プログラム中で以下のように定義していた場合
　　Open f_name For Output As #1
　　data = "---" & sheet_nm & "---" & Chr(10)
　　data = data & "CREATE TABLE """ & tbl_nm & """(" & Chr(10
　　　　　：
　　Write #1, data

イミディエイトでの表示
?data
「---問合せ情報---
CREATE TABLE "inquiry_recep"(」

表示されていますが
そのｄａｔａをファイルに出力すると以下のように出力されています
「"---問合せ情報---
CREATE TABLE ""inquiry_recep""(」
という具合に、ダブルクォテーション（”）を表示させたところに勝手に「”」が付加されて、出力されています。
どのようにすれば、表示した内容を出力することができますか？
教えて下さい。
【4698】Re:教えて下さい
回答  ｂｙｋｉｎ  - 03/4/3(木) 12:46 -
引用なし
パスワード
   こんにちわ。

Write #1, data
↓
Print #1, data

って変更すればええんとちゃいまっか？

↓Write # ステートメントのヘルプより
-------------------------------------------------------------------------
Write # ステートメントは、Print # ステートメントと異なり、
ファイルにデータを書き込むときにデータ項目の間にカンマ (,) を挿入します。
文字列は、ダブル クォーテーション ("") で囲んで出力します。
-------------------------------------------------------------------------

試してみてな。
ほな。
【4701】Re:教えて下さい
回答  Jaka  - 03/4/3(木) 13:06 -
引用なし
パスワード
   こんにちは、
どの様に出力したいのかわかりませんが．．．。
この違いのことかな？

Write #1, data
Print #1, data
【4702】すみません。
発言  Jaka  - 03/4/3(木) 13:08 -
引用なし
パスワード
   すみません。
すでにレスが付いているのにが付きませんでした。
【4715】Re:教えて下さい
お礼  田村　尚規 E-MAIL  - 03/4/3(木) 15:44 -
引用なし
パスワード
   皆さんのご協力ありがとうございました。
回答を元に実行したところ期待通りの結果を得る事ができました。
回答を寄せてくれました皆様に心より感謝いたします。
ありがとうございました。

▼田村　尚規 さん：
>初めて投稿します田村と言います。
>ＶＢＡで判らない事がありまして、皆様にお助けしていただきたい。
>ダブルクォテーション（”）の表示ですが、ＶＢＡ画面のイミディエイトと
>ファイルに出力された内容が違っています。これを解決するには同様に定義すればよいのでしょうか？
>
>プログラム中で以下のように定義していた場合
>　　Open f_name For Output As #1
>　　data = "---" & sheet_nm & "---" & Chr(10)
>　　data = data & "CREATE TABLE """ & tbl_nm & """(" & Chr(10
>　　　　　：
>　　Write #1, data
>
>イミディエイトでの表示
>?data
>「---問合せ情報---
>CREATE TABLE "inquiry_recep"(」
>
>表示されていますが
>そのｄａｔａをファイルに出力すると以下のように出力されています
>「"---問合せ情報---
>CREATE TABLE ""inquiry_recep""(」
>という具合に、ダブルクォテーション（”）を表示させたところに勝手に「”」が付加されて、出力されています。
>どのようにすれば、表示した内容を出力することができますか？
>教えて下さい。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13594 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free