Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


12293 / 76734 ←次へ | 前へ→

【69967】Re:月の最終営業日のデータをピックアップしたい
回答  あすなろ  - 11/9/29(木) 17:44 -

引用なし
パスワード
   ▼kaze11 さん:

日付列で昇順ソートされていて、データ数が膨大でないなら、
データがA1:Enにあるとして、以下の数式をデータのある行までフィルコピー

F2 : =IF(TEXT(A2,"yyyymm")=TEXT(A1,"yyyymm"),SUM(F1)+1,1)

G2 : =COUNTIF(A:A,"< " & DATEVALUE(YEAR(A2)&"/"&MONTH(A2)+1&"/1"))
    -COUNTIF(A:A,"< " & DATEVALUE(YEAR(A2)&"/"&MONTH(A2)&"/1"))-F2+1

オートフィルターでG列に1を指定すると月の最終日
オートフィルターでG列に2を指定すると月の最終日の前日

オートフィルターでF列に1を指定すると月の最初の日
オートフィルターでF列に2を指定すると月の2日目

関数式は苦手なもので、エキスパートの方ならもっと簡潔になるかも。
14 hits

【69960】月の最終営業日のデータをピックアップしたい kaze11 11/9/28(水) 21:50 質問
【69962】Re:月の最終営業日のデータをピックアップ... UO3 11/9/29(木) 11:38 発言
【69963】Re:月の最終営業日のデータをピックアップ... kaze11 11/9/29(木) 11:51 質問
【69964】Re:月の最終営業日のデータをピックアップ... UO3 11/9/29(木) 12:06 回答
【69965】Re:月の最終営業日のデータをピックアップ... kaze11 11/9/29(木) 12:40 お礼
【69966】Re:月の最終営業日のデータをピックアップ... UO3 11/9/29(木) 16:28 発言
【69967】Re:月の最終営業日のデータをピックアップ... あすなろ 11/9/29(木) 17:44 回答
【69969】Re:月の最終営業日のデータをピックアップ... kaze11 11/9/29(木) 21:27 お礼
【69970】Re:月の最終営業日のデータをピックアップ... あすなろ 11/9/29(木) 22:05 回答
【69971】Re:月の最終営業日のデータをピックアップ... あすなろ 11/9/29(木) 22:11 回答
【69972】Re:月の最終営業日のデータをピックアップ... kaze11 11/9/29(木) 22:39 お礼
【69968】Re:月の最終営業日のデータをピックアップ... kaze11 11/9/29(木) 21:21 お礼

12293 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free