| 
    
     |  | ▼Abebobo さん: UserFormには
 Private Sub UserForm_Initialize()
 
 データ表示
 
 End Sub
 データ表示とは
 
 Sub データ表示()
 
 表示行 = Cells(1, 15).Value
 
 TextBox2.Value = Cells(表示行, 1).Value
 TextBox3.Value = Cells(表示行, 3).Value
 TextBox4.Value = Cells(表示行, 5).Value
 TextBox5.Value = Cells(表示行, 7).Value
 TextBox6.Value = Cells(表示行, 8).Value
 TextBox7.Value = Cells(表示行, 9).Value
 TextBox8.Value = Cells(表示行, 10).Value
 TextBox9.Value = Cells(表示行, 11).Value
 TextBox10.Value = Cells(表示行, 12).Value
 
 ComboBox1.Value = Cells(表示行, 4).Value
 ComboBox2.Value = Cells(表示行, 6).Value
 
 If Cells(表示行, 2).Value = "大宮" Then
 optionbutton1.Value = True
 Else
 optionbutton2.Value = True
 End If
 
 End Sub
 
 Cells(1, 15).Value
 はSheet1上なのでSheet2へボタンを移動した場合は式にSheet名も
 入れないといけないということでしょうか?
 教えてください。
 
 
 
 
 |  |