Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 73125 Skopiuj do schowka Makro - Grupowanie tabeli przestawnej
Autor Wiadomość
irnet 
Starszy Forumowicz


Posty: 42
Wysłany: 20-07-2022, 12:58   Makro - Grupowanie tabeli przestawnej

Dzień dobry,
Nie mogę sobie poradzić z makrem którę będzie grupować dane w tabeli przestawnej na podstawie danych z komórek
Zarejestrowałem makro i chciałem go przerobić ale poległem
Cytat:
Sub Makro_tabela_przestawna()

Range("E1").Select
Selection.Copy
Selection.Group Start:=0, End:=5, By:=1
Range("E2").Select
Selection.Copy
Selection.Group Start:=0, End:=20, By:=1
Range("E3").Select
Selection.Copy
Selection.Group Start:=0, End:=20, By:=3

End Sub

W załączniku przesyłam zrzut jak to miałoby działać

Proszę o pomoc, dziękuje

Pozdrawiam, Irek

makro grupowanie tp.JPG
Plik ściągnięto 5 raz(y) 36.79 KB

ID posta: 419034 Skopiuj do schowka
 
 
umiejead 
Excel Expert


Wersja: Win Office 2013
Pomógł: 976 razy
Posty: 5298
Wysłany: 20-07-2022, 13:01   

Cytat:
Nie mogę sobie poradzić z makrem

Pokaż to makro.
.
_________________
.
Jak poprawnie opisać problem: http://www.excelforum.pl/...ika-vt59262.htm
Chcesz precyzyjną odpowiedź - zadaj precyzyjne pytanie.
ID posta: 419035 Skopiuj do schowka
 
 
irnet 
Starszy Forumowicz


Posty: 42
Wysłany: 21-07-2022, 05:16   

Cytat:
Sub Makro_tabela_przestawna()

Range("E1").Select
Selection.Copy
Selection.Group Start:=0, End:=5, By:=1
Range("E2").Select
Selection.Copy
Selection.Group Start:=0, End:=20, By:=1
Range("E3").Select
Selection.Copy
Selection.Group Start:=0, End:=20, By:=3

End Sub

Takie mi makro wyszło przy rejestracji makra.
Próbowałem zmieniać Start:=0, End:=5, By:=1 , ale działa to tylko jako "stała" cyfra a nie pobierana z konkretnej komórki

Pozdrawiam, Irek
ID posta: 419046 Skopiuj do schowka
 
 
ple4
Stały bywalec Excelforum


Wersja: Win Office 2003
Pomógł: 61 razy
Posty: 286
Wysłany: 21-07-2022, 10:40   

A jakiejś przykłady tabeloidalnej w pliku xls nie zamieścisz ?
ID posta: 419052 Skopiuj do schowka
 
 
irnet 
Starszy Forumowicz


Posty: 42
Wysłany: 22-07-2022, 09:43   

Sorry, faktycznie plik więcej pokaże w czym mam problem i ułatwi rozwiązanie moje problemu
Przesyłam plik w załączniku

grupowanie_makro.xlsm
Pobierz Plik ściągnięto 11 raz(y) 151.01 KB

ID posta: 419070 Skopiuj do schowka
 
 
xfish 
Excel Expert



Wersja: Win Office 2013
Pomógł: 722 razy
Posty: 2130
Wysłany: 22-07-2022, 10:51   

Kod:
Sub Makro_tabela_przestawna()

Range("E2").Select
Selection.Group Start:=Range("J1"), End:=Range("J2"), By:=Range("J3")

End Sub
_________________
Pozdrawiam xFish
ID posta: 419071 Skopiuj do schowka
 
 
irnet 
Starszy Forumowicz


Posty: 42
Wysłany: 22-07-2022, 13:06   

Dziękuje bardzo za pomoc :beer
To co jest proste zawsze przysparza problemów ;-)
ID posta: 419075 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.wip.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe