回答編集履歴

4

説明追記

2020/10/12 12:44

投稿

hatena19
hatena19

スコア33742

test CHANGED
@@ -38,6 +38,18 @@
38
38
 
39
39
  で自身のアドレスを表示できます。
40
40
 
41
+ ```vba
42
+
43
+ Function GetAddr()
44
+
45
+ GetAddr = Application.ThisCell.Address(False, False, xlA1)
46
+
47
+ End Function
48
+
49
+ ```
50
+
51
+
52
+
41
53
 
42
54
 
43
55
  実際に何をしたいのか明示すべきでしょう。

3

説明の改善

2020/10/12 12:44

投稿

hatena19
hatena19

スコア33742

test CHANGED
@@ -32,10 +32,6 @@
32
32
 
33
33
 
34
34
 
35
- 実際に何をしたいのか明示すべきでしょう。
36
-
37
-
38
-
39
35
  上記のリンク先の関数を使えば、
40
36
 
41
37
  `=GetAddr()`
@@ -44,8 +40,14 @@
44
40
 
45
41
 
46
42
 
43
+ 実際に何をしたいのか明示すべきでしょう。
44
+
45
+
46
+
47
47
  [Excel のユーザー定義関数の制限について](https://support.microsoft.com/ja-jp/help/170787/description-of-limitations-of-custom-functions-in-excel)
48
48
 
49
49
 
50
50
 
51
51
  上記の宣言が理解できているなら、自身のセルを取得しても、できることには限界があります。
52
+
53
+ 質問のコードを自身のセルに変更したら循環参照エラーです。

2

説明追記

2020/10/12 11:22

投稿

hatena19
hatena19

スコア33742

test CHANGED
@@ -33,3 +33,19 @@
33
33
 
34
34
 
35
35
  実際に何をしたいのか明示すべきでしょう。
36
+
37
+
38
+
39
+ 上記のリンク先の関数を使えば、
40
+
41
+ `=GetAddr()`
42
+
43
+ で自身のアドレスを表示できます。
44
+
45
+
46
+
47
+ [Excel のユーザー定義関数の制限について](https://support.microsoft.com/ja-jp/help/170787/description-of-limitations-of-custom-functions-in-excel)
48
+
49
+
50
+
51
+ 上記の宣言が理解できているなら、自身のセルを取得しても、できることには限界があります。

1

説明追記

2020/10/12 11:12

投稿

hatena19
hatena19

スコア33742

test CHANGED
@@ -10,4 +10,26 @@
10
10
 
11
11
 
12
12
 
13
- 何をしたいのかを提示した方かいいかも
13
+ 何をしたいのかを提示した方かいいでしょう
14
+
15
+
16
+
17
+
18
+
19
+ ---
20
+
21
+ 自身のアドレスを表示するだけなら、セルに下記のように設定すればいいだけ。
22
+
23
+ `=ADDRESS(ROW(),COLUMN())`
24
+
25
+
26
+
27
+ それをわさわざ、
28
+
29
+ `=userfunction(ADDRESS(ROW(),COLUMN()))`
30
+
31
+ と複雑にすることに何の意味があるのか?
32
+
33
+
34
+
35
+ 実際に何をしたいのか明示すべきでしょう。