質問編集履歴
1
```vbaの追加いたしました。
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -5,6 +5,10 @@
|
|
|
5
5
|
Sub Test3()内のDim i As Integer以降の動作をWith ThisWorkbook.Worksheets("変換結果")※sheet2で行いたいのですが、Sheet1内で動作が行われてしまいます。With ThisWorkbook.Worksheets("変換結果")〜End Withで囲まれているので反応するかと思ったのですが、この場合どのように記述すればよろしいでしょうか。また、.Columns(6).Delete〜の作業は、ThisWorkbook.Worksheets("変換結果")※sheet2で行われます。
|
|
6
6
|
|
|
7
7
|
初心者ですので、なるべく簡単なプログラムにしていただけると幸いです。よろしくお願いいたします。
|
|
8
|
+
|
|
9
|
+
|
|
10
|
+
|
|
11
|
+
```vba
|
|
8
12
|
|
|
9
13
|
|
|
10
14
|
|
|
@@ -57,3 +61,7 @@
|
|
|
57
61
|
|
|
58
62
|
|
|
59
63
|
End Sub
|
|
64
|
+
|
|
65
|
+
|
|
66
|
+
|
|
67
|
+
```
|