Funzione conta valori

Hai un problema con Excel?

Funzione conta valori di Laura - molto incavolata

Ciao ragazzi ho visionato il vostro sito e' devo dire che lo trovo molto interessante.
a tal proposito ho un problemino che mi fa incavolare al quanto
nel foglio excel in una macro
inserisco la funzione range("b1").select
activecell.formular1c1 = "=counta(rc[-1]:r[4]c[-1])" ossia mi inserisce in b1 la funziona che conta nell'intervallo delle celle a1 a5 le celle piene
la stessa cosa la ottengo se in b1 inserisco manualmente la funzione = conta.valori(a1:a6)
la mia domanda e ' questa ragazzi:
se tramite una macro io voglio fare la stessa cosa ossia
range ("b1").select
activecell.value = "=conta.valori(a1:a6)"
mi appare nella cella b1 ...#nome?
ma se clicco poi nella cella lui esegue la funzione
si puo' far si che nell'ultimo esempio che ho fatto io inserisca la funzione come vi ho descritto (tramite macro) ed ottenga il valore della funzione??

Registratore di macro di Apoben64

Usa il registratore di macro , semplicemente crei una macro, di solito ti dà in automatico il nome macro 1, ti posizioni dove vuoi inserire la formula , la digiti e poi chiudi la registrazione. con alt+f8 selezioni macro1, modifica e ottieni il tuo codice .
un saluto luca

Per apoben di Laura

Caro apoben l'ho fatto
infattinel mio messaggio faccio riferimento alla formula activecell.formular1c1 = "=counta(rc[-1]:r[4]c[-1])" che e' quello che ottengo dalla registrazione della macro ma io il mio come ho descritto nel messaggio e' diverso

fa caldo ! di Apoben64

Cara laura, si sente il caldo e come si sente !!!! .
la tua spiegazione è stata molto prolissa , e quindi non subito si può capire se hai fatto uso del registratore di macro o no . activecell.formula.... si usa anche senza.
peraltro la funzione che devi usare è conta.numeri che diventa così come scritto sotto.
un saluto luca

Sub Laura()
ActiveCell.FormulaR1C1 = "=count(RC[-1]:R[5]C[-1])"
Range("B1").Select
   
End Sub

Funzione conta valori di laura - molto incavolata di Patrik

Ciao laura, prova così :

with range("b1")
.formulalocal = "=conta.valori(a1:a5)"
.value = .value
end with

postami se ti soddisfa.
by, patrizio

Per patrick di Laura

Funziona, era .formulalocal che mancava
ti ringrazio
p.s. un ringraziamento ancge a luca

Vuoi approfondire questo argomento?