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 質問
【45071】Re:プロシージャーの引数について ponpon 06/12/12(火) 0:24 発言
【45105】Re:プロシージャーの引数について takeshi.t 06/12/12(火) 21:07 お礼
【45084】Re:プロシージャーの引数について 飛ばない豚 06/12/12(火) 14:13 発言

36836 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free