Thema Datum  Von Nutzer Rating
Antwort
Rot Makros aufnehmen bzw. Pivottabellen per Makro einstellen
25.09.2014 11:59:05 Nico
NotSolved

Ansicht des Beitrags:
Von:
Nico
Datum:
25.09.2014 11:59:05
Views:
423
Rating: Antwort:
  Ja
Thema:
Makros aufnehmen bzw. Pivottabellen per Makro einstellen

Hallo Zusammen!

 

Ich bin noch nicht besonders lange dabei mich mit VBA in Excel auseinanderzusetzten und habe eine Frage zu der Funktion "Makros Aufnehmen".

Ich will ein kurzes Makro schreiben, dass mir eine Pivottabelle auf eine bestimmte Ausgangseinstellung setzt. Weil ich nicht wusste wie, habe ich die Einstellungen "mit der Maus gemacht" und als Makro aufgenommen um die entsprechenden Befehle dann zu übernehmen. Wenn ich aber jetzt versuche das Aufgenommene als Macro auszuführen bekomme ich eine Fehlermeldung:

Laufzeitfehler 1004:

Die PivotFields-Eigenschaft des PivotTable-Objektes kann nicht zugeordnet werden.

 

Der Aufgenommene Code ist:

 

Sub Grundeistellungen()
'
' Grundeistellungen Makro
'

'
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Tree genus"). _
        ClearAllFilters
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Genus").CurrentPage = _
        "(All)"
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Product").ClearAllFilters
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Product").CurrentPage = _
        "(All)"
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Price Unit"). _
        ClearAllFilters
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Price Unit").CurrentPage = _
        "USD/m3"
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Type of price"). _
        ClearAllFilters
    ActiveSheet.PivotTables("PivotTable1").PivotFields("Type of price"). _
        CurrentPage = "FOB"
End Sub

 

"Makros aufnehmen" ist ziemlich sinnlos wenn sie im Nachhinein nicht funktionieren, oder?


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Makros aufnehmen bzw. Pivottabellen per Makro einstellen
25.09.2014 11:59:05 Nico
NotSolved

     

nmd runner pk adidas nmd gold adidas stan smith gold adidas stan smith billig adidas superstar