No.1ベストアンサー
- 回答日時:
こんにちは!
手っ取り早くVBAでの一例です。
尚、元データはSheet1にあり、Sheet2に表示するとします。
両シートとも1行目は項目行だとします。
標準モジュールにしてください。
Sub Sample1()
Dim i As Long, j As Long
Dim lastRow As Long
Dim wS As Worksheet
Set wS = Worksheets("Sheet1")
With Worksheets("Sheet2")
'//▼Sheet2、2行目以降のデータを一旦消去//
lastRow = .Cells(Rows.Count, "A").End(xlUp).Row
If lastRow > 1 Then
Range(.Cells(2, "A"), .Cells(lastRow, "E")).ClearContents
End If
'//▼ココから操作//
For i = 2 To wS.Cells(Rows.Count, "A").End(xlUp).Row
For j = 3 To wS.Cells(i, Columns.Count).End(xlToLeft).Column Step 2
If wS.Cells(i, j) <> "" Then '//←念のため//
With .Cells(Rows.Count, "A").End(xlUp).Offset(1)
.Value = wS.Cells(i, "A")
.Offset(, 1) = wS.Cells(i, "B")
.Offset(, 2).Resize(, 2).Value = wS.Cells(i, j).Resize(, 2).Value
End With
End If
Next j
Next i
.Activate
End With
MsgBox "完了"
End Sub
※ 関数でないのでデータ変更があるたびに
マクロを実行する必要があります。m(_ _)m
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(ブラウザ) cvsファイルをダウンロードすると、自動で拡張子がExcelのものになる 5 2022/07/20 21:21
- Visual Basic(VBA) Excelで横書き50行の漢字テストデータを縦書きのテスト問題にしたい。 6 2022/04/27 15:03
- Visual Basic(VBA) VBA横データを縦にしたいです 2 2023/08/08 19:38
- Excel(エクセル) エクセルでのマクロを使ったデータの並べ替え 3 2022/12/03 18:54
- Excel(エクセル) エクセルの条件付き書式について エクセルでカレンダーを作りました。縦に日付が並んでいて、横にスケジュ 3 2022/10/10 15:32
- Excel(エクセル) エクセルの散布図で新たに入力した値のデータラベルが空欄になる現象 1 2022/04/26 09:31
- Visual Basic(VBA) VBA 検索と入力 Excel ブック ぶぶぶ シート ししし 列V 検索対象の列です 最終行は、お 6 2023/05/17 01:40
- Visual Basic(VBA) VBA横に並んでいるデータを縦に並ぶデータにしたいです。 4 2023/08/09 08:53
- Excel(エクセル) Excelのマクロを教えていただけないでしょうか? 1 2023/07/06 19:56
- Excel(エクセル) エクセルでのINDIRECT関数の使い方について 3 2022/08/22 07:38
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Safariでページが開けない
-
teamsについて質問です。 iPhon...
-
MacbookAirが疑問符点滅の表示...
-
PC版のGTAオンラインのデータを...
-
Among Usのデータ共有みたいな...
-
荒野行動のデータを完全に消し...
-
PS4のグラセフ5を今日やろうと...
-
HDDナビの音楽データを取り出し...
-
■桃太郎電鉄DSのデータ消去方法...
-
マリオのピクロス(SFC)デ...
-
PS2のメモリカードのデータ...
-
イケメンは短小な人が多いよう...
-
ニンテンドースイッチライトで...
-
ニンテンドーDSソフトのデー...
-
パソコンの下取り後のデータは...
-
パズドラのリセマラのやり方が...
-
東方のDATファイルが開けません
-
iPhoneの『ヘルスケア』睡眠で...
-
ポケモン ダイアモンド・パール...
-
国内メーカーの中、一番加速速...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
PC版のGTAオンラインのデータを...
-
荒野行動のデータを完全に消し...
-
イケメンは短小な人が多いよう...
-
マリオのピクロス(SFC)デ...
-
「大人のDSトレーニング えい...
-
PS4のグラセフ5を今日やろうと...
-
PS3のデータをPCに移動す...
-
Safariでページが開けない
-
Among Usのデータ共有みたいな...
-
teamsについて質問です。 iPhon...
-
ペルソナ2罰
-
ツムツムのデータが消えてしま...
-
switch版フォートナイトのデー...
-
FF3のデータの消し方を教え...
-
5年くらい使用したノートパソ...
-
ニンテンドースイッチライトで...
-
■桃太郎電鉄DSのデータ消去方法...
-
GBAのデータ消去
-
ツイステは一度アンインストー...
-
HDDナビの音楽データを取り出し...
おすすめ情報