|    | 
     ▼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 
> 
>こんな投稿をさせてもらったことがありました。 
>検討してみてください。 
 
 | 
     
    
   |