
エクセルでCtrlを押しながら複数の離れたセルを選択しています。
それを指定したセルに縦1列に並べる方法はありますか?(Sheet2のA1から下方向へ並べる)
順番が入れ替わっても問題ありません。
普通に行うと複数の選択範囲に対して実行できません。という警告が出ます。
他の方のよく似た質問の回答でVBAが見つかりましたが、その回答では選択したセルの位置関係をキープしたままの状態で貼り付けされるので、縦1列に並べるように改良して欲しいです?
宜しくお願いします。
Sub sample()
On Error Resume Next
Set base = Application.InputBox("コピー先セルを入力してください。", Type:=8)
If base Is Nothing Then Exit Sub
For Each a In Selection
If b = "" Then b = a.Row: c = a.Column
base.Offset(a.Row - b, a.Column - c) = a.Value
Next
End Sub
No.1ベストアンサー
- 回答日時:
こんにちは。
>複数の選択範囲に対して実行できません。という警告が出ます。
「順番が入れ替わっても問題ありません。」ということならお話はとても簡単で、1つずつコピー貼り付けていくだけです。
sub macro1()
dim i as long
dim h as range
i = 1
worksheets("Sheet2").range("A:A").clear
for each h in selection
h.copy worksheets("Sheet2").cells(i, "A")
i = i + 1
next
end sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルの複数のセルを一括で...
-
エクセルでセルを10個分くらい...
-
Excelで指定した範囲の数値の減算
-
エクセル空白以外の文字を抽出
-
ワードの表のセル 網掛けのコピー
-
EXCEL VBA 複数セルのコピー
-
エクセルがわからない><;
-
波線は無理??
-
EXCELで○ヶ月を○年○ヶ月に変換...
-
A1セルに入力したら、入力時間...
-
Excelで同じセルに箇条書きをし...
-
複数の文字列のいずれかが含ま...
-
Excelで表を作り、自動で今月の...
-
エクセルで既に入力してある文...
-
エクセルオートフィルタで余計...
-
=SUBTOTAL に =COUNTIF の機能...
-
Excelでセルに入力されたカラー...
-
リンク元の日付が空白の時リン...
-
IF関数で0より大きい数値が入力...
-
空白でないセルの値を返す方法...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルの複数のセルを一括で...
-
エクセルでセルを10個分くらい...
-
エクセル空白以外の文字を抽出
-
ワードの表のセル 網掛けのコピー
-
エクセルVBAでフィルタ抽出...
-
Excel セルの値を数値と認識しない
-
エクセルのマクロ
-
エクセルで表示行の値だけの合...
-
複数の離れた選択範囲をコピー...
-
条件を満たすセルをカウントする。
-
エクセル2000のVBAのcutメゾット
-
Excelでセルの内容を画像で貼り...
-
Excel 列の書式を元に戻すマクロ
-
EXCEL VBA 複数セルのコピー
-
WEB上の文章 ⇒ EXCEL...
-
エクセルのマクロについて
-
エクセル2007で総当り表を作り...
-
ExcelのVBA セル内の文字書き換...
-
エクセル もしくは、ワードでき...
-
セルの書式設定(選択範囲内で中...
おすすめ情報