ブックを開くときにコンボに値を設定(EXCEL VBA)
ThisWorkbook のソースに「開く時」イベントとして記述
Private Sub Workbook_Open()
Worksheets("明細(材料)").ComboBox1.AddItem "全表示"
Dim i As Long
For i = 1 To 35
Worksheets("明細(材料)").ComboBox1.AddItem "履歴" & i & "まで"
Next i
End Sub