質問編集履歴
2
タイトル修正
title
CHANGED
|
@@ -1,1 +1,1 @@
|
|
|
1
|
-
VBA Range
|
|
1
|
+
VBA Set でRangeを格納したとき、Valueなどもそのまま保持させたい。詳しくは本文
|
body
CHANGED
|
File without changes
|
1
cellsが抜けていたため修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -3,11 +3,11 @@
|
|
|
3
3
|
```VBA
|
|
4
4
|
Dim testRange As Range
|
|
5
5
|
Set testRange = Range("A1:A2")
|
|
6
|
-
Debug.Print(testRange(1,1))
|
|
6
|
+
Debug.Print(testRange.Cells(1,1))
|
|
7
7
|
'ここではもちろん"a"が出力されます。
|
|
8
8
|
|
|
9
9
|
'手でシートのA1のコンテンツを削除します。
|
|
10
|
-
Debug.Print(testRange(1,1))
|
|
10
|
+
Debug.Print(testRange.Cells(1,1))
|
|
11
11
|
'ここでは何も出力されません。
|
|
12
12
|
```
|
|
13
13
|
|