Moderatori: Anthony47, Flash30005
=SOMMA(CONTA.SE(A1:E1;MATR.TRASPOSTA($F$1:$G$1)))
=SE(SOMMA(CONTA.SE($A1:$E1;MATR.TRASPOSTA($F$1:$G$1)))=2;INDIRIZZO(RIF.RIGA(A1);CONFRONTA(F$1;$A1:$E1;0));"")
Sub TrovaA()
Application.Calculation = xlManual
UR = Range("A" & Rows.Count).End(xlUp).Row
Val1 = Range("F1").Value
Val2 = Range("G1").Value
DEV = Mid(Format(Val1, "00"), 1, 1)
For RR = 1 To UR
ContaD = 0
ContaA = 0
For CC = 1 To 5
ValA = Cells(RR, CC).Value
If ValA = Val1 Or ValA = Val2 Then ContaA = ContaA + 1
DEA = Mid(Format(ValA, "00"), 1, 1)
If DEA = DEV Then ContaD = ContaD + 1
Next CC
If ContaA = 2 And ContaD < 3 Then
Range("H" & RR).Value = "SI"
Else
'Range("H" & RR).Value = "NO"
End If
Next RR
Application.Calculation = xlCalculationAutomatic
End Sub
Flash30005 ha scritto:Comunque se si tratta di un adattamento lo si fa velocemente
=SE(E(SOMMA(CONTA.SE(A1:E1;MATR.TRASPOSTA($F$1:$G$1)))=2;SOMMA(CONTA.SE(A1:E1;MATR.TRASPOSTA($I$1:$R$1)))<3);$F$1&" - "&$G$1;"")
Torna a Applicazioni Office Windows
Excel: formula automatica per evidenziare prodotto scaduto Autore: gamma_ray |
Forum: Applicazioni Office Windows Risposte: 3 |
Salvare file excel in formato html escludendo le immagini Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 6 |
formula excel non visualizza risultato Autore: tommasog |
Forum: Applicazioni Office Windows Risposte: 6 |
Funzione CERCA ma con colonne dinamiche Autore: Paolo67met |
Forum: Applicazioni Office Windows Risposte: 2 |
Excel 2016 - Funzione SCARTO + INDIRETTO Autore: pl1957 |
Forum: Applicazioni Office Windows Risposte: 2 |
Visitano il forum: Marius44 e 41 ospiti