napisał: AlterNative
postów: 2
 umieszczony:
18 lipca 2008
15:29
|
|
Dziękuję bardzo.
Pozdrawiam |
|
|
napisał: LAnd
postów: 107
umieszczony:
8 lipca 2008
20:46
 edytowany:
8 lipca 2008
20:48
|
|
ten przykład wysłałem na inne forum
może Ci pokazać podstawy programowego tworzenia tabel przestawnych
Cytat: Set PvtSh = DataSh 'wskazanie arkusza na tabelę
'utworzenie pustej tabeli
DataSh.PivotTableWizard xlDatabase, ListaDanych, PvtSh.Cells(3, "G")
aby utworzyć tabelę w nowym arkuszu wystarczy zmienić pierwszy wiersz cytowanego kodu na
Set PvtSh = ThisWorkbook.WorkSheets.Add
a
PvtSh.Cells(3, "G")
na np.
PvtSh.Cells(3, "A") |
|
|
napisał: AlterNative
postów: 2
umieszczony:
1 lipca 2008
12:22
|
|
Witam
Jestem to nowy i dopiero się uczę tworzenia makr, więc z góry proszę o wyrozumiałość. :)
A oto pytanie:
Chciałbym stworzyć makro, które będzie tworzyło tabelę przestawną z różnych danych w różnych plikach, a nie tylko
z pliku "dane" i zakresie "R1C1:R13928C9":
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"'dane'!R1C1:R13928C9").CreatePivotTable _
TableDestination:="", TableName:="Tabela przestawna3", DefaultVersion:= _
xlPivotTableVersion10
Dodam tylko, że struktura danych (liczba kolumn, nazwy, itd...) będzie zawsze taka sama, nazwę pliku też można zachować, ale zawsze będzie różna liczba wierszy, czyli zakres.
Jak zrobić by makro działało na aktualnie otwartym arkuszu, bez względu na nazwę i zakres danych?
Pozdrawiam |
|
|
 wstecz 1 dalej  wszystkich stron: 1
|
tabela przestawna makro tworzace.zip