Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

36836 / 76732

←次へ　｜　前へ→


	【45071】Re:プロシージャーの引数について

ponpon - 06/12/12(火) 0:24 -


	引用なし

	パスワード

▼takeshi.t さん：
>ユーザーフォームのチェンジイベントに下記のコードを記述し、
>Private Sub CheckBox1_Change()
>　　If Me.CheckBox1.Value = True Then
>　　　　Call 末日
>　　End If
>End Sub
>
>標準モジュールにて下記のように
>月末の日付を求めるコードを記述しましたが、
>引数を省略できません。
>という今まで見たことの無いエラーが出ましたが何故でしょうか？
>
>Sub 末日()
>　　Dim monthEnd As Date
>　　With F月末
>　　monthEnd = DateSerial(Val(.text1.Value), Val(.text2.Value) _
>　　　　　　　　+ 1, 1) - 1
>　　.text3.Value = monthEnd(Day)
>　　End With
>End Sub

よく分かりませんが

.text1.Value　→TextBox1.Value　または　TextBox1.Text
.text2.Value　→TextBox2.Value　または　TextBox2.Text
.text3.Value　→TextBox3.Value　または　TextBox3.Text
monthEnd(Day) →Day(monthEnd)

では、ないでしょうか？

0 hits

▼

【45067】プロシージャーの引数について takeshi.t 06/12/11(月) 23:14