Esecuaione automatica macro



  • Esecuaione automatica macro
    di carlolomba (utente non iscritto) data: 13/01/2016 14:51:59

    Ciao a tutti,
    sto utilizzando qs codice nel foglio specifico per eseguire in automatico una macro "Workbook_SheetCalculate" al modificarsi SOLO di una o di entrambe le 2 celle riportate (c7 e b3), ma il problema è che mi esegue la macro anche quando vado a modificare altre celle nello stesso foglio ("Richiesta Calendario").
    Sto sbagliando qualcosa o c'è qualche altro sistema?
    Grazie
     
    Sub Worksheet_Change(ByVal Target As Range)
        If Cambiocal <> Sheets("Richiesta Calendario").Range("c7") Or Cambioanno <> Sheets("Richiesta Calendario").Range("b3") Then Workbook_SheetCalculate
        CambiamentoCella
    End Sub



  • di Cucù data: 13/01/2016 15:16:24

    Io farei così....
     
    Private Sub Worksheet_Change(ByVal Target As Range)
    
    	If Not Intersect(Target, Range("B3,C7")) Is Nothing Then
    
    		'le istruzione che vuoi tu
    
    	End If
    
    End Sub