No.4
- 回答日時:
=OFFSET(A$1,(ROW(A1)-1)/8,MOD(ROW(A1)-1,8))
No.3
- 回答日時:
こんにちは
1回だけの作業なら関数併用で手作業で、同じ作業を何回もやる必要があるのならマクロが宜しいかと。
マクロの例はNo2様がすでに回答して下さっているので、関数利用の方法を・・・
そのシートの好きな列(J列とかK列など)の1行目に
=INDEX(A:H,INT((ROW()-1)/8)+1,MOD(ROW()-1,8)+1)
を入力して、下方にフィルコピーで1列に変換されると思います。
上記は関数なので値として固定させたければ、列をコピーして「形式を選択してペースト」で値をペーストすればよろしいです。
No.2
- 回答日時:
VBA で良かったでしょうか
ダメならスルーということで・・・
以下を標準モジュールに記述して、
アクティブシートを処理対象に、
そのものを書き換えます
Public Sub Samp1()
Dim i As Long, j As Long
Const CCOLW As Long = 8 ' 列数
j = CCOLW - 1
Application.ScreenUpdating = False
For i = Cells(Rows.Count, "A").End(xlUp).Row To 1 Step -1
With Cells(i, "A")
.Offset(, 1).Resize(, j).Copy
.Offset(1).PasteSpecial xlPasteValues, Transpose:=True
.Offset(, 1).Resize(, j).ClearContents
If (i = 1) Then Exit For
.Resize(j).EntireRow.Insert
End With
Next
Range("A1").Select
Application.ScreenUpdating = True
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 関数EXACT(文字列,文字列)とexcelVBA 3 2022/04/14 15:07
- Visual Basic(VBA) VBA横データを縦にしたいです 2 2023/08/08 19:38
- Excel(エクセル) 【VBA】指定フォルダに格納中のテキストファイルをエクセルで処理し結果のエクセルを新規フォルダに保存 1 2022/03/25 14:19
- その他(ブラウザ) cvsファイルをダウンロードすると、自動で拡張子がExcelのものになる 5 2022/07/20 21:21
- その他(Microsoft Office) エクセルで串刺ししたシートの並べ替えをしたいです 4 2023/02/14 11:59
- Visual Basic(VBA) Excelで横書き50行の漢字テストデータを縦書きのテスト問題にしたい。 6 2022/04/27 15:03
- Visual Basic(VBA) VBAで大量データの処理 3 2022/11/15 21:53
- Excel(エクセル) エクセル シート内のボックスを縦並びから横並びに 7 2023/04/05 04:28
- Visual Basic(VBA) Excel VBA 最終行を取得しVlookup関数をコピーする方法をコーディングで教えてください。 3 2023/05/11 13:14
- Excel(エクセル) CSVファイルがカンマ区切りにならない。対処法を教えていただきたいです。 仕事でSMS一斉送信ができ 2 2022/07/01 21:24
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
エクセルで横並びの複数データを縦の一本のデータにしたい
Excel(エクセル)
-
エクセルで横並びの複数データを縦のデータにしたい こんにちは。宜しくお願い致します。 A B C D
ソフトウェア
-
【エクセル】区切り文字が含まれるデータを縦に展開する方法
Excel(エクセル)
-
-
4
エクセルで長い行を5行ごとに1列にするには?
Excel(エクセル)
-
5
エクセルで1列に500行並んだデータを5列毎に改行
Excel(エクセル)
-
6
Excelで縦列グループが横並びになっているのを、縦1列に並び変えたいです。
Excel(エクセル)
-
7
Excel VBAで、横並びのデータを縦並びにしたい
その他(Microsoft Office)
-
8
エクセルで横データを縦に並べ変えたいです。
財務・会計・経理
-
9
VBA横のデータを縦にする方法
Excel(エクセル)
-
10
exeファイルの中身を見ることは可能ですか?
フリーソフト
-
11
Excelで行ごとコピー、同じ行を3行にしたい
Excel(エクセル)
-
12
【VBA】複数行あるカンマ区切りのデータを全て縦に一列に並べたい
Visual Basic(VBA)
-
13
テキストに縦に並んでいるデータを半角カンマで横に並べたい
Windows Me・NT・2000
-
14
EXCELで2列を参照し、重複するものを横に並べたい
Excel(エクセル)
-
15
エクセルで縦のカラムデータをカンマ区切りで出力したい。
PostgreSQL
-
16
python エラー
その他(プログラミング・Web制作)
-
17
VBAで横データを縦データに変換する方法を教えて下さい。
その他(Microsoft Office)
-
18
/"でセル内の文字を縦に分割するマクロについて"
Excel(エクセル)
-
19
エクセルで縦2列の表を横1列にするには
その他(パソコン・スマホ・電化製品)
-
20
VBA横データを縦にしたいです
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
IFとIFS関数
-
Excelを無料で使うには? パソ...
-
セルの数を求めたい
-
Excelの表示についての質問
-
再質問です。マクロの修正箇所...
-
データチェックを行うエクセル...
-
エクセルで「ページレイアウト...
-
エクセルの数式バーのフォント...
-
エクセルの関数について教えて...
-
エクセルでセルに標準で入力さ...
-
Microsoft1Officeの互換ソフト...
-
シフト表をエクセルで作るとき...
-
ユーザー定義関数をアドイン登...
-
Excel VBAで全ての矢印を赤色に...
-
VBA Private Sub Worksheet_Cha...
-
2列に入っているデータを1列...
-
Excelに詳しい方! B列が「日...
-
excel2013 MonthDays 関数が使...
-
エクセルのクイックアクセスツ...
-
Excelの数式について教えてくだ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
半角カタカナをヘボン式ローマ...
-
(マクロ)vlookupの元データを同...
-
エクセルで上位バイトのセルと...
-
exselの質問です
-
Excel 大小比較演算子による「...
-
Excel VBについての質問です。
-
エクセルの問題です。絶対値の...
-
非表示列の再表示に失敗
-
職場の人から聞かれており、こ...
-
Excel関数-文字列で自動作成さ...
-
Excelデータをコピペして、ペー...
-
ユーザー定義関数をアドイン登...
-
【マクロ】for next構文について
-
エクセルの日付を編集する
-
【マクロ】VLOOKUPにて参照元に...
-
exselで最小数で並び替える関数
-
libre 表計算ソフトの計算がう...
-
エクセルで表
-
エクセルの表で1年間の曜日を...
-
西暦和暦
おすすめ情報