[[20120920183914]]　『yyyy/m/d形式の中から「月」だけを抽出して集計』（黒）　ページの最後に飛ぶ

『yyyy/m/d形式の中から「月」だけを抽出して集計』（黒）

 すみません。教えていただいたばかりですがまた質問です。

 ユーザーフォームのテキストボックスに日付を入力してデータシートに転記します。

 Private Sub CommandButton1_Click()

 Dim i As Long

 With Sheets("作業データ")

         .Cells(i, 2).Value = CDate(TextNyuryokubi.Value)
 （略）

 これで「作業データ」シートのB列に「2012/9/20」のように日付が記載されます。

 このデータの中から、例えば「9月」（年が変わることはありませんのでこの場合2012年9月です）
 を別のユーザーフォームのコンボボックスで選択して、「作業データ」のB列の中で「9月」に
 該当するデータ行を別シートに転記して集計しようとしています。

 しかし、その2つ目のユーザーフォームで「月」を指定して「作業データ」シートB列の
 「9月1日～30日」に該当する行を抜き出す方法が分かりません…

 1つ目のユーザーフォームで「作業データ」にデータを転記する際にTextNyuryokubi（テキストボックス）
 から「月」を抜き出して、「作業データ」シートの端に作業用列を作ってそこに月だけを記載する…
 という方法も考えましたがそれもどうしたらよいのかと…

 「yyyy/m/d」で記載された「日付」形式のデータから「月」だけを抽出するにはどうしたらよいでしょうか？

 Excel 2007 です。申し訳ございません。よろしくお願いします。

 日付データから月を取得するというのがご質問だと解釈しましたが、
 例えば B2 セルの月を取得するのは、
 Month(Range(B2).Value)
 のように出来ます。
http://www.eurus.dti.ne.jp/yoneyama/Excel/vba/function/vba_date.html
 のあたりをご参考にしてください。
 (Mook)

オートフィルターで、指定月のみを抽出してはどうでしょうか（マナ）

 骨格は、マクロの記録で得られると思います。

 Mook様、マナ様ありがとうございます。

 どちらもうまくいきました！
 助かりました

 （黒）

コメント返信：

[ 一覧(最新更新順) ]

[[20120920183914]] 『yyyy/m/d形式の中から「月」だけを抽出して集計』（黒） ページの最後に飛ぶ

[[20120920183914]]　『yyyy/m/d形式の中から「月」だけを抽出して集計』（黒）　ページの最後に飛ぶ