Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Conta celle contenenti una data parola

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

Conta celle contenenti una data parola

Postdi calculon » 30/08/11 21:09

Ciao a tutti,
vorrei creare una macro in grado di contare il numero delle celle contenenti la parola "CASA" per poi assegnare detto risultato al ciclo:

for i = 1 to "numero celle contenenti CASA".

Grazie a quanti vorranno aiutarmi.

Ciauu
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Sponsor
 

Re: Conta celle contenenti una data parola

Postdi Flash30005 » 30/08/11 22:12

Codice: Seleziona tutto
UR = Worksheets("Foglio1").Range("A" & Rows.Count).End(xlUp).Row
Conta = 0
For RR = 1 to UR
If range("A" & RR).value = "CASA" then Conta = Conta + 1
next RR
MsgBox Conta


Potresti ottenere lo stesso risultato con una formula in una cella es.: B1
Codice: Seleziona tutto
=CONTA.SE(TuoRange;"CASA")


E poi il ciclo for...next sarà
for i = 1 to Range("B1").value


Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Conta celle contenenti una data parola

Postdi calculon » 30/08/11 23:01

Grazie mille Flash!

Ancora una cosa. Se la cella contiene la singola parola casa con la tua macro viene tranquillamente conteggiata, mentre se ad es. contiene la frase "la mia casa è grande" la parola casa viene ignorata.

Sarebbe utilissimo riuscire a recuperare anche le parole chiave contenute in una cella insieme ad altre così come ho descritto nell'esempio.


Ancora super grazie
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Re: Conta celle contenenti una data parola

Postdi Anthony47 » 30/08/11 23:47

Puoi usare nel vba la worksheetfunction.Countif, nella sintassi
Codice: Seleziona tutto
NVolte = Application.WorksheetFunction.CountIf(Range("A:A"), "*casa*")
Questa ti contera', ad esempio, sia "sono a casa" che "sono accasato", eventualmente modifica la stringa di ricerca.

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: 13894
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Conta celle contenenti una data parola

Postdi calculon » 01/09/11 17:20

Grazie ad entrambi.
La mia macro, grazie alla dritta, ha guadagnato almeno 20 secondi!!!


A prestissimo
calculon
Utente Senior
 
Post: 161
Iscritto il: 07/01/11 15:08

Re: Conta celle contenenti una data parola

Postdi Flash30005 » 01/09/11 21:00

Con altri venti arriverai primo! :lol:

Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-


Torna a Applicazioni Office Windows


Topic correlati a "Conta celle contenenti una data parola":


Chi c’è in linea

Visitano il forum: Nessuno e 8 ospiti