No.1
- 回答日時:
ぶっちゃけ言えば,
元シートのA1:AQ10をコピーする
1枚目のA1に型式を選んで貼り付けの「リンク貼り付け」をクリックする
元シートのA11:AQ20をコピーする
2枚目のA1に型式を選んで貼り付けの「リンク貼り付け」をクリックする
:
を合計6回手を動かして作成するのが,一番簡単確実で手間の少ない方法です。
6回手を動かすのもイヤでたまらないのでしたら,もっと手数が多い次のような段取りもあります。
元のデータを「元データ」というシートに記入する
Sheet1からSheet6まで6枚のシートを用意する
ブックを一度保存する
6枚のシートを作業グループにする
A1:AQ10を選択する
=OFFSET(INDIRECT("元データ!A"&((RIGHT(CELL("Filename",A1))-1)*10+1)),ROW()-1,COLUMN()-1)
と記入し,コントロールキーを押しながらEnterで入力する。
No.2
- 回答日時:
質問内容の処理をそのまま実行すると、
1.A1:AQ10のデータを次のシートにコピー
2.A11:AQ20(読み方によってはA11:AQ10ともとれますが、それはないかと。)をそのまた次のシートにコピー
※A21:AQ60のデータは特に処理なし
ということになってしまいますが、大丈夫ですか?
A1:AQ60にある表を、10行ずつ6シートに分割する処理ではないのですか?
違っていたらすみません。
「自動的に出したい」とのお話から、繰り返し行わなくてはならない処理なのだろうとも予想しました。
自分であれば、VBAマクロを作成して対応します。
もし、60行のデータを10行ずつ別々シートに分割する処理なのであれば、一度マクロを記録しておくだけでも済みます。
また、気になったのは、マクロや数式を使用するとしたら、表示形式等のセルの書式設定はコピーしなくて問題ないかという点です。
データの種類や分割したデータの使い方など、もう少し詳しい情報があった方が、作業にあった方法を考えやすいかと思います。現在の表を、そのまま使う方法もあるかも知れません。
No.3ベストアンサー
- 回答日時:
文章だけ書いて、全部のコード作成を要求する、丸投げではないか。
VBAの最低限を勉強して無いのに、やりたいことだけは一人前とかの状態ではないか。
ーー
思考過程の1例を示してみる。
マクロの記録を3シート分ぐらい取って(コピー貼り付けが中心)、コードをじっくりながめて、似たもののコードの3回繰り返しになっているが、コードは1回分にして、実行時には指定回の繰り返し作業のコードにするには、何処を変えれば良いか、考えて見ればよい。
ーー
1-10 行
11-20
21-30
・・
は i 回目はどうなるか考えたか。中学受験の算数の問題だ。
Sub test01()
For i = 1 To 4
n = (i - 1) * 10 + 1
Range("a" & n & ":C" & n + 9).Select
MsgBox "a"
Next i
End Sub
をやって納得してみたら。
但し、例なので判りやすいように
C列までにしているーー>AQに拡げるのは判るだろう。
繰り返しを4回にしているーー>最終行をとらえて10で割り、+1した回数が、繰り返し必要回数だ。
MsgBox "a"はそこで止めて、シートの選択範囲を見せるためのもの。本番では関係ない。
最終行の行番号をとらえるコードは、知っているのかな。Googleで「エクセルVBA 最終行」で照会したら。
ーー
コピー貼り付けは XXX.Copy 新シート.Range(”A1”)
XXXはコピー元のセル範囲だ(上記で説明)
新シートは、となりのシートということで、シートIndexを+1すると指定できる。
それには、初心者は必要数シートを操作で作って(挿入しておいて)、コードが難しくなるのをさける、のがよかろう。
2つのシートを扱うので、それを指定するやり方の習得必要(略)。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) vba シートの並び替え 1 2023/04/19 13:44
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Excel(エクセル) エクセル VBAでBook モジュールのプロシージァ(コード)に除外シートを設定したい 1 2023/01/11 15:53
- Excel(エクセル) Excel リンク先のエクセルファイルの削除 同時に行を削除したい 1 2022/11/29 16:20
- Excel(エクセル) エクセルでのコピーペースト 6 2022/09/03 07:14
- その他(Microsoft Office) オフィス365のエクセル 3 2023/06/29 13:10
- Excel(エクセル) 特定文字(数字)で行挿入、挿入された行で合計したい 2 2023/03/13 14:30
- Excel(エクセル) 単価シートから単価をエクセル関数で自動取得する方法 1 2023/07/02 22:00
- Excel(エクセル) 【エクセル」 特定のセルで条件抽出した列を、別シートに上から詰めて表示したい。 8 2022/04/08 16:00
- Excel(エクセル) エクセルでファイル保存時に複数シートのオートフィルタを全て解除したい 1 2023/05/10 13:23
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelマクロ 別シートへ連続コ...
-
エクセルVBAで名前の決まってい...
-
エクセルで特定の列が0表示の場...
-
Excel マクロ VBA プロシー...
-
エクセル関数を教えてください
-
UserForm1.Showでエラーになり...
-
Excel・Word リサーチ機能を無...
-
ExcelのVBA。public変数の値が...
-
メッセージボックスのOKボタ...
-
エクセルVBA 「On Error GoTo...
-
Excelのマクロでワードのテキス...
-
教えて下さい
-
2つのマクロでチェックボックス...
-
ACCESS VBAのSplit()関数の使用...
-
エクセルのマクロについて教え...
-
マクロの「SaveAs」でエラーが...
-
c言語
-
Excel2013 VBA マクロ実行中に...
-
エクセルのマクロについて教え...
-
VBA初心者 Ctrl+での操作、ボタ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
excelのInitializeイベントとAc...
-
ACCESSのVBAにてExcelのシ...
-
Excelマクロ 別シートへ連続コ...
-
エクセルVBAで名前の決まってい...
-
VBAで繰り返し処理の速度を...
-
excel
-
「シートを削除しますか」のメ...
-
VBA処理でこんな条件処理ってで...
-
VBAでシートをまたぐ処理の方法
-
エクセルVBAでブックの分割
-
オートシェイプの不具合について
-
エクセル2010の内容を次のシー...
-
同一ブック内・別シートの内容...
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
エクセルで特定の列が0表示の場...
-
UserForm1.Showでエラーになり...
-
Excel マクロ VBA プロシー...
-
配列数式の解除
-
メッセージボックスのOKボタ...
おすすめ情報