解決済みの質問

質問No.392043
暇なときにでも
暇なときにでも
お気に入り投稿に追加する (0人が追加しました)
回答数2
閲覧数7188
Range("A1")⇔cells(1,1)の変換。
EXCELのマクロについて質問します。
Range("A1")⇒(1,1)
cells(1,1)⇒("A1")
に一発変換する方法を教えて下さい。
時間があるかた宜しくお願いします。
投稿日時 - 2002-10-29 00:49:43

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

回答No.1
こんなのでよろしいでしょうか?
range("A1") → Range("A1").Row & "," & Range("A1").Column
cells(1,1) → Cells(1, 1).Address(False, False)
()や""は付けていません
投稿日時 - 2002-10-29 01:05:00
この回答を支持する
(現在0人が支持しています)
この質問は役に立ちましたか?
10人が「このQ&Aが役に立った」と投票しています

ベストアンサー以外の回答 (1)

回答No.2
使い道がはっきり伝わらないのですが、下記Msgboxの辺り
を参考にしてください。Selectのところを適当に変えて
下さい。実際の場面では、Range("a1")もCells(1,1)も
同じように使えるので、変換する必要がある場面が想像できません。
Sub test01()
Worksheets("sheet1").Activate
'---------
Range("a1").Select
r = Selection.Row
c = Selection.Column
Range("b1") = Cells(r, c)
MsgBox "cells(" & c & "," & c & ")"
'---------
Cells(1, 1).Select
MsgBox ActiveCell.AddressLocal
r = Selection.Row
c = Selection.Column
MsgBox Chr(c + 64) & r
End Sub
投稿日時 - 2002-10-29 08:17:15
この回答を支持する
(現在0人が支持しています)
別のキーワードで再検索する
もっと聞いてみる

関連するQ&A

回答募集中

この他の関連するQ&Aをキーワードで探す

別のキーワードで再検索する
-PR-

OKWaveのおすすめ情報

特集

同じカテゴリの人気Q&Aランキング

-PR-

ピックアップ

ノウハウ共有サイト

-PR-
-PR-