0073デフォルトの名無しさん (ワッチョイ 0623-wjSU)垢版 | 大砲2017/07/01(土) 11:30:18.64ID:5ubPuGy00 >>70 セルから値をとってるならこれでいいと思われ Dim i As Long For i = 1 To 168 If Cells(i, 1) <> "" Then ComboBox1.AddItem Cells(i, 1) End If Next