Evitare Runtime Error 1004



  • Evitare Runtime Error 1004
    di ilFonta data: 10/09/2017 17:15:54

    Salve, vi allego la seguente parte di codice che mi produce l'errore "Runtime Error 1004: application or object defined error".

    Conosco la causa dell'errore, ovvero rigMaxUt = 0

    Quella parte del programma non e' di primaria importanza e puo' essere benissimo saltata

    Ho cercato di scavalcare il problema utilizzando On Error Resume Next oppure On Error Goto label, ma il problema si ripropone.

    Sapete perche'?

    Grazie
     
    On Error Resume Next
            CumMaxEnd = Evaluate("SUM(Sheet3!" & Range(Cells(rigMaxUt, colCont), Cells(3 + numeroBande, colCont)).Address & ")")



  • di isy data: 10/09/2017 18:40:31

    Ciao

    .Address?

    Allega il file o almeno il codice completo e spiega cosa devi ottenere



  • di ilFonta data: 10/09/2017 19:40:06

    Ciao Isy, grazie per la risposta.

    Il codice e' davvero lunghissimo, mi bastava sapere perche' le istruzioni On Error Resume non mi permettono di aggirare l'ostacolo. pe ora ho risolto con queste 3 righe
     
        If rigMaxUt <> 0 Then
            CumMaxEnd = Evaluate("SUM(Sheet2!" & Range(Cells(rigMaxUt, colCont), Cells(3 + numeroBande, colCont)).Address & ")")
        End If