No.2ベストアンサー
- 回答日時:
Rangeオブジェクトの Valueプロパティでデータを取得して
貼り付け先のValueプロパティへ代入すれば可能ですよ
' データを受け取る Variant型の変数を用意
Dim Da as Variant
da = CopyArea.Value
PasteArea.Resize( CopyArea.Rows.Count, CopyArea.Columns.Count).Value = Da
といった具合にすれば『値の貼り付け』が可能ですよ
不可視の領域もコピーされます
No.1
- 回答日時:
マクロの記録をやって見ましたか。
ここに質問する前には、ぜひやってみて出来ないで来たをはっきりさせること。マクロの記録を見れば自分でやれるでしょう。質問点も整理限定されるし。このままでは回答者に丸投げの感アリ。
>任意のブックを開き、任意のシートを選び任意の範囲をコピーして
この部分をどう操作者に指定されるのか、最適な方法を決めるのは、経験が要るが、INPUTBOXと
Application.InputboxのType:=8で範囲指定させては。
>フィルタがかかっているのですが、
フィルタにかかっていて見えない行も、コピー張り付け操作ではコピー(張り付け)されるはず。
>元のアクティブなブックに貼り付ける
この張り付け始点はどうする?
この回答への補足
失礼しました。
セルJ1にファイル名を入れ
Workbooks.Open Filename:= _
"C:\ & Range("J1").Value & ".xls"
でファイルを開き、
Dim CopyArea As Range
Dim PasteArea As Range
Set CopyArea = Application.InputBox(prompt:= _
"コピー元を指定して下さい", Title:="コピー元", Type:=8)
Set PasteArea = Application.InputBox(prompt:= _
"貼り付け先を指定して下さい", Title:="貼り付け先", Type:=8)
CopyArea.Copy PasteArea
上のようにコピーしたいのですが、この方法だとブックを選べません。
また、フィルタがかかっているものをコピーしてそのまま貼り付けると
可視セルしか貼り付けられません。
また、ただの貼り付けではなく、値貼り付けにしたいのですが、
どのように、PasteSpecial Paste:=xlPasteValuesを入力すればよいか
わかりません。
よろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/05/24 08:33
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/04 17:58
- Excel(エクセル) 【マクロ】同じフォルダ内にある複数ブックから1つのブック内の1シートにデータを集めたい 6 2022/09/28 18:16
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Excel(エクセル) エクセルのマクロについて教えてください。 3 2023/02/07 14:47
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/01/26 09:50
- Visual Basic(VBA) 【困っています2】VBA 追加処理の記述を教えてください。 2 2022/08/26 11:42
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Excel(エクセル) エクセルシートのデータを1列飛ばしで別ブックのシートに貼り付けるマクロが知りたい 2 2023/06/05 22:37
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA シートをコピーする際に Co...
-
エクセルVBAが途中で止まります
-
【前回の続き続きです、ご教示...
-
エクセルのマクロについて教え...
-
VBA 別ブックからコピペしたい...
-
ExcelのVBAです。フォルダ内の...
-
【前回の続きです、ご教示くだ...
-
VBS Bookを閉じるコード
-
エクセルのマクロについて教え...
-
ADOで複数のBookから抽出
-
【Excel VBA】書き込み先ブック...
-
【マクロ】違うフォルダにある...
-
Excel VBA 保存時にフォルダを...
-
ユーザーフォームの切り替えに...
-
別ブックをダイアログボックス...
-
フォルダ内の全てのファイルに...
-
Excelマクロ 該当する値の行番...
-
【ExcelVBA】インデックスが有...
-
マクロVBA別Excelブックにデー...
-
エクセルマクロで、他ブックか...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートをコピーする際に Co...
-
エクセルVBAが途中で止まります
-
別ブックをダイアログボックス...
-
ワイルドカード「*」を使うとう...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
VBS Bookを閉じるコード
-
【ExcelVBA】インデックスが有...
-
VBA コードを実行すると画面が...
-
【ExcelVBA】zip圧縮されたCSV...
-
vbaでvbaProjectのパスワード解...
-
VBAで別ブックのシートを指定し...
-
ExcelのVBAです。フォルダ内の...
-
vbaで他のブックに転記したい。...
-
フォルダ内の全てのファイルに...
-
VBAで複数のブックを開かずに処...
-
VBSでExcelのオープン確認
-
VBA 実行時エラー 2147024893
-
【Excel VBA】書き込み先ブック...
-
VBA シート名が一致した場合の...
おすすめ情報