質問編集履歴

1

コードの修正。不足部分の追記。

2023/02/14 08:29

投稿

koburon
koburon

スコア30

test CHANGED
File without changes
test CHANGED
@@ -2,7 +2,7 @@
2
2
  VBAで任意の日の社員名簿を出力するマクロを作っています。
3
3
 
4
4
  ### 該当のソースコード
5
- 名簿を出力するコードのうち、社員が異動する年月日をインプットボックスで入力し、Sheet1のB2に書き込む部分を示しています。
5
+ 名簿を出力するコードのうち、社員が異動する年月日をインプットボックスで入力し、Sheet1のA2に書き込む部分を示しています。
6
6
  ```VBA
7
7
  Sub idou()
8
8
  '異動者リストを作成する
@@ -36,7 +36,8 @@
36
36
  End If
37
37
  Loop
38
38
 
39
-  MsgBox d
39
+  Range("A2").Value = d
40
+
40
41
  End Sub
41
42
  ```
42
43
  ### 実現したいこと