Risultati da 1 a 6 di 6

Discussione: formattazione condizionale



  1. #1
    L'avatar di FB17
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    TV
    Messaggi
    13
    Versione Office
    Office 2010
    Likes ricevuti
    0
    Likes dati
    0

    formattazione condizionale

    Un saluto a tutti,
    sono alla ricerca di una soluzione al seguente problema.
    Ho un file composto di circa 30 fogli aventi tutti la stessa struttura. L'intervallo di celle A1:A10 di ogni foglio ha una formattazione condizionale legata ad una formula (sempre la stessa). Solo alla fine del lavoro mi sono reso conto di un errore nella formula.
    Domanda: è possibile correggere la formula in tutti i fogli con un unico intervento o devo agire foglio per foglio?
    Grazie per l'aiuto.

  2. #2

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2808
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    979
    tramite VBA:
    Codice: 
    Sub CambiaFormattazioneCondizionale()
    Dim Fgl As Worksheet
    
    
    For Each Fgl In Worksheets
        With Fgl.Range("A1:A10")
            .FormatConditions.Add _
                Type:=xlCellValue, _
                Operator:=xlGreater, _
                Formula1:="=10"
            .FormatConditions(1).Interior.Color = 255
        End With
    Next
    End Sub
    visto che non hai allegato alcun file ho creato questa formattazione condizionale che cambia lo sfondo rosso se il valore della cella è >10
    adatta il colore e il criterio alle tue esigenze

  3. #3
    L'avatar di rollis13
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Cordenons
    Messaggi
    815
    Versione Office
    2016 64bit
    Likes ricevuti
    147
    Likes dati
    53
    @Rubik72, visto che deve aggiornare la vecchia FC, non è che torna utile inserire un Cells.FormatConditions.Delete dopo il With ?

  4. #4

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2808
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    979
    Esatto, mi era sfuggito. Rimedio subito

    Codice: 
    Sub CambiaFormattazioneCondizionale()
    Dim Fgl As Worksheet
    
    
    For Each Fgl In Worksheets
        With Fgl.Range("A1:A10")
            .FormatConditions.Delete '<=== Nuova riga
            .FormatConditions.Add _
                Type:=xlCellValue, _
                Operator:=xlGreater, _
                Formula1:="=10"
            .FormatConditions(1).Interior.Color = 255
        End With
    Next
    End Sub
    Grazie @Rollis13

  5. I seguenti 3 utenti hanno dato un "Like" a Rubik72 per questo post:


  6. #5
    L'avatar di FB17
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    TV
    Messaggi
    13
    Versione Office
    Office 2010
    Likes ricevuti
    0
    Likes dati
    0
    Grazie. Ho adattato il codice e funziona ok.

  7. #6

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2808
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    979
    Se hai risolto segnala la discussione come [Risolto]

    Inviato dal mio GT-I9301I utilizzando Tapatalk

Discussioni Simili

  1. Formattazione condizionale
    Di totorom1 nel forum Domande su Excel in generale
    Risposte: 11
    Ultimo Messaggio: 29/12/16, 18:20
  2. [Risolto] Formattazione Condizionale
    Di Ulfang89 nel forum Domande su Excel in generale
    Risposte: 5
    Ultimo Messaggio: 11/12/16, 11:25
  3. [Risolto] formattazione condizionale
    Di para siempre nel forum Domande su Excel in generale
    Risposte: 10
    Ultimo Messaggio: 03/12/16, 19:01
  4. Formattazione condizionale
    Di nick0573 nel forum Domande su Excel in generale
    Risposte: 5
    Ultimo Messaggio: 07/02/16, 15:39
  5. Formattazione condizionale
    Di nick0573 nel forum Domande su Excel in generale
    Risposte: 28
    Ultimo Messaggio: 25/11/15, 14:59

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •