質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.50%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Q&A

1回答

1226閲覧

エクセル VBA 項目3つのデータ数75を5列に分けたい

cat_junko

総合スコア44

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

0グッド

0クリップ

投稿2016/08/31 08:05

お世話になっております。
下記のような表があり項目数3つ、データ数75件(各3段)を5列に
自動で分けたい。
この「5列」を指定して4列分けや6列分け等にも対応できる様にしたい。
※項目数は、3~6つ位で変動します。
変動に、対応出来るコードが良いです。

初期の表
イメージ説明

完成形の表
イメージ説明

宜しくお願いいたします。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答1

0

この質問にはご自身で作成した内容などがまったくないため「やりたいことだけを記述した丸投げの質問」となってしまっています。

この状態でサンプルコード提示などのアドバイスはふさわしくないと思いますので、作成に着手するためのアドバイスをさせていただきます。

やるべきこと

①データ件数を決定する 例では75件。区画No列で値の入っているセルのカウント。 (もしくは固定値) ②1データの項目数を取得する 例では3項目。 区画No列で最初に値の入っているセルから次に値の入っているセルまでの行数から算出する。 (もしくは固定値) ③分割数を指定する 入力方法は不明。 特定のセルから取得、またはコード内に固定値で設定? ④出力シートの1列あたりのデータ件数を算出する 1列あたりのデータ件数 = (データ件数 ÷ 分割数) ※端数切上げ ⑤読取シートをループ処理 読込シートから1行読み込み、出力シートに貼り付ける。 出力データ件数が④で算出した1列あたりのデータ件数に達したら、出力列を右に移動し、出力行を先頭に戻す。

以上のような流れで実現できると思います。
頑張ってみてください。

投稿2016/08/31 08:49

編集2016/08/31 09:43
jawa

総合スコア3013

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

まだベストアンサーが選ばれていません

会員登録して回答してみよう

アカウントをお持ちの方は

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.50%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問