回答編集履歴

2

参考リンクの追加

2019/06/18 07:35

投稿

hatena19
hatena19

スコア33715

test CHANGED
@@ -41,3 +41,9 @@
41
41
  Debug.Print Sito1.OLEObjects(CName).Object.value
42
42
 
43
43
  ```
44
+
45
+ OLEObjectsについては下記のリンクを参照してください。
46
+
47
+
48
+
49
+ [OLEObjects オブジェクト (Excel) | Microsoft Docs](https://docs.microsoft.com/ja-jp/office/vba/api/excel.oleobjects)

1

コード修正

2019/06/18 07:35

投稿

hatena19
hatena19

スコア33715

test CHANGED
@@ -10,7 +10,7 @@
10
10
 
11
11
 
12
12
 
13
- Debug.Print Sito1.TextBox1.value
13
+ Debug.Print Sito1.OLEObjects("TextBox1").Object.Value
14
14
 
15
15
  ```
16
16