ExcelのVBAでできますか?
こんにちは。
項目1 項目2
あ a1
あ a2
あ a3
あ a4
い b1
い b2
い b3
い b4
い b5
い b6
い b7
というデータがあり、これを別シートに
項目1 項目2 項目3 項目4 項目5 項目6 項目7 項目8
あ a1 a2 a3 a4
い b1 b2 b3 b4 b5 b6 b7
と表示させたいです。
が、VB初心者なので「あ」のところまでしかできませんでした。
実際のデータは「い」から下もずーっとあるので変数などを使わなくてはいけないのでしょうが、よくわかりません。
どうしたらうまくいくでしょうか?
ここまで自分でやってみました。
Range("A2").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="あ"
Range("A2").Select
Selection.Copy
Sheets.Add
ActiveSheet.Paste
Sheets("Sheet1").Select
Range("B2:B15").Select
Application.CutCopyMode = False
Selection.Copy
Sheets(1).Select
Range("B1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True