Excel VBA質問箱 IV

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

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


44276 / 76732 ←次へ | 前へ→

【37477】Re:同じようなコードをまとめる
発言  Jaka  - 06/5/9(火) 11:33 -

引用なし
パスワード
   ichinose さんに付け足し
(今だに決定的な決断力が無く、止められないJaka)

例えば
ユーザーフォーム

Private Sub UserForm_Click()
 Dim FRM As Object
 Call sss(Me)
End Sub

標準モジュール

Sub sss(FRM As Object)
 With FRM
  .TextBox1.Value = 1
  .TextBox2.Value = 2
  .TextBox3.Value = 3
  .TextBox4.Value = 4
 End With
End Sub

1 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 お礼

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