Results of 1 - 1 of about 13167 for 日付 (0.003 sec.)
- [[20080229155503]]
- #score: 2423
- @digest: 7ec33e20264b7fe6e88a94fdd023596f
- @id: 36446
- @mdate: 2008-02-29T08:13:35Z
- @size: 1303
- @type: text/plain
- #keywords: wndowxp (7748), 述テ (7748), excek2003 (7380), 述a (6955), 換ms (6347), 示s (5958), 年太 (5803), シリ (3853), 万年 (3258), ル値 (3053), アル (2399), dateadd (2336), リア (1796), 加算 (1787), 値変 (1636), ト() (1056), 加減 (1029), cdate (999), format (976), 本日 (938), 日付 (892), 示下 (874), msgbox (815), s2 (716), 記述 (702), 変換 (699), today (651), を日 (557), 2008 (545), date (458), 演算 (450), に戻 (440)
- 『日付け⇔シリアル値変換の記述は?』（万年太郎）
本日の日付けを @シリアル値に変換してそれをMsgBoxに表示する記述 Aそのシリアル値に演算して加減した数値を再び日付けに戻す の記述がうまくいきません。どなたかご教示下さい。 Sub 記述テスト() Dim Today,s2 As Variant Dim s As Long Today = Format(Date) MsgBox Today ' 本日の日付けを表示 s = Val(Today) ' シリアル値に変換 MsgBox s 'シリアル値を表示 s2 = s + 4 s2 =format(date,"yy-mm-dd") '加算したシリアル値を日付けに戻す MsgBox s2 '加算した日付けを表示 End Sub WndowXP,Excek2003 ---- 単純にいえばこんなこと? MsgBox Date + 4 > s2 = s + 4 で4足した日付を取得しているのに、 > s2 =format(date,"yy-mm-dd") '加算したシリアル値を日付けに戻す で今日の日付に戻してますね?? (MARBIN) ---- DateAdd 関数で MsgBox DateAdd("d", 4, Date) (seiya) ---- ありがとうございます。 シリアル値に変換してそれを表示する部分がうまくいかないのですが、 どうしたらいいでしょう? (><)万年太郎 ---- 何をどうしたいのか良く解らないけど。 シリアル値って、これですよ。 MsgBox CDbl(CDate("2008/2/29")) 単純に日付に加算したいなら MsgBox Format(CDate("2008/2/29") + 1, "yyyy/m/d") わざわざシリアル値にする必要がないです。 BJ... - https://www.excel.studio-kazu.jp/wiki/kazuwiki/200802/20080229155503.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97063 documents and 608337 words.
訪問者：