人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

EXCEL VBAで質問です。いつもお世話になります。

Sheet1のA1セルに日付データが入っているとします。形式はyyyy/mm/ddです。
この月の日数を変数daycountに代入するVBAコードをお教えください。

ずばりの回答をお待ちしています。
よろしくお願いいたします。

●質問者: kitatom
●カテゴリ:ビジネス・経営 コンピュータ
✍キーワード:A1 DD Excel MM VBA
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● きゃづみぃ
●0ポイント

daycount = Worksheets("sheet1").Range("A1")

これでセットされます。

◎質問者からの返答

ありがとうございます。日数がうまく取得できませんでした。


2 ● tikirou
●70ポイント

以下のような形でしょうか?

(単純に変数Daycountに代入する形で作ってみました。)

ご確認下さい。

Sub Count()
 
 Dim d As Date
 
 d = Range("A1")
 
 DayCount = DateSerial(Year(d), Month(d) + 1, 1) 
 - DateSerial(Year(d), Month(d), 1)
 
End Sub
◎質問者からの返答

ありがとうございます。こちらのコードを試してみたところ、うまく取得できました。たいへん助かりました。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