Torna indietro   Hardware Upgrade Forum > Software > Programmi e Utility

HONOR Pad X9 Max recensione, schermo ultra large a meno di 400 euro
HONOR Pad X9 Max recensione, schermo ultra large a meno di 400 euro
HONOR Pad X9 Max mette un pannello IPS da 13 pollici con risoluzione 2,5K e refresh a 120 Hz davanti a una batteria da 10.100 mAh e a quattro altoparlanti. Il listino parte da 399,90 euro, per un progetto molto chiaro e ambizioso: schermo ampio, buon audio e giornate lontano dalla presa, a un prezzo che non pesa sul portafoglio
Lenovo ThinkPad X1 Carbon Gen 14: il business ultraleggero si rinnova dall’interno
Lenovo ThinkPad X1 Carbon Gen 14: il business ultraleggero si rinnova dall’interno
Con la quattordicesima generazione Lenovo ridisegna il suo ThinkPad più iconico attorno al nuovo Space Frame e ai processori Intel Core Ultra Series 3. Resta sotto 1Kg, è molto più semplice da riparare e si rivolge al professionista che lavora in mobilità, con un prezzo da prodotto di vertice.
Jabra Evolve3 85: le cuffie sia per l'intrattenimento che per il lavoro
Jabra Evolve3 85: le cuffie sia per l'intrattenimento che per il lavoro
Le Jabra Evolve3 85 non sono semplicemente cuffie Bluetooth con cancellazione del rumore. Sono un dispositivo professionale pensato per chi trascorre gran parte della giornata in riunione, al telefono o davanti a un assistente basato sull'intelligenza artificiale
Tutti gli articoli Tutte le news

Vai al Forum
Discussione Chiusa
 
Strumenti
Old 09-08-2014, 22:06   #1
Latvia
Senior Member
 
Iscritto dal: Feb 2006
Città: Conegliano
Messaggi: 2857
Excel conta celle colorate

ciao,
sto cercando una macro che mi permetta di contare quante celle di un determinato colore ci sono in un determinato intervallo di celle.
Ho guardato in internet e macro ce ne sono varie, ma nessuna mi piace (=è scomoda). Le due migliori che ho trovato sono queste:
  • Function CCC(SCells As Range, TCell As Range) 'Count Cell Color
    'SCells e' l' area di celle contigue di cui si vuol verificare il colore
    'TCell e' la cella di paragone
    'USO: =CCC(SCells;TCell)
    'esempio di formula: =CCC(A1:E1,$F$1)
    '
    Application.Volatile
    TColor = TCell.Interior.ColorIndex
    For Each Cella In SCells
    If Cella.Interior.ColorIndex = TColor Then CCC = CCC + 1
    Next Cella
    End Function
  • Function CountCcolor(range_data As range, criteria As range) As Long
    Dim datax As range
    Dim xcolor As Long
    xcolor = criteria.Interior.ColorIndex
    For Each datax In range_data
    If datax.Interior.ColorIndex = xcolor Then
    CountCcolor = CountCcolor + 1
    End If
    Next datax
    End Function

In entrambe i due valori sono dati dall'intervallo e da una casella ''campione''.
- Nel primo
PRO: cliccando f9 si aggiorna
CONTRO: alla casella campione bisogna aggiungere $$
- Nel secondo
PRO: è sufficiente indicare la cella campione
CONTRO: non si aggiorna (manca evidentemente la seconda parte Application.Volatile)

Io vorrei o sistemare la prima, o completare la seconda, ma siccome di VBA non ci capisco nulla, non ci riesco. Qualcuno mi risolve il problema? spiegandomi anche velocemente il perchè dei cambiamenti fatti...
Grazie!
Latvia è offline  
Old 09-08-2014, 23:10   #2
emmedi
Senior Member
 
Iscritto dal: Dec 2000
Città: Pozzomaggiore (SS)
Messaggi: 12594
Sull'argomento esiste una discussione ufficiale:
http://www.hwupgrade.it/forum/showthread.php?t=2102242

Questa pertanto viene chiusa.

Ricordo la presenza, in cima alla sezione, dell'elenco delle discussioni ufficiali:
http://www.hwupgrade.it/forum/showthread.php?t=2172687
emmedi è offline  
 Discussione Chiusa


HONOR Pad X9 Max recensione, schermo ultra large a meno di 400 euro HONOR Pad X9 Max recensione, schermo ultra large...
Lenovo ThinkPad X1 Carbon Gen 14: il business ultraleggero si rinnova dall’interno Lenovo ThinkPad X1 Carbon Gen 14: il business ul...
Jabra Evolve3 85: le cuffie sia per l'intrattenimento che per il lavoro Jabra Evolve3 85: le cuffie sia per l'intratteni...
MSI PRO MAX EDGE AI+, Ryzen AI Max+ 395 e 128 GB per far girare in locale anche i modelli più grandi MSI PRO MAX EDGE AI+, Ryzen AI Max+ 395 e 128 GB...
Recensione vivo X500 Pro Max: la fotografia mobile ha un nuovo protagonista Recensione vivo X500 Pro Max: la fotografia mobi...
Elon Musk conferma la fine del Cybertruc...
CrowdStrike acquisisce Fiddler: nasce Fa...
QNAP ES2486AFdc, storage all-flash e sup...
GTA 6, il preload svela i dettagli tecni...
OPPO non si ferma: ufficializzato l'arri...
No, questo non è il nuovo Registro di si...
Ritardi nell'Entry/Exit System europeo, ...
CMF Speaker S: piccolo, originale e con ...
Red Hat mette gli agenti IA al lavoro su...
Claude può sognare: l’IA di Anthropic ri...
Xiaomi Pad 7 12GB/256GB a 324,96€ su Ali...
Fox chiude l'acquisizione di Roku da 22 ...
Recensione vivo X Fold6: quando smartpho...
Xiaomi attacca l'Europa: proseguono i pr...
Toshiba Canvio Basics da 4TB a soli 81€ ...
Chromium
GPU-Z
OCCT
LibreOffice Portable
Opera One Portable
Opera One 106
CCleaner Portable
CCleaner Standard
Cpu-Z
Driver NVIDIA GeForce 546.65 WHQL
SmartFTP
Trillian
Google Chrome Portable
Google Chrome 120
VirtualBox
Tutti gli articoli Tutte le news Tutti i download

Strumenti

Regole
Non Puoi aprire nuove discussioni
Non Puoi rispondere ai messaggi
Non Puoi allegare file
Non Puoi modificare i tuoi messaggi

Il codice vB è On
Le Faccine sono On
Il codice [IMG] è On
Il codice HTML è Off
Vai al Forum


Tutti gli orari sono GMT +1. Ora sono le: 20:20.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Served by www3v