質問編集履歴
1
修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -6,13 +6,16 @@
|
|
|
6
6
|
オプション１はどのように書けば良いのかが分かりません。
|
|
7
7
|
|
|
8
8
|
下記など試しましたが、下記では反応しませんでした。
|
|
9
|
-
|
|
10
9
|
```
|
|
11
10
|
MsgBox OptionBoxes("OptionButton 1").Characters.Text
|
|
12
11
|
ActiveSheet.OptionButtons("Option Button 1").Value
|
|
13
12
|
```
|
|
14
|
-
「下記を記載した場合は、SubまたはFunctionが定義されていません。」とエラーが出ます。
|
|
15
13
|
|
|
14
|
+
|
|
15
|
+
|
|
16
|
+
下記のような分岐のVBAも作成したのですが、
|
|
17
|
+
「SubまたはFunctionが定義されていません。」とエラーが出ます。
|
|
18
|
+
|
|
16
19
|
ご教授頂けますと幸いです。
|
|
17
20
|
```
|
|
18
21
|
If ActiveSheet.OptionButtons("Option Button 1").Value = xlOn Then
|