Condividi:        

Formattazione condizionale a condizione

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Formattazione condizionale a condizione

Postdi Statix » 20/02/11 23:56

Ciao a tutti,
dovrei colorare delle celle con la formattazione condizionale,
ma ad una condizione di una cella,
esempio se in una cella J6 scrivo 12 ,
Range di partenza J8:S8
Range da formattare C5:D500
la formattazione dovrebbe avvenire da C5: D16
se scrivo 30
C5:D34
la formula di formattazione condizionale attualmente è questa ma dovrei variarla di volta in volta
Codice: Seleziona tutto
=conta.se($J$8:$S$8;C5:D16)>0
quello che mi servirebbe è cambiare quel 16
in automatico con una cella di riferimento
altra soluzione va benissimo.
intanto ci provo,
grazie
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Sponsor
 

Re: Formattazione condizionale a condizione

Postdi Statix » 21/02/11 00:42

Ok risolto con una macro ,utilizzo sola questa formattazione nel foglio,quindi non ho problemi,in quanto ad ogni lancio se ne crea 1 , ma che elimino poi con Cells.FormatConditions.Delete ,quindi se si ha più di una formattazione nel foglio questo metodo non va.
Codice: Seleziona tutto
Sub Evidenzia()
'
Dim C As Integer


C = Range("J6").Value + 4

 Range("C5" & ":G" & C).Select
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=CONTA.SE($J$8:$S$8;C5:G50)>0"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .Pattern = xlPatternRectangularGradient
        .Gradient.RectangleLeft = 0.5
        .Gradient.RectangleRight = 0.5
        .Gradient.RectangleTop = 0.5
        .Gradient.RectangleBottom = 0.5
        .Gradient.ColorStops.Clear
    End With
    With Selection.FormatConditions(1).Interior.Gradient.ColorStops.Add(0)
        .ThemeColor = xlThemeColorDark1
        .TintAndShade = 0
    End With
    With Selection.FormatConditions(1).Interior.Gradient.ColorStops.Add(1)
        .Color = 255
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False
   
    Range("A1").Select
End Sub
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Formattazione condizionale a condizione

Postdi ricky53 » 21/02/11 00:55

Ciao
prova a sostituire
C5:D16
con
C5:INDIRETTO("D" & J16 +4)
Dice il vecchio saggio provare e riprovare è l'unica strada per imparare

Più chiara è la vostra spiegazione
Più immediata sarà la nostra soluzione


. . . . . . . . . .
S.O. W10; Office 2003-10-13-16-19
Avatar utente
ricky53
Utente Senior
 
Post: 4565
Iscritto il: 11/04/09 19:29
Località: Italia

Re: Formattazione condizionale a condizione

Postdi ricky53 » 21/02/11 00:57

Ciao,
stavo facendo un'altra cosa ed ho risposto senza rileggere l'intervento e, quindi, vedere che avevi risolto.
Dice il vecchio saggio provare e riprovare è l'unica strada per imparare

Più chiara è la vostra spiegazione
Più immediata sarà la nostra soluzione


. . . . . . . . . .
S.O. W10; Office 2003-10-13-16-19
Avatar utente
ricky53
Utente Senior
 
Post: 4565
Iscritto il: 11/04/09 19:29
Località: Italia

Formattazione condizionale a condizione

Postdi raimea » 19/03/11 18:21

buon giorno a tutti.
un info su un tipo di formattaz. condizionale.
e' possibile fare una formattazione condiz su una lettera solo se e' minuscola ? :?:
cioe: colorami la cella se c'e scritto r e non R maiuscola... :!:

:roll:
grazie
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1410
Iscritto il: 11/02/10 07:33
Località: lago

Re: Formattazione condizionale a condizione

Postdi Anthony47 » 19/03/11 19:29

Tra le varie possibilita':
-La formula e'; =(CODICE(A1)=114); formato a piacere.

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Formattazione condizionale a condizione

Postdi raimea » 19/03/11 22:27

:-?
non mi funge...
=(CODICE(A1)=114);

in A1 ho scritto - r - minuscola
e suppongo che 114 la riga che voglio la format cond.
che sbaglio ?

ovviamte ho usato la formula e'

ho (offc 2003)
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1410
Iscritto il: 11/02/10 07:33
Località: lago

Re: Formattazione condizionale a condizione

Postdi gianc » 20/03/11 00:52

ciao Raimea

prova ad utilizzare questa formula come condizione perla formattazione
=CODICE(tua cella)<>CODICE(MAIUSC(tua cella))

nelcasoin cui ilrisultato di questo confronto sia falso, vuoldire che il carattereè minuscolo.
Oltretuttoin questo semplicemodo funziona conqualunque carattere
gianc
Utente Junior
 
Post: 59
Iscritto il: 19/03/11 00:51
Località: Pistoia

Formattazione condizionale a condizione

Postdi raimea » 20/03/11 09:44

ok
tutto o posto
ho usato questa format. cond.
Codice: Seleziona tutto
=CODICE(W9)<>CODICE(MAIUSC(W9))


grazie
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1410
Iscritto il: 11/02/10 07:33
Località: lago

Re: Formattazione condizionale a condizione

Postdi Anthony47 » 20/03/11 23:38

Intanto un benvenuto gianc, e grazie per i contributi che sta' fornendo in abbondanza nel forum.

La mia formula ovviamente funzionava solo per r vs R, perche' non avevo capito che trattavasi solo di un esempio, come invece ha ben colto gianc.

Alla prossima!
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Formattazione condizionale a condizione":


Chi c’è in linea

Visitano il forum: raimea e 60 ospiti