Fatturazione Excel 2016 salvataggio PDF con numero progressivo e/o data e/o nome cliente

Question

Salve a tutti,

vorrei sapere come devo fare per creare un macro per far si che ogni volta che premo il bottone mi salvi una copia del file in PDF con numero della fattura, nome cliente, data emissione fattura.

In oltre vorrei sapere quale formula/macro devo utilizzare per far si che ogni volta che stampo/salvo il file mi venga maggiorato di 1 il numero progressivo della fattura.

Per la data utilizzo la fx =OGGI().

Grazie mille in anticipo...

Answer 1

Definisci tu il range di celle non protette da *ripulire*. Ad esempio:

Range("A1:A2, C1:C2, A9:C9").Clear

Answer 2

Considero nome cliente in A1, data in B1, numero fattura in C1, tutto nel Foglio1.

Come prima cosa creo un Nome e gli assegno il valore di 1.

Quindi copio/incollo questo in un modulo standard:

Public Sub mCompila()

    With Worksheets("Foglio1")

        .Range("B1").Value = Date

        .Range("C1").Value = [FatturaNumero]

    End With

End Sub

Public Sub Stampa()

Dim sh As Worksheet

    Dim sNomeFile As String

    Dim lng As Long

    lng = [FatturaNumero]

    Set sh = ThisWorkbook.Worksheets("Foglio1")

    With sh

        sNomeFile = Range("C1").Value & _

            .Range("A1").Value & _

            Format(.Range("B1").Value, "dd-mm-yyyy")

        .ExportAsFixedFormat Type:=xlTypePDF, _

            Filename:="C:\Prova" & sNomeFile & ".pdf", _

            Quality:=xlQualityStandard, _

            IncludeDocProperties:=True, _

            IgnorePrintAreas:=False, _

            OpenAfterPublish:=True

    End With

    ActiveWorkbook.Names.Add Name:="FatturaNumero", _

        RefersToR1C1:="=" & lng + 1

    'qui il codice che cancella i valori dalle celle

    'per preparare la nuova fattura, ad esempio

    '.Range("A3:D10").Value=""

    Set sh = Nothing

    ThisWorkbook.Save

End Sub

Poi creo due pulsanti o due tasti di scelta rapida ai quali assegno le due macro.

Con mCompila mi ritrovo il numero di fattura e la data.

Con mStampa stampo il Foglio1 e una volta salvato come pdf, automaticamente aumento di 1 il numero della fattura e cancello le celle per una nuova fattura.

Answer 3

[FatturaNumero] con le parentesi quadre, NON tonde e SENZA virgolette.

Potresti anche utilizzare un foglio nascosto ed implementare il contatore delle fatture in una cella.

Answer 4

Mi dice che c'è un errore in queste...

questa e la fattura invece...


Answer 5

ma se alcune celle sono bloccate non le cancella vero?