| 
    
     |  | ▼ichinose さん: 
 おはようございます
 kumasanです
 昨晩は、変数の値が簡単に引き継がれたので「よかった」ということで
 そのままにしていました
 
 後で、ichinoseさんの言われている下記の点について
 勉強します
 助かります
 
 ありがとうございました。
 
 
 >こんばんは。
 >
 >> module側のTOPに記載することでうまくいきました
 >一番問題の多い解決方法を選択されたような気がしますよ!!
 >
 >標準モジュール側(module1)に
 >Public hikitugi as string
 >sub XXX()
 >  msgbox hikitugi
 >End sub
 >
 >
 >Useform1のモジュール内(Commandbutton1があるとして)で
 >
 >Private Sub CommandButton1_Click()
 >  hikitugi = "aaa"
 >  Module1.xxx
 >End Sub
 >
 >などとすれば、コマンドボタンのクリックで確かに aaaと表示されるでしょうが・・。
 >
 >モジュール間やプロシジャー間の結合度が強いものになってしまい
 >柔軟性に欠いた構造になってしまいます。
 >
 >この場合なら、パラメータを使ってデータを渡すのが一般的です。
 >
 >
 >標準モジュール側(module1)に
 >
 >sub XXX(hikitugi as string)
 >  msgbox hikitugi
 >End sub
 >
 >
 >Useform1のモジュール内(Commandbutton1があるとして)で
 >
 >Private Sub CommandButton1_Click()
 >  dim 引き継ぎ as string
 >  引き継ぎ = "aaa"
 >  Module1.xxx 引き継ぎ
 >End Sub
 >
 >
 >以前に
 >
 >www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=28808;id=excel
 >
 >こんな投稿をさせてもらったことがありました。
 >検討してみてください。
 
 |  |