|
Login
  • Page:
  • 1

TOPIC: Totale escludendo campi vuoti

Totale escludendo campi vuoti 2 years 10 months ago #10710

Buongiorno Ragazzi,
vi allego un file con una macro che avevo creato grazie al vostro aiuto ma non restituisce completamente il risultato sperato.

Presumo che per voi che sapete usare bene excel sarà una cavolata sistemarlo e vi ringrazio in anticipo.

Come potrete vedere il file contiene diversi sheet con categorie diverse e un elenco di quantità associate a prezzi (semplicemente prezzo unitario per quantità e totale in fondo)

Alla fine trovate lo sheet TOTALE che raggruppa tutte le categorie, quello che non funziona è che il TOTALE dovrebbe ESCLUDERE i campi vuoi (con quantità 0 e quindi conseguente prezzo totale 0) ma non lo fa.

Vi ringrazio per l'attenzione


File Attachment:

File Name: PIPELINE_LISTAMATERIALE_NENE.xlsm
File Size: 101 KB
The administrator has disabled public write access.

Totale escludendo campi vuoti 2 years 10 months ago #10711

  • Marius44
  • Marius44's Avatar
  • OFFLINE
  • Gold Boarder
  • Posts: 185
  • Thank you received: 38
  • Karma: 14
Ciao
il tuo problema (e di molti altri) è usare le "celle unite"! Purtroppo, spesso, VBA non le gradisce.

Sostituisci il DO UNTIL ... LOOP col codice seguente
    Do Until ActiveCell.Row = 1
        If ActiveCell.Count = 1 Then                    '<=== riga aggiunta
            If Cells(ActiveCell.Row, 5).Value = 0 Then  '<==riga modificata
                ActiveCell.EntireRow.Delete
            End If
        End If                                          '<=== riga aggiunta
        ActiveCell.Offset(-1, 0).Select
    Loop

In altre parole ho detto a Excel di "guardare" il valore della colonna E (la 5)

Prova e fai sapere. Ciao,
Mario
The administrator has disabled public write access.
  • Page:
  • 1
Time to create page: 2.580 seconds