Si usted quiere colocar en lugar de otro, después usted puede utilizar el código que usted fijó en el submarino de la incialización, pero usted no quiere x + 1, usted quiere x:
1: 2: 3: 4: 5: 6: 7: 8:
UserForm_Initialize secundario privado () X dévil como de largo Con Me.DaysOfSupply Para x = 1 a 100 .AddItem x X siguiente Extremo con Submarino del extremo