• 締切済み

VBAで“ダブルクォート”の表示

メッセージボックスに、 “ダブルクォート” と表示させる方法がわかりません。 MsgBox("“ダブルクォート”") ←エラー MsgBox("““ダブルクォート””") ←半角の「"」に置き換わる などで上手くいかず、手詰まりになっています。 ・VBA中で記述できないので、ファイルから取得する。 ・CHR()の文字コードで指定 など、試してみる項目はありますが、もっと簡単には出来ないものでしょうか? Word2003, VBA6.0? の環境です。

みんなの回答

回答No.4

「ダブルクォート」は変数に代入するとか、メッセージボックスの詳細は省いていますが MsgBox Chr$(34) + "ダブルクォート" + Chr$(34) なんかどうでしょうか?

全文を見る
すると、全ての回答が全文表示されます。
  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.3

Sub test01() s = " ’ABC’ " MsgBox Mid(s, 2, 5) MsgBox """" & "ABC" & """" End Sub をやって見てください。 前後に全角スペースを入れてます。’も全角。 半角クオート+全角スペース+全角ダブルクオート+全角ABC+全角ダブルクオート+全角スペース+半角クオートです。

全文を見る
すると、全ての回答が全文表示されます。
noname#118114
noname#118114
回答No.2

VBでは自動変換というプログラム上迷惑な機能があるため、 CHR()関数を使うしかないです。

全文を見る
すると、全ての回答が全文表示されます。
  • BLUEPIXY
  • ベストアンサー率50% (3003/5914)
回答No.1

ホント余計なことですね。 直接は書けないので msg = StrConv("""ダブルクオート""", vbWide) MsgBox (msg) みたいな感じではだめでしょうか? ダブルクォートが逆さまにならないですけど。 どうしてもと言う場合にはやはり、 msg = ChrW(&H201C) & "ダブルクオート" & ChrW(&H201D) のようにしないとしょうがないような気がします

neKo_deux
質問者

お礼

