こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

EXCEL VBA WEEKDAY関数

weekday関数について質問です。
Sub test()
MsgBox Weekday(#2/19/2009#)
End Sub

上記プログラムを参考に2009年2月i日の曜日を返すように
下記プログラムを作成したのですが、うまくいきません。
変数iの箇所に原因があると思うのですがどのようにしたら
解決できますでしょうか??
Sub test()
dim i as string
i=15
MsgBox Weekday(#2/i/2009#)
End Sub

解決策、できましたら参考となるプログラムをお教えください。
よろしくお願いいたします。

投稿日時 - 2009-01-20 21:12:25

QNo.4646724

すぐに回答ほしいです

質問者が選んだベストアンサー

DateSerial関数を使えばよいと思います。

Sub test()
Dim y as integer
Dim m as integer
Dim d as integer
y = 2009
m = 1
d = 21
MsgBox (Weekday(DateSerial(y,m,d)))
End Sub

投稿日時 - 2009-01-21 10:03:02

このQ&Aは役に立ちましたか?

2人が「このQ&Aが役に立った」と投票しています

回答(3)

ANo.2

Sub weekdy()
y = 2009
m = 2
d = 15
MsgBox Weekday(y & "/" & m & "/" & d)
End Sub

投稿日時 - 2009-01-21 00:10:54

ANo.1

2009年2月限定でよいのなら…

Sub test()
Dim i As String
i = 15
MsgBox (Weekday("2009/2/" & i))
End Sub

投稿日時 - 2009-01-20 21:43:25

補足

迅速に回答いただきありがとうございます。

もしよろしければ、2月を変数に置き換えたい場合はどのようにすればよろしいでしょうか??わがままいって申し訳ございません。

投稿日時 - 2009-01-20 22:21:17

あなたにオススメの質問