- ベストアンサー
ExcelVBAを使った日付の求め方
ExcelVBAでの質問です。 セルA1に日付2005/07/25と入力されています。 セルB1にその一年後を求めた値を返したいのです。 通常では =DATE(YEAR(A1)+1,MONTH(A1),DAY(A1)) の式で求める事が出来るのですが、VBAで書こうとするとエラーがでてしまいます。 どのようにすれば良いか教えてください。 ※VBAについては殆ど初心者の為、詳しく教えて頂けると有難いです。 宜しくお願いいたします。
- みんなの回答 (5)
- 専門家の回答
関連するQ&A
- Excel VBAで「date」関数を使いたい
VBAを使用して年月日を入力してます。 セルに表示だけなら Year & "/" & Month… とかでもいいんですが、その日付で計算を行いたいんです。 何日足す、とか。。 それでExcelで使える Date(Year,Month,Day) を思い出したんですが、VBAではエラーになってしまいました。 Application.WorksheetFunction.Date(Year, Month, Day) や Application.Date(Year, Month, Day) もダメでした。 どのようにしたら入力した日付で計算が行えるでしょうか?
- ベストアンサー
- オフィス系ソフト
- エクセル VBAの日付計算?について
現在sheet1にある表をsheet2に転記してゆくVBAを作成しております。sheet1にある日付データセルA1(日のみ)が入っているセルと月初を求めるVBA(DateSerial(Year(Date), Month(Date), 1))を加算して西暦/月/日にしたいのです。 例えば、DateSerial(Year(Date), Month(Date), 1)の答は、2005/05/01になってきます。そこに日付データセルA1が20だとすれば、表示は、2005/05/20となると思います。それをsheet2 セルA1に表示させたいのです。 よろしくお願いします。
- 締切済み
- オフィス系ソフト
- 日付の比較について
最近PHPの勉強を始めた初心者です。 はじめて質問させていただきます。 2005-1-1から2020-12-31の間で入力した日付の曜日を表示するプログラムを作成しています。 2005-1-1から2020-12-31の間以外ならエラー表示するようにしたいのですが、 入力した日付との比較がうまくいかず、思うように動きません。 どのように直せばいいのかを教えていただけないでしょうか?よろしくお願いします。 <?php $year=$_POST["year"]; $month=$_POST["month"]; $day=$_POST["day"]; $date_str="$year-$month-$day"; $date_time=strtotime($date_str); $firstdate_str="2005-1-1"; $firstdate_time=strtotime($firstdate_str); $lastdate_str="2020-12-31"; $lastdate_time=strtotime($lastdate_str); if ($date_time < $firstdate_time || $date_time> $lastdate_time) { echo "Please enter a date between 1/1/2005 and 12/31/2020."; } else { $finddate=date('l', mktime(0,0,0,$month, $day, $year)); echo "The day entered in on $finddate"; } ?>
- 締切済み
- PHP
- Excel2007 日付関数について教えて下さい。
A1に例えば「2012/5/22」と入力すると B2に翌々月10日の日付を入力するため 関数「=DATE(YEAR(A1),MONTH(A1)+2,10)」 と関数を入れました。 A1に日付が入れば翌々月10日の日付を返してくれるのですが A1が空白だと「1900/3/10」の値を返してきます。 日付が入っているとややこしいので消すもしくは日付じゃない値を返すことは出来ないでしょうか よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- 【Excel2000】土・日曜日を考慮した日付+α
現在セルB1には『A1に入力した日の月末日付+月末休日の場合は前日』が出るようにしてあります。 セルA1 = 日付 セルB1 = IF(WEEKDAY(DATE(YEAR(A1),MONTH(A1)+1,0))=1,(DATE(YEAR(A1),MONTH(A1)+1,0))-2,IF(WEEKDAY(DATE(YEAR(A1),MONTH(A1)+1,0))=7,(DATE(YEAR(A1),MONTH(A1)+1,0))-1,DATE(YEAR(A1),MONTH(A1)+1,0))) ここに『A1が25日以降の場合は翌月20日+翌月20日が休日の場合は後日』という設定を加えたいのですが、可能でしょうか? ・A1 = 2011/07/10 → (結果) B1 = 2011/07/29(金) ・A1 = 2011/07/25 → (結果) B1 = 2011/08/22(月) どうしても不可能であれば別セル(C1など)でも構いません。
- ベストアンサー
- その他MS Office製品
- ファイルメーカー 一ヵ月後の日付をだすには?
入力日、タイプ:日付に2005/8/5と手動でいれたら、 有効期限(タイプ:日付)に自動で2005/9/5というように、入力日から一ヵ月後の日付を出すにはどのような計算式をいれたらよいのでしょうか? 参考書に載っていた Date(Month(入力日)+ 1 ; Day(入力日); Year(入力日)という式を使うと 2005/08/01 と打ち込むと、2005/9/9 とでてしまいます。 2005/12/30の場合は、2006/1/1と出ます。 どうしたら、よいか教えてください。
- ベストアンサー
- その他(データベース)
- エクセル関数で一ヶ月後の日付を求めたい
=DATE(YEAR(AQ2),MONTH(AQ2)+1,DAY(AQ2)) と入れて一ヶ月後の日付は表示されたのですが空のセルは空で返しなさいが入りません…。 どうしたらよいのでしょうか。
- ベストアンサー
- Windows XP
- 日付を入力すると曜日が返ってくるプログラム
タイトルのどうり、日付を入力すると曜日が返ってくるperlを作りたいのですが、なかなか良いアイデアが出てきません。 どなたか知恵をお貸し下さい。 具体例としては $a =&Youbi($year,$month,$day); とすると$aに"金"とか"月"といった値が返ってくるような感じでやりたいです。 お願いします。
- ベストアンサー
- Perl
- エクセル(日付に関して)
C3セルに記載された日付から3ヶ月後の日を求め、 別のセルに記載したいです。 =IF(C3="","",DATE(YEAR(C3),MONTH(C3)+3,DAY(C3))) 上記の様にしてみたら、おおむね問題ないようですが、 C3がH19.8.31等の場合に、11.30になって欲しいのに12.1になります。 C3に月末の日付があると、3ヶ月後が30日までの月や2月に問題があります。 何とかなるでしょうか? 簡単なもので、内容説明して頂ければ、VBAでの回答も可です。
- ベストアンサー
- オフィス系ソフト
- エクセル 二つの日付でどちらか早い方の日付を表示させたいのです
エクセル 二つの日付でどちらか早い方の日付を表示させたいのです 現在 Range("A3").NumberFormat = "ggg ee 年 m 月 d 日" Range("A3").Formula = "=DATE(YEAR(C2),MONTH(C2)+1,26)" セルC2の翌月26日 セルA3にC2の条件を入れています ここにもう一つのセルD2の日付の翌月26日の条件を追加 Range("A3").Formula = "=DATE(YEAR(D2),MONTH(D2)+1,26)" セルD2の翌月26日 二つの条件で、どちらか早い方をセルA3に表示させる には どの様にすれば良いでしょうか よろしくお願いいたします
- ベストアンサー
- Visual Basic
お礼
お礼が随分遅くなりまして申し訳ありません。 この質問をした直後に吐血し、胃潰瘍になって入院してしまっていました(-_-;) この問題は他の方が引き継ぎした模様。。。 ですが、先程ご回答頂いたコードを試した所、実行することができました。 今となってはなぜあの時実行できなかったのかが不明です(^_^;) 有難うございました。