Excel Contador automático na inputbox

[Rafael nunes da silva]

Olá boa noite, 

possuo uma planilha de estoque na qual itens são inseridos através de uma inputbox. 

Essa inputbox contem dois textbox, onde são informados pallet e item, juntamente com 1 botão para inserir e outro para remover. 

Gostaria de saber um código para exibir um contador automático nesse inputbox, dos itens que forem sendo inseridos no campo item, e ao fechar e abrir novamente a inputbox esse contador seja zerado e comece novamente a contagem conforme vá sendo digitado novos itens.

 

Deixei no anexo um exemplo da inputbox que estou usando, na qual o colega @Vics aqui do forum me auxiliou.

 

Se alguém puder me ajudar agradeço desde já.

INPUTBOX.rar

[Midori]

@Rafael nunes da silva  Declare a variável Contador publicamente no formulário e no Initialize inicie o controle assim,

 

Dim Contador As Integer

Private Sub UserForm_Initialize()
    Contador = 1
    TextBox_Pallet.Text = Contador
End Sub

 

Aí no Click do botão é só incrementar a variável,

 

Private Sub Button_Inserir_Click()

    ...

    Contador = Contador + 1
    TextBox_Pallet.Text = Contador
    TextBox_Item.SetFocus
End Sub

 

Você também pode desabilitar o Textbox do contador para impedir a digitação.

[Rafael nunes da silva]

@Midori funcionou certinho, muito obrigado pela ajuda