Excel VBA質問箱 IV

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

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


62302 / 76732 ←次へ | 前へ→

【19037】Re:同じような
発言  ichinose  - 04/10/19(火) 23:39 -

引用なし
パスワード
   ▼ponpon さん:
こんばんは。

>こんばんは。PONPONです。
> またまたお世話になります。明日が台風のため(今年4日目です。先のことを考えると不安ですが・・・)休みになったので(もちろん職員は年休ですよ)、今まで書いていたコードを見直しています。
>
>以下質問です。
> 職員用に年間時間割の自動作成を作っています。
> コードを見てみると、参照するセルが違うだけだったり、参照するシートが違うだけだったりするコードがたくさんあります。
> ひな形のコード(引数付き)を作り、引数にセルを入力することで、同じようなコードを少なくしたいと思い挑戦しています。

> XXXXX(i AS InTger,j AS InTeger)とし、コードの参照セルをCells(i,j)とすることで、何とかうまくできました。
>   Call XXXXX(2,5)  とか  Call XXXXX(4,8)
>(本当に正しいかどうかはわかりませんが、一応思った通りに動作しています。やったね!!)
> しかし、引数にWorksheetや文字をいれて同じようにしても、「型が一致しません」とエラーが発生してしまいます。
>
> 以下コードの説明
> 各種設定シートに、年月日入力欄とその横にあるチェックボックス6個(1校時から6校時まで)を設定しています。
> 行事設定シートに、たとえば、年月日を入力し、1校時、2校時をチェックし、コマンドボタンをクリックすると、年度時数(全)シートにある同じ年月日の年間時間割の1校時時2校時にに「行」を入力するというものです。
> 欠時設定シートでは同じように「欠」を、その他設定では、特定セル上の任意の一文字を というものです。

 
> これを各種設定(ABC AS Worksheet, MOJI AS String)
          ↑ このようにパラメータを設定したならば
>   Call 各種設定(行事設定,行) こんなふうに

 call 各種設定(Worksheets("行事設定"),"行")

というように型を合わせて引数を指定しなければなりませんよ!!
0 hits

【19035】同じような ponpon 04/10/19(火) 23:25 質問
【19037】Re:同じような ichinose 04/10/19(火) 23:39 発言
【19038】Re:同じような 追伸 ichinose 04/10/19(火) 23:47 発言
【19040】Re:同じような 追伸 ponpon 04/10/20(水) 0:07 発言
【19041】Re:同じような 追伸 [名前なし] 04/10/20(水) 0:14 回答
【19045】Re:同じような 追伸 ponpon 04/10/20(水) 0:36 お礼
【19047】Re:同じような 追伸 [名前なし] 04/10/20(水) 1:08 回答
【19050】Re:同じような 追伸 ponpon 04/10/20(水) 7:55 お礼
【19042】Re:同じような 追伸 ichinose 04/10/20(水) 0:15 発言
【19043】Re:同じような 追伸 ponpon 04/10/20(水) 0:18 発言
【19044】Re:同じような 追伸 ichinose 04/10/20(水) 0:24 回答
【19046】Re:同じような 追伸 ponpon 04/10/20(水) 0:45 お礼
【19048】Re:同じような 追伸 ichinose 04/10/20(水) 1:10 発言
【19049】Re:同じような 追伸 ichinose 04/10/20(水) 1:22 発言
【19051】Re:同じような 追伸 ponpon 04/10/20(水) 8:09 お礼

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