C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

Re[4]: 【VBA】現在の日付から過去の日付を引く

(過去ログ 168 を表示中)

[トピック内 6 記事 (1 - 6 表示)]　 << 0 >>

■96815 / inTopicNo.1)

　【VBA】現在の日付から過去の日付を引く

▼■

□投稿者/ 工場プログラマー (54回)-(2021/02/16(Tue) 14:14:59)

分類:[Microsoft Office 全般]　

2021/02/16(Tue) 14:16:39 編集(投稿者)
2021/02/16(Tue) 14:16:35 編集(投稿者)

win10　ExcelVBA

現在の日付からセル内に表示されている日付の差分を取得したいのですが
何かいい方法ありますか？

引用返信 編集キー/

■96817 / inTopicNo.2)

　Re[1]: 【VBA】現在の日付から過去の日付を引く

▲▼■

□投稿者/ 魔界の仮面弁士 (2964回)-(2021/02/16(Tue) 14:56:59)

■No96815 (工場プログラマーさん) に返信
> 現在の日付からセル内に表示されている日付の差分を取得したいのですが

今日は 2021/02/16 ですよね。

たとえば A1 セルに「2021/02/05」という日付が入っているとして、
B1 セルを数値書式にして、B1 に「=TODAY()-A1」と書いておけば、「11」という日数が得られます。

ワークシート関数ではなく VBA でということであれば、
Debug.Print DateDiff("d", [A1].Value, Date)
で「11」を得られます。

引用返信 編集キー/

■96819 / inTopicNo.3)

　Re[1]: 【VBA】現在の日付から過去の日付を引く

▲▼■

□投稿者/ furu (104回)-(2021/02/16(Tue) 15:05:27)

■No96815 (工場プログラマーさん) に返信
> 現在の日付からセル内に表示されている日付の差分を取得したいのですが
> 何かいい方法ありますか？
引き算では駄目なの？

Range("B1").Value = Date - Range("A1").Value

引用返信 編集キー/

■96822 / inTopicNo.4)

　Re[2]: 【VBA】現在の日付から過去の日付を引く

▲▼■

□投稿者/ 工場プログラマー (55回)-(2021/02/16(Tue) 15:56:56)

■No96817 (魔界の仮面弁士さん) に返信
> ■No96815 (工場プログラマーさん) に返信
>>現在の日付からセル内に表示されている日付の差分を取得したいのですが
>
> 今日は 2021/02/16 ですよね。
>
> たとえば A1 セルに「2021/02/05」という日付が入っているとして、
> B1 セルを数値書式にして、B1 に「=TODAY()-A1」と書いておけば、「11」という日数が得られます。
>
> ワークシート関数ではなく VBA でということであれば、
> Debug.Print DateDiff("d", [A1].Value, Date)
> で「11」を得られます。
年でもできますかね？

引用返信 編集キー/

■96823 / inTopicNo.5)

　Re[3]: 【VBA】現在の日付から過去の日付を引く

▲▼■

□投稿者/ 魔界の仮面弁士 (2965回)-(2021/02/16(Tue) 16:47:38)

2021/02/16(Tue) 16:49:46 編集(投稿者)

■No96822 (工場プログラマーさん) に返信
>> B1 セルを数値書式にして、B1 に「=TODAY()-A1」と書いておけば、「11」という日数が得られます。
> 年でもできますかね？

「=DATEDIF($A$1,TODAY(),"Y")」とすれば、経過年数を整数で得られます。
https://office-hack.com/excel/datedif/

VBA からは Evaluate メソッド経由で呼びだせます。
Debug.Print Application.Evaluate("DATEDIF($A$1, TODAY(), ""Y"")")

引用返信 編集キー/

■96834 / inTopicNo.6)

　Re[4]: 【VBA】現在の日付から過去の日付を引く

▲▼■

□投稿者/ 工場プログラマー (56回)-(2021/02/17(Wed) 16:47:02)

解決しました。

解決済み

引用返信 編集キー/

トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

- Child Tree -