Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Formula o Macro

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

Formula o Macro

Postdi Lucio Peruggini » 21/11/14 15:56

Ciao a tutti

Avrei un ultimo processo da automatizzare con formula nel foglio ormai già conosciuto (Determinati su Bari).

Nell’immagine allegata (riga 5 colonne T:DE) con formula seguente di ninai

=MATR.SOMMA.PRODOTTO(($D$8:$D$25000=T$4)*($J$8:$J$25000>0))

e formattazione condizionale, o colorato di giallo le celle corrispondenti ai numeri che in T4:DE4 risultano essere > di 0 con riferimento alla colonna “J”.

https://dl.dropboxusercontent.com/u/182 ... 20DET..PNG

Desidererei scrivere in N1:R5 i primi 25 numeri (da sinistra verso destra) riga 5 laddove in riga 6, le celle non sono colorate.
Essi, nella colonna “J” sono tutti quelli < di 0.

Nell’immagine ne intravediamo nove, se serve il foglio l’ho inserisco.

Ciao e GRAZIE MOLTE
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 890
Iscritto il: 24/01/11 16:23

Sponsor
 

Re: Formula o Macro

Postdi Lucio Peruggini » 21/11/14 19:54

Forse, se più pratico, ed è ancora meglio; ci sarebbe un’alternativa che è quella di prendere in considerazione tutto il range della colonna “D” (D5:D25000) e colorare con formattazione i numeri che, in “J5:J25000” sono negativi <di 1.
Fa eccezione lo “0” che diventa parte integrante con i negativi di “J”.

Ciao
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 890
Iscritto il: 24/01/11 16:23

Re: Formula o Macro

Postdi Lucio Peruggini » 21/11/14 20:13

MI CORREGGO!

Ho provato a registrare una macro per ottenere l'intento; non va bene!
Se fattibile, si possono colorare i numeri nel range descritto ma facendo sempre riferimento alla riga 4 che nella 5 non è colorata in giallo; T5:DE5.

Spero di non avere incasinato la spiegazione.
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 890
Iscritto il: 24/01/11 16:23

Re: Formula o Macro

Postdi Anthony47 » 22/11/14 02:41

Avrei un ultimo processo da automatizzare
"Penultimo", vero? :lol:
Spero di non avere incasinato la spiegazione
No, stai tranquillo: nebbiosa era e nebbiosa e' rimasta… :D
Potrebbe servire questa macro?
Codice: Seleziona tutto
Sub bbohh()
Dim UnA As Range, CntTot As Long
mycalc = Application.Calculation
Application.Calculation = xlCalculationManual
'
For Each UnA In Range("T4").Resize(1, 90)
    If Application.Evaluate("sumproduct(--(D8:D25000=" & UnA.Value & "),--(J8:J25000>0))") = 0 Then
        y = Int(CntTot / 5): x = CntTot - y * 5
        Range("N1").Offset(y, x).Value = UnA.Value
        CntTot = CntTot + 1
        If CntTot >= 25 Then Exit For
    End If
Next UnA
Application.Calculation = mycalc
Beep
End Sub

Essa traduce in pratica quel che ho capito della prima descrizione; cioe'
-esamina i numeri da T4 verso destra
-i primi 25 tra quelli che si trovano in colonna D ma mai con un valore superiore a 0 in colonna J vengono posizionati nella matrice N1:R5.
Il colore in riga 5 viene ignorato (essendo prodotto da una formattazione condizionale non puo' essere sondato).

Le altre due descrizioni ho cercato di capirle, poi ho deciso che non erano fondamentali.

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Formula o Macro

Postdi Lucio Peruggini » 22/11/14 12:55

"Penultimo", vero?


Spero proprio di si!

GRAZIE ANCHE PER QUESTO penultimo intervento; sei un GRANDE capoccione!!!

Buona giornata, ciao.
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 890
Iscritto il: 24/01/11 16:23

Re: Formula o Macro

Postdi Lucio Peruggini » 22/11/14 23:35

No, stai tranquillo: nebbiosa era e nebbiosa e' rimasta…


Ciao Anthony, nel rileggerti mi risolleva un pochino il morale; sto ridendo da solo :)

Ma se era nebbiosa come l'hai fatta, al buio? Naturalmente scherzo; grazie ancora.

Ciao e buona Domenica a te e tutto il forum.
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 890
Iscritto il: 24/01/11 16:23


Torna a Applicazioni Office Windows


Topic correlati a "Formula o Macro":


Chi c’è in linea

Visitano il forum: Nessuno e 28 ospiti