Excel VBA質問箱 IV

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

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


44246 / 76732 ←次へ | 前へ→

【37507】Re:同じようなコードをまとめる
お礼  HIRO  - 06/5/9(火) 21:23 -

引用なし
パスワード
   ▼ichinose さん:

ichinose さん有り難うございます。

>変数を使ってうまくいかなかったのか
>記述するようにしてください。

変数の使い方が悪く、そのコントロールはサポートしてません
と出てしまいました。

Dim FRM as Variant
If UF1.visible = True Then
FRM = UF1



With FRM
  .T1----
  .T2----

といった感じで、コードはそのままでWithのところを変数にすれば
同じコードを何度も書かずに済むかと思っていましたが、
無理なようでした。

>状況説明を詳細に記述すれば、
>この辺りもすっきりするかもしれませんよ!!

別なシートにデータを入力するときに入力の項目が多少違うので
それぞれのユーザーフォームを用意しました。
しかしながら、その入力項目の内容が同じものである部分を
リストボックスやコンボボックスから選択する点を共通に
しようとしたものです。


売掛→ 品名 単価 数量 販売日
買掛→ 品名 単価 数量 仕入日 支払日 支払先

たとえばカレンダーを起動して日付の入力をしようとするとき
起動しているユーザーフォームに日付が入るようにしたい。
そのように考えた訳です。

>UF1、UF2と処理を分けずに記述できそうなんです。
>(そうしないと将来、例えばUF3、UF4、UF5なんて出てきた場合、
>似たようなコードの記述を繰り返すことになりますよね?)

この点は最初に考えまして、−−−−−−結論はこれ以上
ユーザーフォームを増やさない。−−−だと良いのですが??
その時に対処できるように考え、このような質問をさせていただきました。


丁寧なご回答有り難うございました。
0 hits

【37469】同じようなコードをまとめる HIRO 06/5/8(月) 22:01 質問
【37474】Re:同じようなコードをまとめる ichinose 06/5/9(火) 8:32 発言
【37477】Re:同じようなコードをまとめる Jaka 06/5/9(火) 11:33 発言
【37510】Re:同じようなコードをまとめる HIRO 06/5/9(火) 21:35 お礼
【37507】Re:同じようなコードをまとめる HIRO 06/5/9(火) 21:23 お礼
【37521】Re:同じようなコードをまとめる ichinose 06/5/9(火) 22:41 発言
【37534】Re:同じようなコードをまとめる HIRO 06/5/10(水) 20:30 お礼

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