Dim stockList As VariantDim stockPrices As CollectionDim currentStockIndex As Integer‘ User Form CodePrivate Sub UserForm_Initialize() [...]