evento click do botão..

Question

Bom estou com um problema...

 

tenho dois botões e gostaria de usar a varial do primeiro..como fazer isso..

Private Sub CommandButton1_Click()

   

    Dim i As Integer
    
    
     
            
    For i = 1 To 5000

          If Worksheets("Plan1").Cells(i, 1).Value = "" Then
               Cells(i, 1).Value = ""
              
          Else: Worksheets("Plan1").Cells(i, 1).Value = "d"
         
          Cells(i, 1).Value = "ds"
                   
          End If
        
         

    Next i

 
End Sub

 

 

 

como consigo no evento do segundo botão usar essa variavel "i"

minha intenção e utilizar essa variavel para continuar a contagem

Answer 1

Boa tarde.

Douglas, declare a variável "fora" dos procedimentos, como demonstrado a seguir:

Private i As Integer

Private Sub CommandButton1_Click()
  'Usa o i para a contagem inicial
End Sub

Private Sub CommandButton2_Click()
  'Continua a contagem
End Sub

Atenciosamente,

Answer 2

Basta declarar a varivavel na área de Declarações Genéricas (Topo do Módulo)

 

Dim i As Integer