| 
    
     |  | ▼ちん さん: 
 Private Sub SpinButton1_Change()
 
 TextBox11.Value = SpinButton1.Value
 
 SpinButton1.Min = 1000
 SpinButton1.Max = 1000000
 SpinButton1.SmallChange = 1000
 
 End Sub
 
 Private Sub SpinButton2_Change()
 
 TextBox12.Value = SpinButton2.Value
 
 SpinButton2.Min = 1000
 SpinButton2.Max = 1000000
 SpinButton2.SmallChange = 1000
 
 End Sub
 
 ↓
 Private Sub SpinButton2_Change()
 
 TextBox22.Value = SpinButton12.Value
 
 SpinButton12.Min = 1000
 SpinButton12.Max = 1000000
 SpinButton12.SmallChange = 1000
 
 End Sub
 
 
 昨日は大変失礼いたしました
 風邪引いて寝込んでしまいまして・・・・
 
 記述まで間違っておりました
 上記のような感じです
 
 回答してくださった方々大変申し訳ございません
 宜しくお願いいたします
 
 
 |  |