
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で質問しましょう!
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別ブックをダイアログボックス...
-
VBAで別ブックのシートを指定し...
-
VBA シートをコピーする際に Co...
-
【Excel VBA】書き込み先ブック...
-
VBA 別ブックからコピペしたい...
-
オブジェクトは、このプロパテ...
-
【ExcelVBA】zip圧縮されたCSV...
-
複数のエクセルファイルとシー...
-
エクセルアンケート集計 マクロ
-
VBA コードを実行すると画面が...
-
[Excel]ADODBでNull変換されて...
-
エクセルVBAが途中で止まります
-
【VBA】全シートの計算式を全て...
-
2つ目のコンボボックスが動作...
-
ワイルドカード「*」を使うとう...
-
異なるブック間でのセル範囲の...
-
Excelマクロ 該当する値の行番...
-
VBSでExcelのオープン確認
-
vbaでvbaProjectのパスワード解...
-
複数のエクセルブックをひとつ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
複数のエクセルファイルとシー...
-
VBA シートをコピーする際に Co...
-
別ブックをダイアログボックス...
-
VBA 別ブックからコピペしたい...
-
エクセルVBAが途中で止まります
-
ワイルドカード「*」を使うとう...
-
VBAで別のブックにシートをコピ...
-
VBA コードを実行すると画面が...
-
VBAで別ブックのシートを指定し...
-
【ExcelVBA】zip圧縮されたCSV...
-
【Excel VBA】書き込み先ブック...
-
2つ目のコンボボックスが動作...
-
[Excel]ADODBでNull変換されて...
-
Excelマクロ 該当する値の行番...
-
VBA 実行時エラー 2147024893
-
Excelのマクロコードについて教...
-
Excel にて、 リストボックスの...
-
【ExcelVBA】インデックスが有...
-
VBA アプリケーション定義また...
-
【Excel VBA】表の列の値毎に分...
おすすめ情報