No.1ベストアンサー
- 回答日時:
こんばんは!
VBAになりますが一例です。
1行目は項目行になっているという前提です。
Sub Sample1()
Dim lastRow As Long
lastRow = Cells(Rows.Count, "A").End(xlUp).Row
If lastRow >= 300 Then
Range(Cells(300, "A"), Cells(lastRow, "C")).ClearContents
End If
With Range("A1").CurrentRegion
.AutoFilter field:=2, Criteria1:="A勤務"
.SpecialCells(xlCellTypeVisible).Copy
Range("A300").PasteSpecial Paste:=xlPasteValues
.AutoFilter field:=2, Criteria1:="B勤務"
.SpecialCells(xlCellTypeVisible).Copy
Range("A400").PasteSpecial Paste:=xlPasteValues
End With
ActiveSheet.AutoFilterMode = False
Application.CutCopyMode = False
End Sub
こんな感じではどうでしょうか?m(_ _)m
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelマクロ 差分抽出の方法が知りたいです。 2 2023/03/07 13:25
- 転職 長く続けられる好条件の求人でしょうか? 3 2023/07/12 18:45
- Visual Basic(VBA) 複数シートの複数列に入力されているデータを重複なしで抽出するVBAを作りたいです。 9 2022/06/17 10:33
- Excel(エクセル) Excelの1つのセルにそれぞれ文字+数字が入力されていて、 数字のみ抽出して合計したいです。(合計 4 2023/03/16 23:44
- PHP PHPでCSVを出力するさいに、ループの中で前の行の値を変更したい 1 2022/10/27 14:21
- Excel(エクセル) エクセルでシフト表を作成中で困っています。 3 2022/06/22 11:49
- Visual Basic(VBA) evcel VBAについて 2 2022/08/02 21:37
- 転職 下記のような募集は、良い会社でしょうか?どう思いますか?入ってみたら良くない事が無いでしょうか? 4 2023/03/03 16:40
- Excel(エクセル) 警備の夜勤の仕事をしています。 誰か助けてください。エクセルのことです。 月の勤務表(表1)と月の人 2 2022/04/13 12:29
- 会社・職場 職場の人の通夜 こんにちは。掲題の件につきまして、質問いたします。 職場の方が亡くなられ、通夜と告別 3 2023/02/02 17:25
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
条件にマッチする行を抽出するVBAを教えてください
経営情報システム
-
エクセルVBA C列に特定の文字列を含む行のみを抽出し、一つのExcelにまとめたい。
Excel(エクセル)
-
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
-
4
VBAで条件が一致する行のデータを別シートに抽出
Excel(エクセル)
-
5
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
6
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
パートから正社員に・・・有給...
-
私ばかりが遅番勤務の理由、納...
-
休憩時間が遅い
-
退職日まであと4回勤務です。 ...
-
工場勤務の人って陰湿な人多く...
-
在宅勤務について質問がありま...
-
勤務時間と勤務時間の間は8時...
-
8時間フルに働く人で休憩って何...
-
こんな何も出来ない保育士を雇...
-
年2回の健康診断の対象者は?
-
アルバイトの休憩。労働基準の...
-
Excel 勤務時間の計算について...
-
アルバイトのシフトカットにつ...
-
私には消防士の彼氏がいるので...
-
勤め先の昼休みについて。 うち...
-
飲食店でのアルバイトに与える...
-
休日出勤の休憩時間分は無給で...
-
ディズニーシー、ランドでフル...
-
体調不良で派遣初日を変更する...
-
大企業のエリートって高級取り...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
私ばかりが遅番勤務の理由、納...
-
休憩時間が遅い
-
私には消防士の彼氏がいるので...
-
工場勤務の人って陰湿な人多く...
-
退職日まであと4回勤務です。 ...
-
勤務時間と勤務時間の間は8時...
-
友人が働いてる会社がとんでも...
-
勤め先の昼休みについて。 うち...
-
パートの休憩と社員の休憩について
-
工場の始業時間が早いのはなぜ?
-
労働条件
-
SNS上で業務上横領公表 私が昔...
-
隔日勤務という勤務形態が理想...
-
某掲示板にて体型のことを相談...
-
労働に対するキツさに、大阪か...
-
否めないの意味を教えていただ...
-
セブンイレブンでの誓約書
-
勤務時間が終わっても職場に居...
-
整骨院で働く姪っ子について 一...
-
ドラッグストアに勤務している...
おすすめ情報
コメントありがとうございます。
上記を実施した際ですが、A勤、B勤それぞれ最初に条件に合致したものを300 or 400行に
貼り付けており、以降は抽出できておりません。
A勤、B勤それぞれを全て抽出するにはどのようにしたらよいでしょうか。
宜しくお願い致します。