Risultati da 1 a 20 di 20

Discussione: Conteggio di una colonna.



  1. #1
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Conteggio di una colonna.

    Gent.mi,


    purtroppo non ci riesco ed ancora una domanda puerile e mi scuso.


    In una colonna L7:L20 desidero conoscere le righe che al momento vengono occupate, ho usato

    il seguente codice:


    Public Cella As Long
    Cella = Foglio1.Range("L" & Rows.Count).End(xlUp).Row


    mi funziona ed il conteggio è errato in quando conta anche le celle vuote precisamente da
    L1 n poi mentre gradirei che iniziasse a contare da L7.

    Ho provato a modificare il codice in:
    Cella = Foglio1.Range("L7" & Rows.Count).End(xlUp).Row
    con il risultato negativo.


    Ringrazio per il consiglio, saluto.
    Domenico.

  2. #2

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4019
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923

    Re: Conteggio di una colonna.

    Ciao,
    in base a come sono disposti i dati si potrebbero seguire diverse strade....

    una delle tante è attraverso un semplice ciclo:

    Codice: 
    Sub conta()
    Dim i As Long, Conteggio As Long
    
    
    For i = 7 To 20
        If Range("L" & i).Value <> "" Then
            Conteggio = Conteggio + 1
        End If
    Next i
    
    
    End Sub

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  3. #3
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mo Cromagno,


    ringrazio della gentilezza e tempestività.

    In linea di massima funziona, riscontro un problema che nel pomeriggio cercherò di
    risolvere diversamente sarò costretto ad allegare il file per un graditissimo aiuto.


    Domenico.

  4. #4
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mi,


    sono rammaricato, purtroppo non riesco superare due ostacoli.
    Il primo riguardo al conteggio dell'inserimento che non è graduale ed al secondo non riesco
    a popolare le TextBox su Trova inserendo una sola parola.


    Ringrazio
    Domenico.
    File Allegati File Allegati

  5. #5
    L'avatar di tanimon
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    _
    Messaggi
    258
    Versione Office
    Excel 2007
    Likes ricevuti
    36
    Likes dati
    4

    Re: Conteggio di una colonna.

    Citazione Originariamente Scritto da Pacifico437 Visualizza Messaggio
    ed al secondo non riesco a popolare le TextBox su Trova inserendo una sola parola.
    per questo credo sia meglio una combobox.
    a 1 o 2 colonne? (nome e prodotto)


    ma il Trova deve trovare il nome o il prodotto?
    e quando lo ha trovato, cosa deve fare?
    Fermarsi sul trovato, o fare altro.....
    Excel 2007 win7 - Ogni Progetto è composto da Micro Progetti: PRIMA risolvi quelli, e PRIMA raggiungi il completamento del Progetto!
    Domanda: "Come avranno fatto gli utilizzatori di Excel VBA, quando non esisteva il registratore di macro?"

  6. #6
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.ma tanimon,


    ringrazio dell'attenzione e mi scuso del ritardo.

    Al momento sembra di aver risolto il problema del conteggio delle celle usando il seguente
    codice:
    =CONTA.VALORI(L$7:L$30)
    e a Sub Conteggio il seguente codice:
    riga = Range ("H6").
    Per trova inserendo una parola nella TextBox Trova, mi si devono riempire le TextBox (Nome
    e Prodotto) ed indicare alla label il corrispondente numero.
    Al momento è sufficiente questo che successivamente con ulteriori pulsanti dovrei poter
    modificare sia il nome che il prodotto o eliminarli.

    Cordialmente saluto.
    Domenico.

  7. #7
    L'avatar di ggratis
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Lecce - Pisa
    Età
    45
    Messaggi
    737
    Versione Office
    Excel 2010
    Likes ricevuti
    257
    Likes dati
    215

    Re: Conteggio di una colonna.

    Citazione Originariamente Scritto da Pacifico437 Visualizza Messaggio
    Gent.mi,
    ...al secondo non riesco a popolare le TextBox su Trova inserendo una sola parola.
    .
    ...non ho capito proprio bene cosa intendi, ... forse questo ?

    Codice: 
    Private Sub Cmd_Trova_Click()
    
    
    If Txt_Trova = "" Then
    MsgBox "Inserire un elemento"
    Exit Sub
    End If
    
    
    Sheets("foglio1").Range("L:M").Find(Txt_Trova).Select
    
    
    
    
    End Sub

  8. #8
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mo ggratis,


    ringrazio della gentilezza e scusa se non sono stato chiaro.
    Gradirei per es. inserendo nella textBox Trova la lettera M, nelle textBox Nome e TextBox
    Prodotto dovrebbero apparire: mario - ortaggi e alla label che sia inserito il num. 4.


    saluto.
    Domenico.

  9. #9
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mi,


    per correttezza desidero comunicare che ho risolto anche questo ostacolo.


    Ringrazio per il supporto, con cordialità saluto.
    Domenico.

  10. #10
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    72
    Messaggi
    1111
    Versione Office
    2010
    Likes ricevuti
    143
    Likes dati
    1

    Re: Conteggio di una colonna.

    il forum dovrebbe essere utilizzato non solo per prendere ma anche per dare, quindi perché con divulgare la soluzione a cui sei arrivato ?

  11. #11
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mo Patel,


    invio anche se non completato di ulteriori pulsanti (modifica, annullamento, stampa), il
    file anche che su trova avrei gradito fare la ricerca anche con la prima lettera.
    Le mie capacità al momento sono scarse e devo accontentare.
    Naturalmente devo riconoscere e ringraziare che sono arrivato alla conclusione grazie al
    Vostro supporto ed alla rete.
    con cordialità saluto.
    Domenico.
    File Allegati File Allegati

  12. #12
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    72
    Messaggi
    1111
    Versione Office
    2010
    Likes ricevuti
    143
    Likes dati
    1

    Re: Conteggio di una colonna.

    prova questa modifica
    Codice: 
    Private Sub Cmd_Trova_Click()
    
    If Txt_Trova = "" Then
    MsgBox "Inserire un elemento", vbInformation, "Rubrica"
    Txt_Trova = ""
    Txt_Nome.SetFocus
    End If
    
    Sheets("foglio1").Select
    Call conteggio
    riga = Foglio1.Range("L7:L" & uRiga).Find(Txt_Trova.Text, LookAt:=xlPart).Row
    Txt_Nome.Value = Foglio1.Range("L" & riga).Value
    Txt_Prodotto.Value = Foglio1.Range("M" & riga).Value
    
    Label1.Caption = "Record " & riga - iRiga + 1 & " di " & Foglio1.Range("H6").Value
    
    End Sub

  13. #13
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mo Patel,


    dalle prove, purtroppo non funziona infatti se inserisco: la R la ricerca cade su FRANCO-

    ANIMALI e non su ROSA-FRUTTA come pure con la C la ricerca cade su FRANCO-ANIMALI e non su
    CARLO-ELETTRICO.
    Noto ora che inserendo una lettera non in elenco va in errore e dovrei inserire un
    messaggio che avvisa che la parola o lettera non esiste.


    Ringrazio della gentilezza e saluto.
    Domenico.

  14. #14
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    72
    Messaggi
    1111
    Versione Office
    2010
    Likes ricevuti
    143
    Likes dati
    1

    Re: Conteggio di una colonna.

    Codice: 
    Private Sub Cmd_Trova_Click()
    Dim cell As Range, lt As Integer
    lt = Len(Txt_Trova.Text)
    If Txt_Trova = "" Then
      MsgBox "Inserire un elemento", vbInformation, "Rubrica"
      Txt_Trova = ""
      Txt_Nome.SetFocus
    End If
    
    Sheets("foglio1").Select
    Call conteggio
    For Each cell In Foglio1.Range("L7:L" & uRiga)
      If Left(cell.Text, lt) = Left(Txt_Trova.Text, lt) Then
        Txt_Nome.Value = cell.Text
        Txt_Prodotto.Value = cell.Offset(0, 1).Text
        riga = cell.Row
        Exit For
      End If
    Next
    Label1.Caption = "Record " & riga - iRiga + 1 & " di " & Foglio1.Range("H6").Value
    
    End Sub

  15. #15
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mo Patel,


    ringrazio al momento funziona egregiamente ed approfitto per chiedere se è possibile
    un'informazione su una modifica che facesti su un altro progettino.
    Realizzai un calendario su UserForm con CommandButton e facesti la modifica per avere la
    data odierna evidenziata con un colore che funziona.
    Per provare, realizzai anche il calendario con ToogleButton inserendo la stessa modifica
    per evidenziare la data odierna che non funziona.
    Gradirei sapere gentilmente se la modifica può funzionare ad entrambi sistemi.


    Nuovamente ringrazio e saluto.
    Domenico.

  16. #16
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    72
    Messaggi
    1111
    Versione Office
    2010
    Likes ricevuti
    143
    Likes dati
    1

    Re: Conteggio di una colonna.

    sono di poco più giovane di te, ciononostante non ricordo, puoi fornire il link ?

  17. #17
    L'avatar di ggratis
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Lecce - Pisa
    Età
    45
    Messaggi
    737
    Versione Office
    Excel 2010
    Likes ricevuti
    257
    Likes dati
    215

    Re: Conteggio di una colonna.

    Citazione Originariamente Scritto da ggratis Visualizza Messaggio
    ...non ho capito proprio bene cosa intendi, ... forse questo ?

    Codice: 
    Private Sub Cmd_Trova_Click()
    
    
    If Txt_Trova = "" Then
    MsgBox "Inserire un elemento"
    Exit Sub
    End If
    
    
    Sheets("foglio1").Range("L:M").Find(Txt_Trova).Select
    
    
    
    
    End Sub
    con il medodo .find trovi soltanto il primo valore se in colonna sono più d'uno non lo ritrovi...
    dai un'occhiata qui ...

    https://msdn.microsoft.com/en-us/lib.../ff196143.aspx

  18. #18
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mo Patel,


    non ho parola come ringraziare per la disponibilità e gentilezza.
    Caro Patel ritengo che alla nostra età, tra tante cose, due sono importanti: la salute e la
    mente che sia sempre in esercizio.
    Invio il file dove si evince che pur inserendo la modifica del colore sulla data odierna
    non funziona.
    Domenico.
    File Allegati File Allegati

  19. #19
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    72
    Messaggi
    1111
    Versione Office
    2010
    Likes ricevuti
    143
    Likes dati
    1

    Re: Conteggio di una colonna.

    ti ho risposto nella discussione del calendario

  20. #20
    L'avatar di Pacifico437
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Bari
    Età
    80
    Messaggi
    335
    Versione Office
    Office 2010
    Likes ricevuti
    1

    Re: Conteggio di una colonna.

    Gent.mo Patel


    ringrazio della modifica funziona anche se i mesi successivi è evidenziato il giorno in fin
    dei conti non ha importanza.
    Grazie ed auguro un buon proseguimento di giornata.


    Domenico.

Discussioni Simili

  1. conteggio straordinario
    Di antonacidani nel forum Domande su Excel in generale
    Risposte: 1
    Ultimo Messaggio: 22/01/17, 21:57
  2. [Risolto] Conteggio turni
    Di Red65 nel forum Domande su Excel in generale
    Risposte: 10
    Ultimo Messaggio: 05/01/17, 22:57
  3. Conteggio Km
    Di claudiopsr nel forum Domande su Excel in generale
    Risposte: 3
    Ultimo Messaggio: 10/01/16, 17:56
  4. conteggio parole 2
    Di cesare nel forum Domande su Excel in generale
    Risposte: 4
    Ultimo Messaggio: 05/10/15, 20:07
  5. conteggio parole
    Di cesare nel forum Domande su Excel in generale
    Risposte: 7
    Ultimo Messaggio: 05/10/15, 15:18

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •