Formula equivalente ma più veloce.

[Statix]

Ciao ricky53,
un altro sforzo ,
guardi che sono diverse ore che ci provo,
ma proprio non riesco alcune si altre no,

[ricky53]

Ciao,
tra un po' devo uscire e ...

Hai provato quella che ti ho inviato?

[Statix]

si è ok e ti ringrazio

[ricky53]

Ciao,
ultima e poi devo scappare

Codice: Seleziona tutto

Cells(6 + I, "DZ").FormulaLocal = "=SE(CONTA.NUMERI(AB" & 6 + I & ":AD" & 6 + I & ")=1;$AB" & 6 + I & ";"""")"

[Statix]

caspita hai messo proprio quella che c'ero riuscito
me ne manca ancora 1
pian piano imparerò anche questa sintassi

Codice: Seleziona tutto

Cells(6 + I, "DZ").FormulaLocal = "=Se(Conta.numeri(DU" & (6 + I) & ":DV" & (6 + I) & ")=1 ;$L" & 6 + I & ";"""")"

[ricky53]

Ciao,
consiglio: copia la tua formula e ad ogni "6" devi inserire "&" e il "+ I" e poi finisci con "&".
Devi fare solo attenzioni ai doppi apici che se devono essere scritti devi metterne uno di inizio ed un altro di fine oltre a quello/i che vuoi ci siano nella formula.

Complicato da scrivere ma facile da fare.

[Statix]

ok ma questa non mi va proprio

Codice: Seleziona tutto

Cells(6 + I, "DW").FormulaLocal = "=Se($DU" & (6 + I & ")= """""&";"""";Conta.se($D" & (7 + I) & ":H" & (6 + I + (L" & (6 + I) &")&";$D$2);(L" & (6 + I))"

[Statix]

ci sono quasi
c'è un errore in fondo alla formula che non riesco a sistemare è quel L"&(6+I) che forse sbaglio,
mi sa che stasera non connetto.

Codice: Seleziona tutto

 Cells(6 + I, "DW").FormulaLocal = "=Se($DU" & (6 + I) & " = """";"""";Conta.se($D" & (7 + I) & ":$H" &(6 + I + L" & (6 + I) & ";$D$2))"

[Anthony47]

Scusa, ma che formula vuoi inserire in DW6 (e sottostanti)?

[Statix]

Ciao Anthony47,
la formula è questa

Codice: Seleziona tutto

=SE($DU6="";"";CONTA.SE(INDIRETTO("D"& RIF.RIGA()+1 & ":" & "H" & RIF.RIGA()+$L6);D$2))

in colonna DW
inoltre ti volevo chiede per quanto riguarda la tua macro dove hai messo UR mi sembra che c'è qualcosa che non va,
se potevi ricontrollare, grazie.

[Anthony47]

Vorrei quella semplice semplice, tipo =Se(A6>22;conta.se(F6:F33;CC6);""), perche' mi vuoi complicare la vita??

[Anthony47]

Oopps...
Non arrivando una risposta sono andato a rileggere quello che avevi scritto, che era esattamente quello che chiedevo...

Potresti fare cosi':
prima metti in una variabile il contenuto di L6, e poi lo usi nella formula; esempio

Codice: Seleziona tutto

myL6 = Range("L6").Value
'...
Cells(6 + I, "DW").FormulaLocal = "=se($DU" & (6 + I) & "="""";"""";Conta.se(D" & (6 + I + 1) & ":H" & (6 + I + myL6) & ";D$2))"


Ciao

[Anthony47]

NO! (avevo letto erroneamente L$6); lascia stare quanto detto prima...
Forse questa:

Codice: Seleziona tutto

Cells(6 + I, "DW").FormulaLocal = _
    "=se($DU" & (6 + I) & "="""";"""";Conta.se(D" & (6 + I + 1) & ":H" & (6 + I + Cells(6 + I, "L").Value) & ";D$2))"

[Statix]

Ciao Anthony47,
ho provato la formula ma non è precisa,
comunque ho un altro problema aggiungendo nella macro
altre formule perfettamente funzionanti,

le prime 5 formule vengono scritte anche fino in fondo(UR)
mentre le altre 5 la macro non me le scrive fino all'ultima riga,

[Anthony47]

Hai provato la seconda versione, vero?
In che cosa nion e' precisa? es "mi aspettavo che la formula fosse ....... , perche' ...., e invece mi ha messo ......"

Per quanto riguarda il problema aggiuntivo, forse dovresti allegare la macro che usi e spiegare quali sono le formule che non vengono inserite fino a UR.

Ciao

[Statix]

Ok la seconda va bene,
credo che l'altro problema sia questa formula,e da modificare la L

Codice: Seleziona tutto

Cells(6 + I, "DU").FormulaLocal = "=SE($L" & (6 + I) & ">=myI4;"""";SE(CONTA.SE($D" & (6 + I) & ":$H" & (6 + I) & " ;$A$2)=1;$L" & (6 + I) & ";""""))"

la L non deve essere incrementata da I

Codice: Seleziona tutto

=SE($L6>=$I$4;"";SE(CONTA.SE(D6:H6;$A$2)=1;$L6;""))

[Anthony47]

Forse

Codice: Seleziona tutto

Cells(6 + I, "DU").FormulaLocal = "=SE($L" & (6 + I) & ">=" & myI4 & ";"""";SE(CONTA.SE($D" & (6 + I) & ":$H" & (6 + I) & " ;$A$2)=1;$L" & (6 + I) & ";""""))"


[Statix]

non va ho lo stesso problema,hai postato la mia stessa formula
come detto prima i valori della L6 :L6000 devono rimanere inalterati se in L345 ho 5 e la condizione è falsa mi deve dare 5

Codice: Seleziona tutto

=SE(L6>=$I$4;"";SE(CONTA.SE(D6:H6;$A$2)=1;L6;""))

[Anthony47]

Ignora la proposta fatta prima.
Hai scritto che volevi =SE($L6>=$I$4;"";SE(CONTA.SE(D6:H6;$A$2)=1;$L6;"")); che significa "la L non deve essere incrementata da I"? vuol dire che vuoi la formula =SE($L$6>=$I$4;"";SE(CONTA.SE(D6:H6;$A$2)=1;$L$6;"")) ??

Non ho invece decodificato "il valore della L6 deve rimanere inalterato se ho 5 e la condizione è falsa mi deve dare 5": che vuoi dire?

[Statix]

allora in
L6 =8
L7=9
L8=22
e cosi per tutta la colonna ,quindi in colonna L:L non ho valori fissi,
ma rispettata la condizione della formula mi deve dare il valore di L
ho messo un altra condizione, puo servire in seguito

Codice: Seleziona tutto

=SE(O(L6>=$I$4;L6="");"";SE(CONTA.SE(D6:H6;$A$2)=1;L6;""))