• ベストアンサー

ExcelのCellのAddress

Win2k Excel2k ExcelシートのあるActiveCellのアドレスをR1C1参照形式で取得したいのですが、できますでしょうか? この時、「R1C1参照形式を使用する」のチェック状況にかかわらずです。

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

  • ベストアンサー
  • taocat
  • ベストアンサー率61% (191/310)
回答No.1

こんにちは。 次のようなことですか? -------------------------------------------- Sub Test()  Dim Adrs  Adrs = ActiveCell.Address(ReferenceStyle:=xlR1C1)  MsgBox Adrs End Sub --------------------------------------------- 勘違いでしたらご容赦願います。 以上です。

INOPII
質問者

お礼

OK!!ばっちりです。 あれから色々しらべて、 .Column .Row メソッドで値を取得して 文字列を&でつなげてました。 これでマクロモジュールがすっきりします。 ありがとうございました。

関連するQ&A

  • エクセル cell

    エクセルのvbaについて 以下ようなコードを書く場合がありますが、 Range("D5").Select Cells(5, 4).Select 今、選択している列の値(上の例だと4)を、知りたい場合どのようにすれば良いのでしょうか? いちいち、R1C1形式に変えないとダメなのでしょうか? A~Zぐらいであれば、数えることはできますが、それ以降は、参照表など見る手間もあります。 Y5は、cellだと〇〇という感じで、すぐに知る方法はないでしょうか? お手数ですが、よろしくお願いします。 エクセル2007以上

  • エクセルのマクロの作り方

    マクロ初心者です。 今勉強している最中ですが、以下の物を作りました。 Sub Macro1() ' ' Macro1 Macro ' ' Sheets("Sheet2").Select Range("A4").Select ActiveCell.Formula = "=Sheet1!IM4" ActiveCell.Offset(3, 0).Select ActiveCell.FormulaR1C1 = "=Sheet1!R[-3]C[240]" ActiveCell.Offset(3, 0).Select ActiveCell.FormulaR1C1 = "=sheet1!r[-6]c[234]" ActiveCell.Offset(3, 0).Select ActiveCell.FormulaR1C1 = "=sheet1!r[-9]c[228]" End Sub わかる人はもうお分かりかもしれませんが、ループという機能でもっと簡単にできるように思います。 これを手打ちしていくのであれば、手間がかかってしまい、マクロの意味がないというか… [-3]→[-6]→[-9]と、縦に参照したいセルが3つずつ上がっていき、横には左に6ずつ移動していきます。正確にはアクティブセルが移動しているのでってことなのでしょうけど…(たぶん…) 最初が絶対参照になっていて2回目以降から相対参照になっているのは、1回目で絶対参照にすれば、そのセルを基準として相対参照でRC[-6]でループさせられるかなっと思ったからです。。。結局そうなりませんでしたが… 作りたいのは、sheet2のA4とsheet1のIM4、sheet2のA7とsheet1のIG4をイコールにし、それを間隔は同じでsheet2のA127まで繰り返したものです。 本を買って、ネットで検索して色々とやったのですが、どうにもわからなく。。。 どうかよろしくお願いします。

  • とほほのエクセルマクロ

    以下の文の[-1899]の部分を可変型にしたいのですが。 どなたかご存知有りませんか? ActiveCell.FormulaR1C1 = "=COUNTIF(R[-1899]C:R[-1]C,""いっしょだよ"")" ==================================== マクロの説明です。 ==================================== エクセルマクロでsheet1にデータを入力していって、 sheet1のD列内に同一のコードがないかをチェックするために sheet1のコピーを作成してD列でソートしてから D列の1行目=2行目ならK列に”いっしょだよ”という メッセージを出すようにIF文を書きこんでいきます。 最後にこの”いっしょだよ”というメッセージが何件あったかを見たいので、 一番下の行+1行目に ActiveCell.FormulaR1C1 = "=COUNTIF(R[-1899]C:R[-1]C,""いっしょだよ"")" という文を入れたのですがこれだと自分が居る一つ上のセルから 1899上までしか行かないのですが、毎回データを入力して行数は増えていってしまいます。 どのような、文にしたらよいのか教えてください。 お願いいたします。

  • Excelの列番号表示について

    Excelの列番号が、ABCでなく、123と数字になります。 ツールーオプション-全般で「R1C1参照形式を使用する」のチェックが付いているので、オフにしても、またExcelを起動すると元に戻っています。何が原因でしょうか。

  • エクセル 作業グループでの数式入力が上手くいきません

    エクセル2002を使用して売上計画&前年実績の表を作成しています。 各商品別にSheet1からSheet3まであり、それぞれに異なる数字が入っていますが、表のフォーマットはまったく同じです。 3つのシートとも、同じ場所に計算式が入るため、作業グループにして入力していますが、数式入力がうまくいきません。 Sheet1に「+$DL$92*BH93」と入力すると、Sheet2とSheet3には「+R92C116*R[1]C[-1]」と入力されてしまい、計算されないのです。 相対参照ではこのような現象は起きず、絶対参照を指定したときにだけこうなります。 各商品群ごとに同じフォーマットの大きな表が有り、Sheet1の数式をひとつひとつコピーしていては仕事になりません。 ちなみにツール-オプション-全般にある、「R1C1参照形式を使用する」のボックスにチェックは入っていません。 これを回避して、一度に計算式を入力できるようにするにはどうすればよいのでしょうか? ネットでも検索してみましたが全然該当するものにヒットしません。 どなたかよろしくお願いします!

  • Excel VBA マクロ処理 リンク先参照変更方法

    Excel VBA マクロ処理 リンク先参照変更方法で質問です。 データがあるsheet名を『データ』、 平均を集計するsheet名を『平均集計』とします。 行いたい処理は 『データ』にある【 】内の5コのデータの平均値をまとめたい。 『平均集計』に平均値を集計してまとめる。 5コデータの平均値を既に参照指定済のsheetを使用します。 ***『データ』詳細********** 縦軸【1×5】×25項目 = 130行 横軸に13列 A~M列 ************************** ■教えて欲しい処理部分はここ! 『平均集計』リンク参照先を一気に変更させたい。 ActiveCell.FormulaR1C1 = "=AVERAGE('リンク参照'!R[★]C:R[★]C)" ↑上記のリンク参照先を一気に変更させる方法はありますでしょうか? 例> ActiveCell.FormulaR1C1 = "=AVERAGE('リンク参照先変更'!R[★]C:R[★]C)" のように…。 あと補足で、教えて欲しいのですが… ★データが追加された場合 例>5 → 7 この時行う処理方法がよくわかりません…。 単発だと ActiveCell.FormulaR1C1 = "=AVERAGE('リンク参照先変更'!R[1]C:R[7]C)" で可能ですが… ↓ 複数になると…  x=1 y=7 FOR i=1 to 25 ActiveCell.FormulaR1C1 = "=AVERAGE('リンク参照先変更'!R[x]C:R[y]C)" x=y+1 y=y*(i+1) NEXT …エラーになりました。 追加処理の場合、どのような方法がありますでしょうか? 以上、アドバイスよろしくお願い致しますm(__)m

  • エクセルのセル表示をRC番地形式にするには?

    Windows7でエクセルのセル番地の表示が相対形式(例:-CR[3]+CR[5])になっています。 これをR1C3のような絶対番地形式で表示させるにはどうすればいいですか? Windows XPでは、「ツール>オプション>全般>R1C1 参照形式を使用する」のチェック有無で参照形式が切り替わったと思いますが、Vistaや7では、「ツール」がありません… 初歩的な質問ですがよろしくお願いします。

  • エクセルの列番号の表示(R1C1→A1)

    エクセル2000を使っています。 列の表示形式がABCではなく123と数字で表示されてしまいます。 過去のレスを見て、メニューバーの「ツール」→「オプション」→「全般」→設定の「R1C1参照形式を使用する」のチェックをはずしたのですが、またファイルを開くとR1C1形式に戻ってしまっています。 どうすれば解決できますか? 初心者の私でも分かるように教えていただけないでしょうか? どうぞよろしくお願いします。

  • エクセルの行、列が数字のみで表示される。アルファベット表示に変えたい。

    officeボタン→excelのオプション→数式→R1C1参照形式を使用するのチェックを外しOKクリックすると名前の重複→変更前 A1 変更後 ? と出てきますが変更後に何と記入すればよいか教えて下さい。因みにsheetは6sheet作成済みで、すべて行、列とも数字のみです。アルファベットの表示にしたいのですが、よろしくお願いします。ecxel2007です。

  • R1C1参照形式から抜け出したい

    会社で転勤になり、新職場のExcel2000を操作したところ、R1C1参照形式になっており、自分としては使いづらいので、A1形式をずっと表示させておきたいと思っています。R1C1参照形式は全く使う気がありません。 しかし、ツール-オプション-全般タブで R1C1 参照形式を使用するのチェックをはずしてOK して再起動しても、エクセルを開くとまた R1C1参照形式に戻っています。 新規のファイルをつくっても、R1C1形式になっています。A1形式にして保存し、ファイルをもう一度開くとR1C1形式に戻ってしまいます。 永久にA1形式で表示する方法を知っている方が いらっしゃれば教えてください。

専門家に質問してみよう