• ベストアンサー

アクセスのマクロ 改行したい

マクロの アクション:メッセージボックス メッセージで、 一行目 二行目 と表示させるにはどうすればいいでしょうか? メッセージに ・一行目vbCrLf二行目 ・一行目"&vbCrLf&二行目 ・"一行目"&vbCrLf&"二行目" としても、そのままの値が表示されるだけでした。 ググったのですが、 http://support.microsoft.com/kb/281670/ja のように、VBAの改行の方法しかヒットしません。 ご回答よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • tsubuyuki
  • ベストアンサー率45% (699/1545)
回答No.1

マクロのデザインビューで、メッセージボックスを選択し、 メッセージの欄で右クリック⇒ズーム。 ダイアログが出たら、メッセージの内容を打ちつつ、 改行したい場所で「Ctrl+Enter」で改行できますよ。 お使いのバージョンがわからなかったので、 手元にあった2003の場合・・ですけど。

WHMHSMUYK
質問者

お礼

ありがとうございました。

その他の回答 (4)

回答No.5

これでも栄養!! MsgBox ("一行目だよ!" & vbNewLine & "次は三行目だよ!!!")

WHMHSMUYK
質問者

お礼

ありがとうございました。

回答No.4

お手本書いとくのでマネするように! MsgBox ("一行目" & vbCrLf & "二行目") ア~ァ、クセィス....

WHMHSMUYK
質問者

お礼

ありがとうございました。

  • tsubuyuki
  • ベストアンサー率45% (699/1545)
回答No.3

忘れてました。 結果です。

WHMHSMUYK
質問者

お礼

ありがとうございました。

  • piroin654
  • ベストアンサー率75% (692/917)
回答No.2

メッセージのところを ="一行目" & Chr(13) & "二行目" のようにしてください。 メッセージに式を設定します。 くわしくはメッセージのところにカーソル を当ててF1を押してヘルプを参照してください。

WHMHSMUYK
質問者

お礼

ありがとうございました。

関連するQ&A

  • テキストボックスに改行を含む値を表示する場合

    テキストファイルより1行ずつ値を改行「chr(13)」でつなげて取得し、それを テキストボックスに表示させたいのですが、そのまま値をテキストボックスの textプロパティに設定すると、改行が「・」で表示され改行されていません。 テキストボックスのプロパティでMultiLineもTrueにしてあるのですが、これは 無理なことなのでしょうか? 一行ずつ取得してテキストボックスに表示する際に改行を設定していくしかない のでしょうか? 詳しい方いらっしゃいましたらご教示ください。 よろしくお願いいたします。

  • 改行できる・できない入力ボックスの違いとは??

    しょしんしゃです。 自サイトの感想フォームの入力ボックスをつくっています。 よくある「一行掲示板」みたいに、 一行のみのゲストブックとして使いたいのですが、 入力ボックス(縦の幅は1行分)の中で改行ができてしまうため、 ちょう長い、改行たっぷりのメッセージがきてしまいます。 1行しか入力できないボックスはどのように記述するのですか? 入力文字数に制限は必要ありませんが、改行させたくありません。 アドバイスください。><

    • ベストアンサー
    • HTML
  • Access VBAからエクセルに出力時の改行コード

    こんにちは。 VBAのローカルテーブルのデータをエクセルに出力するという処理を 作っています。 データには改行コードも含まれており、 エクセルに出力すると、改行が「・」(中点)で表示されてしまい、 困っていろいろ調べてみたら、以下のURLのサイトを見つけて http://support.microsoft.com/kb/822372/ja 解消できた!と思ったのですが、ローカルテーブルでメモ型のフィールドが あるのですが、そのメモ型の項目のデータだけ、改行が「・」で 表示されてしまっています。 メモ型はダメなのでしょうか? 何かご存知の方いらっしゃいましたら宜しくお願いいたします。

  • 改行について

    VBAでコードを作るにおいて 改行が必要な場合、 Sub 改行() MsgBox "1行目" & Chr(10) & "2行目" MsgBox "1行目" & Chr(13) & "2行目" MsgBox "1行目" & Chr(13) + Chr(10) & "2行目" MsgBox "1行目" & vbCr & "2行目" MsgBox "1行目" & vbLf & "2行目" MsgBox "1行目" & vbCrLf & "2行目" MsgBox "1行目" & vbNewLine & "2行目" End Sub どれを使うべきなのでしょうか? 理由も教えてください。

  • EXCELのフォームで改行ができない

     EXCELのフォームで改行したいのですが、次のコードで改行しようとしています。  au = "手伝う" & vbCrLf & "手伝う"  TextBox1 = au でテキストボックスに       手伝う       手伝う と表示されて欲しいのですが改行が文字として表示されてしまい改行されません。何故なのでしょうか?テキストボックスのプロパティの問題でしょうか?    

  • エクセルVBAのテキストボックス改行について

    質問させて頂きます。 今VBAを使っているのですが TextBox内の改行がうまくいきません。 フォーム上にテキストボックスを置いて5~6行表示できる大きさにして、 (テキストボックス内に書いたものを保存ボタンでエクセル内の指定部分に反映させるコードを書き) それをマクロから開いて文字を入力している時に エンター押せば改行できると思っていたのですが出来ません。 CtrlやAlt押しながらもダメでした。 テキストボックスのプロパティ内に行を指定できる何かがあるのでしょうか? 色々いじりすぎて元に戻せなくなりつつあったので 質問させて頂きました。 ご存じの方おられましたら是非教えて下さい。 よろしくお願いします。

  • 「ビルダー」を使って、メッセージボックスの改行をしたいのですが…

    「ホームページビルダーver.6」を 使用しています。 クリックをするとメッセージボックスを出すようにしたくて 「挿入」→「その他」→「スクリプト」で 「メッセージボックスを表示します」を選びました。 そうするとメッセージを書くボックスが出てくるのですが、 書こうとする文章が長いので、途中で改行をしたいのです。 どうすれば一行にズラズラとならず、 入力出来るのでしょうか? お教え願います。

  • 「yes」なら実行させて「no」なら実行させない仕組みをAccessのマクロで作れますか?

    以前にも似たようなご質問をしましたが、回答して頂いた内容が私では解らなかったので再度させて頂きます。 “クエリ”を実行させる前に『「本当に実行しますか?」とメッセージを表示させて、「yes」なら実行させて「no」なら実行させない』という仕組みを「マクロ」で作れないのでしょうか? 私が作成した方法は マクロの 1行目 「アクション」のとこで「メッセージボックス」を選択し、アクションの引数「メッセージ」の箇所に「本当に実行しますか?」と入力。 2行目 「アクション」のとこで「クエリを開く」を選択し、アクションの引数「クエリ名」の箇所に「●●クエリ(任意のクエリ)」と入力。 そして保存します。 そのマクロを実行させても「本当に実行しますか?」のメッセージが出て、「OK」のボタンしか表示されないんです。 (当たり前なのかもしれませんが…) そしてその「OK」をESCキーで回避してもクエリが実行されてしまいます。 (当たり前なのかもしれませんが…) 上記の知識しかありません。どなたか柔らかくご説明して頂けないでしょうか?よろしくお願い致します。

  • Access のMsgBoxで

    MsgBoxについての質問です。 i=100 MsgBox i & vbCrLf & "人目です" と記述すると メッセージボックスで 100 人目です と2行に表示されます。 100人目です と1行に表示するにはどの様に記述しますか?

  • テキストボックス内で改行したいです。

    テキストボックス内で改行したいです。 テーブルのフィールドにあるスラッシュ区切りのデータ を抜き取り一行づつ表示することができたのですが スラッシュ6つ目でテキストボックス内で改行して テキストボックス内で隣に表示させたいのです。 どのようにしたらよいでしょうか? 解る方教えてはいただけないでしょうか? よろしくお願いします。 下記は途中までのコードです。 'スラッシュ区切りで分割 vaspl = Split(Nz(Forms![フォーム名]![テキストボックス名]), "/", -1, vbBinaryCompare) Forms![F_N1]![詳細テキストN1] = "" '分割結果を一行づつ表示する For Each vret In vaspl Forms![フォーム名]![詳細テキストN1] = Forms![フォーム名]![テキストボックス名] & vret & vbCrLf Next

専門家に質問してみよう