ComboBox - Loop

Hello Excel VBA experts,

I have a simple question for you.

I want to create a Refresh Command Button where when the user clicks on it, it refreshes all comboboxs of the listfillrange.

So far, I have a code that works if i were to specify the combobox numbers.

With Sheets("Sheet1")
    .ComboBox1.ListFillRange = "Approver"
    .ComboBox2.ListFillRange = "Approver"
...
...
...
   .ComboBox100.ListFillRange = "Approver"
End With

However, when I try to do a For Next to it, it doesn't work. Below is what I have

For x = 1 To 100

    With Sheets("Sheet1")
    .ComboBox& x.ListFillRange = "Approver"
    End With

Next x

Could experts like you please help me.

Thanks!