Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

29472 / 76732

←次へ　｜　前へ→


	【52541】Re:月間データ範囲取得について

yata - 07/11/17(土) 23:37 -


	引用なし

	パスワード

Hirofumi さん度々有難うございます。

>以下を修正して下さい
>現状では、年度の最終の月の最終行が取得できません
>
>　　'データの上から下につきを比べる
>'　　For i = 1 To lngRows
>　　For i = 1 To lngRows + 1 '★変更
>　　　　'もし、先頭の行が未定で、探索月と同じ月なら
修正しました。
日付の下の行が同じ月内で終わっている時　lngEnd が１になってしまって、困っていました。
これを使わして頂きます。
大変有難うございました。勉強になりました。

0 hits

▼

【52530】月間データ範囲取得について yata 07/11/17(土) 20:30