locked
evento click do botão.. RRS feed

  • Pergunta

  • 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

    segunda-feira, 23 de outubro de 2006 19:51

Todas as Respostas

  • 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,

    segunda-feira, 23 de outubro de 2006 20:11
  • Basta declarar a varivavel na área de Declarações Genéricas (Topo do Módulo)

     

    Dim i As Integer
        

    terça-feira, 24 de outubro de 2006 11:33