Если вы хотите закрепить петлеть вместо, то вы можете использовать Кодего, котор вы вывесили в подводную лодку выступать с иничиативой, но вы не хотите x + 1, вы хотите x:
1: 2: 3: 4: 5: 6: 7: 8:
Приватное Sub UserForm_Initialize () Тусклый x как длиной С Me.DaysOfSupply Для x = от 1 до 100 .AddItem x Следующий x Конец с Подводная лодка конца