質問編集履歴
2
Code機能を利用
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,5 +1,6 @@
|
|
|
1
1
|
現在業務でVBAを触っています。
|
|
2
2
|
そこで、1点質問です。
|
|
3
|
+
```ここに言語を入力
|
|
3
4
|
Dim itm As Variant
|
|
4
5
|
Dim arr(1 To 2, 1 To 3) As String
|
|
5
6
|
|
|
@@ -14,6 +15,8 @@
|
|
|
14
15
|
MsgBox itm
|
|
15
16
|
Next itm
|
|
16
17
|
|
|
18
|
+
```
|
|
19
|
+
|
|
17
20
|
上記のような多次元配列をループしている際に多次元配列の値がYであればNに、NならばYに変更したい場合どのようにソースを変更すればよいのでしょうか？
|
|
18
21
|
結果としては以下のようにしたいです。。。
|
|
19
22
|
arr(2, 1) = "Y"→arr(2, 1) = "N"
|
1
結果の修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -17,5 +17,5 @@
|
|
|
17
17
|
上記のような多次元配列をループしている際に多次元配列の値がYであればNに、NならばYに変更したい場合どのようにソースを変更すればよいのでしょうか？
|
|
18
18
|
結果としては以下のようにしたいです。。。
|
|
19
19
|
arr(2, 1) = "Y"→arr(2, 1) = "N"
|
|
20
|
-
arr(2, 2) = "Y"→arr(2,
|
|
20
|
+
arr(2, 2) = "Y"→arr(2, 2) = "N"
|
|
21
|
-
arr(2, 3) = "N"→arr(2,
|
|
21
|
+
arr(2, 3) = "N"→arr(2, 3) = "Y"
|