> msg = ChrW(&H201C) & "ダブルクオート" & ChrW(&H201D) ChrW関数は知りませんでした。 Chr(&H20) & Chr(&H1C) のようにしなきゃならない?と思っていましたので、文字コードもわかりましたし、これだけでもかなり助かります。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • parse_ini_fileでダブルクォートを含む値

    parse_ini_fileで読取る設定ファイルでは、 ダブルクォートを含む値を用いることはできないのでしょうか。 ダブルクォートを含んだ値を記述したかったのですが、 設定ファイルのパースエラーになるか、途中で値が切れてしまいました。 以下を試しました。 (PHP 5.0.4 です。) <テストコード> <?php print_r(parse_ini_file("test.ini")); ?> <設定ファイル test.ini の内容> (ダブルクォートを含む) key=val"ue --> 値がvalになる (ダブルクォートをエスケープ) key=val\"ue -->値がval\になる (全体をダブルクォートで囲んで中のダブルクォートをエスケープ) key="val\"ue" -->値がval\になる (全体をダブルクォートで囲んで中のダブルクォートを二連化) key="val""ue" -->パースエラーが発生し、値がvalになる (全体をシングルクォートで囲む) key='val"ue' -->値が'valになる マニュアルで以下の文が気になったのですが・・。 ( http://jp.php.net/manual/ja/function.parse-ini-file.php ) ----- 引用 ここから ----- 次の文字 {}|&~![()" は、キーで使ってはいけません。 また、値の中で特別な意味を持ちます。 ----- 引用 ここまで ----- ダブルクォートが「値の中で特別な意味」を持つ文字として 指定されていますが、具体的にどのような意味を持つのか分かりませんでした。 ですが、キーとしては禁止されているものの、値に含まれる文字としては禁止されていないようだったので・・。 どなたか詳しい情報ご存知の方いましたらご教授ください。

    • ベストアンサー
    • PHP
  • ワード2000のVBAについて

    ワード2000を使っています。 VBAで、ダイアログボックスを開き、指定したファイルのファイル名をフルパスで取得したいのですが、下記のコードでは、ファイル名しか取得できません。 どのようにしたら、フルパスを取得できるのでしょうか? たびたびすみませんが、誰か教えてください。 Dim Name With Dialogs(wdDialogFileOpen) If .Display = -1 Then Name = .Name End If End With MsgBox ("ファイル名は" & Name & "です。")

  • エクセルVBAでメッセージを表示する

    エクセルVBAでメッセージを表示する時は、 Msgbox "表示する内容" と記述しますが、これだと[OK]をクリックするまで エクセル本体が全く操作できなくなってしまいます。 メッセージボックスを表示させた状態で、エクセルを操作できるようにすることは 出来ますでしょうか?

  • セルが何行なのかをVBAで取得したい

    セルが何行なのかをVBAで取得したいのですが どういうコードにすればいいですか? 例えば、A1セルに a b c と入ってる場合、3行ですが それをVBAで取得するにはどうすればいいですか? Sub test() Dim r As Range Set r = Cells(1, 1) If r.Value Like "*" & Chr(10) & "*" Then MsgBox "改行があります" End If End Sub というコードで改行が有ることは取得できたのですが 何行かまでは取得する方法がわかりません。

  • Access2000VBAで前に記述したコードが終わる前に次に進みます・・・

    フォームを開いた後、Msgboxを表示させたくて、Access2000VBAのOpenイベント又はLoadイベントに、Msgboxを記述しました。 ところが、フォームが開く前にMsgboxが表示されてしまします。フォームが開いた後Msgboxを表示させるためにはどうしたらよいのですか? また、ADOで接続したテーブルの数値型フィールドの合計値を計算して、計算結果をテキストボックスに代入するコードを記述した後、このテキストボックスの値をMsgboxに表示させるコードを記述たところ、計算を終える前にMsgboxが表示されてしまいます。 前のコードが確実に実行された後、次のコードの処理に進む様にするにはどうすればよいのですか?

  • エクセル(VBA)でファイル出力時

    エクセル(VBA)でテキストファイル出力時 リターンコードはどうやって記述するのでしょうか? chr(9)はタブ chr(10)はラインフィード chr(13)はキャリッジリターン らしいんですがリターンコードはなんでしょうか? 宜しくお願いします

  • MS-Wordで半角ダブルクォーテーションの入力する方法

    MSワードで、半角ダブルクォーテーション「" "」を入力しても、自動で全角ダブルクォーテーション「“ ”」に変換されてしまいます。半角ダブルクォーテーションの入力方法を教えてください。 ワードで開いて見たり印刷して見る分には、半角でも全角でも違いがありませんが、プログラミングのサンプル・コードを記述しているため、ダブルクォーテーションを含むコードをコピペするとダブルクォーテーションを1個1個半角に変換してもらわないけいけないので、困っています。 こちらの環境は、日本語版Vistaで英語版MS-Word2003を使用しています。日本語のWordの設定方法や、別のバージョンの設定方法などでも構いませんので、やり方が分かる方いましたら教えてください。よろしくお願いします。

  • ワードVBAで画像を挿入

    ワードVBAのことですが、文書の中に図形のボックスが何個か並んでいます(2列で)。それぞれのボックスの中に、同じ画像をボタン1発で挿入するということを簡単なVBAで実現できるものでしょうか。 #同じ画像を全部のボックスに挿入したい。 #ワードのVBAの経験なしです。 #できるとしたら何行くらいの記述でできるものかという難易度も知りたい。 #とても簡単なサンプルコードも教えていただけると尚ありがたいです。

  • エクセルVBAにて

    エクセルのVBAでMsgbox関数を使用して Msgbox("計算が終わりました")というように記述 したのですが、マクロを実行してもメッセージが 表示されません。 どなたか教えてください。 よろしくお願いします。

  • テキストボックスの初期値について

    テキストボックスに初期値を入れたいときは <input name="text1" type="text" value="初期値"> というように、valueで指定すると思うのですが、 初期値に【"】半角のダブルクオートを含めたい場合は どのように記述するのですか? <input name="text1" type="text" value=""初期値""> のように記述すると空白が表示されてしまいます。 よろしくお願いします。

    • ベストアンサー
    • HTML

専門家に質問してみよう