Principiante in difficoltà

di
myfemax
il
2 risposte
M
myfemax
Pochi posts
Iscritto da
feb, 2011
Messaggi:
1

Principiante in difficoltà

Ciao ragazzi,

sono un principiante autodidatta che cerca di sopravvivere
con VBA.

Ho fatto la seguente macro in VBA Excel


Sub ModificaDate()
'
' ModificaDateMacro
'
'
Sheets("P&L").Select
Dim DataInizio As Date
Dim DataFine As Date
DataInizio = Range("B5")
DataFine = Range("B7")
Sheets("Azioni Movimenti").Select
ActiveSheet.PivotTables("Tabella_pivot1").PivotFields("Valuta").ClearLabelFilters
ActiveSheet.PivotTables("Tabella_pivot1").PivotFields("Valuta").PivotFilters.Add _
Type:=xlDateBetween, Value1:=DataInizio, Value2:=DataFine

End Sub

Succede che la macro funzionava fino a settimana scorsa. Oggi quando ho aperto
il file per aggiornarlo mi da errore

Errore di Run Time 1004

E' stato immesso un formato data non valido. Riprovare.

Non so proprio cosa fare.

Aiuto!!

2 Risposte

  • luky1964
    luky1964
    Utente Attivo
    Iscritto da
    nov, 2009
    Messaggi:
    215

    Re: Principiante in difficoltà

    Ciao.
    Puoi allegare il file .xls...? Sarebbe più semplice... (così avremo anche le celle con contenuto e formato...).
    Saluti.
    Luciano.
  • H
    Hamnare
    Pochi posts
    Iscritto da
    giu, 2014
    Messaggi:
    1

    Re: Principiante in difficoltà

    Buongiorno a tutti

    Mi collego a questa vecchia discussione in quanto ho lo stesso problema

    Codice funzionante 
        ActiveSheet.PivotTables("Tabella_pivot4").PivotFields("cons.").ClearAllFilters
    ActiveSheet.PivotTables("Tabella_pivot4").PivotFields("cons.").PivotFilters. _
        Add Type:=xlDateBetween, Value1:="25/06/2014", Value2:="27/06/2014"
    Codice non funzionante 
        ActiveSheet.PivotTables("Tabella_pivot4").PivotFields("cons.").ClearAllFilters
    ActiveSheet.PivotTables("Tabella_pivot4").PivotFields("cons.").PivotFilters. _
        Add Type:=xlDateBetween, Value1:=["& Data1"], Value2:="27/06/2014"
    Data1 = Range("B6").Value
    Ed è una data

    Cosa sbaglio?
Devi accedere o registrarti per scrivere nel forum
2 risposte