質問編集履歴
2
画像を挿入。
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -13,6 +13,7 @@
|
|
|
13
13
|
以下の流れをくむマクロを作りたいです。
|
|
14
14
|
①ボタンをクリックするとフォームが開く
|
|
15
15
|
②異動した年月日を入力し、OKをクリックする
|
|
16
|
+
|
|
16
17
|
③【異動DB】で「A列は"2"」「B列は”入力した年月日”」でオートフィルタ
|
|
17
18
|
④絞り込まれたD列（社員番号）の結果をコピー
|
|
18
19
|
⑤【異動者リスト】のA列にペーストする
|
1
見出しを修正。
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -91,10 +91,10 @@
|
|
|
91
91
|
### 発生している問題・エラーメッセージ
|
|
92
92
|
上のコードを実行すると、下画像のように【異動DB】の見出しごとペーストされてしまいました。
|
|
93
93
|
|
|
94
|
-
###試したこと
|
|
94
|
+
### 試したこと
|
|
95
95
|
58行目までのオートフィルタは問題なく動作しています。
|
|
96
96
|
CurrentRegionプロパティを使用すると、「**ひとかたまりのセル範囲全部**」を指定してしまうのがコピー失敗の原因と考えています。
|
|
97
|
-
下記の参考URLでは「**コピー元のセル範囲を、アドレスで決め打ちする方法は無い**」とい
|
|
97
|
+
下記の参考URLでは「**コピー元のセル範囲を、アドレスで決め打ちする方法は無い**」と記載されていたのですが、何か別のアプローチで、**「社員番号」の1列分のみ**コピー&ペーストする方法をご教示いただければと思います。よろしくお願いいたします。
|
|
98
98
|
|
|
99
99
|
### 補足情報（FW/ツールのバージョンなど）
|
|
100
100
|
PC：Windows11
|