riprendere routine da interruzione



  • riprendere routine da interruzione
    di Axl78 (utente non iscritto) data: 09/04/2015 15:21:49

    Buongiorno,
    premesso che sono un neofita del linguaggio.
    è possibile interrompere la routine fino al verificarsi di un' evento e a quel punto fare in modo che la stessa routine riparta da dove si è interrotta?mi spiego meglio...ho una cella di verifica che se mi fornisce come risultato un numero maggiore di 1 mi compare il messaggio di allerta.
    quello che vorrei fare e che se tale cella ha un valore = 0 la routine vada avanti se invece maggiore di 0 si blocchi per darmi modo di sanare la cella con dato errato ed una volta fatto ciò possa riprendere da interruzione.
    avevo iniziato con quanto presente nel codice, ora quello che non so è come far si che il tutto riprenda dall' IF dopo la mia modifica...
    grazie
    Ale
     
    Dim a As Integer
            
        If ActiveSheet.Range("K10").Text > "0" Then
    a = MsgBox("ATTENZIONE PTF NON PRESENTE IN ESTRAZIONE AZIONARIO")
    If a = vbOK Then
    End If
    
    Exit Sub
    End If