Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
25.04.2024 21:06:05
Duplikate entfernen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1792to1796
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1792to1796
1792to1796
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA: AKTIVE PivotTabelle ansprechen

VBA: AKTIVE PivotTabelle ansprechen
16.11.2020 15:46:23
Andrea
Hallo,
ich habe folgendes Makro aufgezeichnet:
Range("A49:B58").Select
Selection.Copy
Range("D60").Select
ActiveSheet.Paste
ActiveSheet.ActivePivotTables("PivotTable9").ConvertToFormulas True
Range("A49:B58") ist eine PivotTabelle.
Nach Ausführung der Anweisung "ActiveSheet.Paste" ist die neu eingefügte PivotTabelle bereits ausgewählt.
Bei der letzten Anweisung unterbricht das Makro bei erneuter Ausführung, da es sich dann schon nicht mehr um die PivotTable9, sondern die 10 handelt!
Wie stelle ich es an, dass in der bereits selektierten, neu eingefügten PivotTabelle die Anweisung ConvertToFormulas ausgeführt wird, ohne zu wissen, wie die die neue PivotTabelle heißt?
Danke und schöne Grüße
Andrea

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: AKTIVE PivotTabelle ansprechen
16.11.2020 17:12:28
Yal
Hallo Andrea,
"Pivottables" ist eine Collection (Auflistung). Wir können annehmen, dass neue Objekte immer als letzte Objekt hinzugefügt wird, und daher durch die Anzahl von Element in der Auflistung erreichbar ist.
Dim WS As Worksheet
Dim C As PivotTable
Set WS = ThisWorkbook.Worksheets("Tabelle4")
Set C = WS.PivotTables(WS.PivotTables.Count)
...
Viel Erfolg
Yal
AW: VBA: AKTIVE PivotTabelle ansprechen
16.11.2020 17:28:10
fcs
Hallo Andrea,
probiere es mal so: 
Sub CopyPivot_ConvertToCubeFormulas()
' Copy_Pivot Makro
' Pivot kopieren und in Cube-Formeln umwandeln.
Dim pvTab As PivotTable
Dim strPivotName As String
Range("A49").Select
Set pvTab = Selection.PivotTable
pvTab.TableRange2.Copy
Range("D60").Select
ActiveSheet.Paste
strPivotName = Selection.PivotTable.Name
Application.CutCopyMode = False
ActiveSheet.PivotTables(strPivotName).ConvertToFormulas True
End Sub
LG
Franz
Anzeige

326 Forumthreads zu ähnlichen Themen

Matrix-formel via VB-Skript in die Zelle einfügen
Wladimir

Hallo zusammen,
ich soll via VB-Skript eine
Excel-Matrix-formel in die Zelle der
geschlossenen Datei einfügen.
Ich habe die Formel entsprechend
angepasst und versuchte sie mit
FormulaArray in die Zelle einzufügen,
aber erfolglos. Es kommt die Meldung:
"Die For...
01.09.2008 12:08:24
Thread-ID: 1006391
14 Beiträge
Anzeige
Formel in Zelle per VBA einfügen
Werner

Wie kann ich Statistikformeln (Mittelwert, Maximum, Minimum, Standardabweichung) per VBA in eine Zelle einfügen?
Der zu berechnende Bereich geht von "$J$1" bis "$J$n" wobei n mit ActiveCell.Row-2 zuvor berechnet wird.
Gruß Werner.
10.09.2008 14:17:46
Thread-ID: 1008801
5 Beiträge
Leere(nur Formel drin) Zellen in Diagramm
Volker

Hallo,
ich habe ein Problem und hoffe auf Eure Hilfe!
Ich habe mit Excel2007 (wahrscheinlich besteht das Problem auch in anderen Versionen) ein Diagramm erstellt. Es werden dabei 2 Datenreihen angezeigt. Soweit so gut...
Reihe 1 bildet sich aus 10 Werten, von denen der erste Teil vo...
25.09.2008 16:11:00
Thread-ID: 1012372
6 Beiträge
Anzeige
Formel in Zellen einfügen!
Andi

Hallo zusammen,
ich würde gerne mit Hilfe eines Makros eine Formel in die die Spalte "Q" einfügen.
Die Formel soll jedoch nur in de Zellen der Spalte "Q" eingetragen werden,
wo auch ein Wert in der jeweiligen Zeile der Spalte "L" vorhanden ist.
Ich hoffe es kann mir jemand bei...
30.10.2008 21:03:30
Thread-ID: 1020721
6 Beiträge
Formelwerte in bestimmte Zellen
Sebastian

Hallo zusammen,
ich möchte gerne mit Hilfe eines Makros oder ähnlichem die Formelwerte eines bestimmten Arrays in ein bestimmtes Array eintragen lassen, wenn man darauf klickt.
Ist dies möglich? Wenn ja, wie? ;)
Vielen Dank für eure Hilfe und falls Ihr noch etwas mehr Info braucht,...
17.11.2008 21:32:00
Thread-ID: 1025413
7 Beiträge
formel in zelle,mit makro
rolf

hallo
wie kann ich diese formel =DATEDIF(E2;$F$1;"Y") mit einem makro in tabelle1 zelle f2 eintragen.
mfg rolf
25.11.2008 23:12:13
Thread-ID: 1027900
3 Beiträge
Laufzeitfehler 1004 bei Formeleinfügen in Zelle
Werner

bei folgender Formel
ActiveCell.FormulaR1C1 = "=RC[-2]*100/RC[-1]"
erhalte ich Laufzeitfehler 1004. Woran kann es liegen?
Gruß Werner.
26.11.2008 14:31:29
Thread-ID: 1028037
7 Beiträge
Formel gegen Doppelvergabe einer Zellennummer
anke2245

Hallo, Excelfreunde,
es taucht ein kleine Unwissenheit auf.
Folgendes: In einer Vereinstabelle muß ich 16 Vereinen eine Codenummer zuweisen ( Zweistellig )
also von 1- 16.
Da ich nicht das ganze Arbeitsblatt überblicken kann möchte ich, daß ich in die Eingabenzellen vorher eine...
06.12.2008 18:44:00
Thread-ID: 1030727
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
13
2
4
5
10
5
6
2
6
2
5
1
5
4
8
4
4
5
3
10
4
3
2
4
1