ehmm
buongiorno
è da tanto che non partecipo, per problemi familiari e di lavoro
ed è da tanto che non uso excel, ci ho perso anche la mano.
come ben ricordate, sono un niubbo con difficoltà a capire le cose.
vediamo un pò..
tu dici
templare77 ha scritto:Salve amici,
vorrei sapere se c'è un modo per determinare se in una cella, "scatti" per così dire la formattazione condizionale impostata a priori.
Cioè se ho una semplice cella che deve diventare rossa nel momento in cui, i valori in essa contenuti siano compresi fra 10 e 20, vorrei sapere se tramite VBA posso "accorgermi", se la formattazione condizionale è stata applicata (e quindi lo sfondo diventa rosso) oppure no.
In rete ho trovato unqualcosa che però non funziona in quanto restituisce sempre Errore 2015
- Codice: Seleziona tutto
Sub test()
Debug.Print Evaluate(Foglio1.Range("A1").FormatConditions.Item(1).Formula1)
End Sub
grazie
ma se ho capito bene, quanto ti ha suggerito Anthony47 mi sembra corretto
- Codice: Seleziona tutto
Sub test()
Dim ICol1, ICol2
'
ICol1 = Foglio2.Range("A1").Interior.Color
ICol2 = Foglio2.Range("A1").DisplayFormat.Interior.Color
Debug.Print ICol1 <> ICol2
End Sub
insomma, se tu vuoi sapere, ad esempio, se la cella 1 del foglio 1 (dico tanto per) varia di colore (non che colore abbia usato) beh..
magari inserendola nel codice del foglio, in change, ad esempio:
- Codice: Seleziona tutto
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ICol1, ICol2
If Target.Address = "$A$1" Then
ICol1 = Foglio1.Range("A1").Interior.Color
ICol2 = Foglio1.Range("A1").DisplayFormat.Interior.Color
MsgBox ICol1 <> ICol2
End If
End Sub
ti darà falso se la variazione sulla cella A1 non ha sorbito variazioni di colore, vero se lo ha fatto.
questo partendo dai presupposti:
1) che tu abbia XL2010 o superiore
2) che non vi siano più formattazioni condizionali sulla stessa cella (nel qual caso dovresti invece risalire al colore)
3) ultima ma non meno importante, che
io ci abbia capito qualcosa