• ベストアンサー

エクセルVBAを使って(選択したセル番地をメッセージボックスに表示させる)

いつもお世話様になっております。 メッセージボックスに、選択されているセル番地(例えば、A1:A3)を表示させたいのですが、このコードの書き方が解りません。 どなたかお解りになる方が居られましたら、教えていただきたいと思います。 お手数をおかけいたしますが、よろしくお願いいたします。

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

  • ベストアンサー
  • taknt
  • ベストアンサー率19% (1556/7783)
回答No.1

msgbox Selection.address で どうですか?

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

その他の回答 (1)

回答No.2

Sub アドレス() MsgBox (Selection.Address) End Sub $A$1:$A$3になってしまいますが、ダメですか? 参考になればと思い、「自信なし」ですが回答しました。

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

関連するQ&A

  • 入力したセル番地をメッセージボックスで表示する方法

    Excelでメッセージボックスの使い方についてお聞きします。 下記のコードを実行します。その時、メッセージボックス上に入力したセル番地(A1)、「こんにちは」という語句をそれぞれ表示させるにはどのような方法があるのでしょうか。 宜しくお願いします。 Range("A1").Value = "こんにちは"

  • VBAのメッセージボックスで%表示

    お世話になります。 VBAにて、算出されたある数字をメッセージボックスで %表示したいのですが、エクセルシートであれば、表示させる セルを決め、そのセルの表示形式を「パーセンテージ」にすれば いいのですが、メッセージボックスで表示させたいのです。 可能なのかどうか分かりませんが、ご教示頂きたく宜しく お願い申し上げます。

  • Excel VBAでメッセージとセル選択のループを回避したい

    Excel VBAでメッセージとセル選択のループを回避したい 初歩的な質問ですみません。 セルA1で入力規則のリストから"重要"が選択されたらメッセージボックス「重要です」を表示し、離れた複数セル(D4,F7など10カ所ほど)の枠線を太く、A1が"重要"以外になったら枠線を細くします。複数セルは名前の定義で「重要項目」とし、下のコードで一応できました。 でも、「重要項目」のセルに入力Enterするたびにメッセージが表示されてしまい、「重要項目」が選択されたままです。 メッセージはA1が"重要"になるごとに一度だけ表示し、セル選択は元の位置に戻したいのです。 バージョンはExcel2003です。よろしくお願いします。 -------------------------------------- Private Sub Worksheet_Change(Byval Target As Range) If Range("A1") = "重要" Then MsgBox "重要です" Range("重要項目"). Select Selection. BorderAround Weight = 4 Else If Range("A1") <> "重要" Then Range("重要項目"). Select Selection. BorderAround Weight = 2 End IF End Sub

  • エクセルVBAでセル選択するコードが変

    エクセルのワークシートでVBAでセル選択するコードで理解に苦しむことがあります。 通常、Cells(2, 1)はセル番地で言えばA2セル Cells(4, 1)はセル番地で言えばA4セルです。 しかし、 With .Range("B5:B15")でくくれば  .Cells(2, 1)はセル番地で言えばB6セルだと思います。 .Cells(4, 1) はセル番地で言えばB8セルだと思います。 ところが下記のコードを動かすと、なぜかC10:C12が選択されてしまいます。 この理屈がわかりません。 Sub test02()   With Sheets("Sheet1")     With .Range("B5:B15")       .Range(.Cells(2, 1), .Cells(4, 1)).Select     End With   End With End Sub なお、 .Range(.Cells(2, 1), .Cells(4, 1)).Selectを .Range(“A2:A4”).Selectに書きかえると、希望のB6:B8が選択されます。

  • エクセルのセル番地について。

    いつもお世話になっています。 先程,エクセルを使おうとしたところ、セル番地を指定できるように、アルファベット+数字が振ってあると思うんですが、現在、「行」・「列」ともに数字が表示されています。 修正の仕方が分かる方が居ましたら教えていただけると幸いです。 バージョンは2007です。

  • セルに番地入力すると表示が・・・・   エクセル 

    エクセルで名簿作成しているのですが、番地入力したセルが 勝手に年号日付で 表示されてしまいます。 例えば、(A1セル)市町村を入力     (A2セル)番地を入力  ○○○○-○ すると ○○/○/○の様に           日付表示されるので 困ってます。 いろいろ 表示方法を変えてみたのですが どれもダメでした。 なにか良い方法はないでしょうか? よろしくお願いします。                                             

  • メッセージボックス表示

    VBAでメッセージボックスの表示方法で教えてください。 あるセル、例えばA1に”111”と入力されたらメッセージボックスで ”○○”と出したい場合はどうしたらいいですか。 あと、A1からA3に”111”と入力された場合の複数セルの場合も教えてください。

  • エクセルでセルが変更されたらメッセージボックス表示するマクロ

    あるセル範囲、たとえばA1:B10の範囲に0以外の数字が入力されたらメッセージボックスで 「0以外の数字が入力されました。このまま続けますか?(はい)(いいえ)」 と表示させるマクロを作りたいのですが、どうすれば良いでしょうか。 (いいえ)が選択されたらそのセルへの入力はキャンセルさせたいのですが。 過去ログなどをみてもいまひとつやり方がわからないのでお願いします。

  • エクセルVBA コンボボックスからの選択

    コンボボックスにある選択項目を選択した後、 エクセルの指定されたセルへ選択した項目を 貼り付けたいのですが、どのように指示したら よいのでしょうか? 例えば コンボボックス内の選択項目が A・B・Cとあったとします、その項目の 中からAを選択したら、作業中のsheetの A1のセルへAと表示させるにはどうしたら よいのでしょうか? アドバイスお願い致します。

  • VBAで選択したセル番地を取得する方法はありますか??

    エクセルので複数のセルを選択し、その後マクロを実行し、全てのセル番地を取得したいのですがそのような事は可能なのでしょうか??分かる方がいらっしゃいましたらお願いします。

専門家に質問してみよう