Niepotrzebnie zmieniasz Application.ScreenUpdating wewnątrz funkcji Transfer i DeleteEmptyRows. W All spróbuj dodać Application.Calculation = xlCalculationManual na początku i Application.Calculation = xlCalculationAutomatic na końcu. Która z tych funkcji zajmuje dużo czasu - Transfer czy Delete? I o jakiej ilości danych mowa?
Hmm No można i tak, ale chyba lepiej tak...
Tak odwołanie bezwzględne ale zliczane na podstawie pól ((WIERSZ()-2) / 49) * 5. Przejdź do swojego pliku, usuń wiersze od 49 w dół (ten drugi formularz) zmień formuły według tego co napisałem, zaznacz formularz łącznie z 49 wierszem i przeciągnij w dół.
Witaj Przytrzymanie klawisza Ctrl, można zauważyć kursor po komórce w wierszach, dla którego konieczne Etykiety. Następnie kliknij przycisk OK.
[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Column = 5 Then nw = Sheets("Logistyka").Cells(Rows.Count, "A").End(xlUp).Row + 1 If nw = 2 Then nw = 1 w = Target.Row Range(Cells(w, 1), Cells(w, 5)).Copy Sheets("Logistyka").Cells(nw, 1).PasteSpecial xlPasteValues End If End Sub [/syntax] Kod na tyle prosty,...
Czy uruchomiłeś kod w pliku z załącznika, czy w swoim skoroszycie? Jeśli w swoim skoroszycie, to czy dodałeś arkusz o nazwie "Ostatni"? Te komunikaty wskazują, że ze skoroszytu próbuje się usunąć wszystkie arkusze. Wtedy przy usuwaniu ostatniego pojawiają się takie komunikaty.
Funkcja Wyszukaj.pionowo() z zerem jako ostatni argument.
Jeśli bez makr, to można wspomóc się wierszami pomocniczymi. W moim przykładzie 2-ma. Formuły, poza 1-szym wierszem, są "kopiowalne". Warunek: posortowane kolumny A:B
Ok :) Rozumiem i ja. Ale to chwilę potrwa. Tym bardziej że muszę troche popracowąć żeby mnie z pracy nie wyrzucili.
Widzę, że nie bardzo lubisz makra ;) a wystarczy: 1. makro z WorkbookOpen powtórzyć przy WorksheetActivate (aktualizacja listy Combobox''a). 2. Usunąć instrukcje warunkowe dot. producenta Listę kolorów modyfikujesz w arkuszu "Opcje". Musi być "ciurkiem" (bez dziur). Edit 20:17 - zmieniłem załącznik (Clear brakowało przy Activate)
W takim razie spakuj i wystaw tutaj.
Jeżeli wprowadzisz odpowiednią kolumnę pomocniczą w arkuszu głównym :spoko: to pożądany efekt można uzyskać formułami jak na zrzucie 927750 Całość w załączniku. 927751
Długo nikt nie odpowiada, więc chyba coś tu nie jest jasne. Excel może działać (upraszczając nieco) poprzez formuły lub poprzez makra. Formuły nie mogą niczego przenosić, mogą jedynie "kopiować", a ściślej zwracać wynik tam, gdzie wcześniej wpisano formułę, pozostawiając dane źródłowe bez zmiany. Formuły działają automatycznie, przeliczają się same,...
W kodzie arkusza [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 1 Then Target.Resize(, 2).Interior.Color = vbRed Sheets("Arkusz2").Cells(Rows.Count, 1).End(xlUp).Resize(, 2).Offset(1) = Target.Resize(, 2).Value Cancel = True End If End Sub[/syntax]
Excel'owska :) Zakładając, że lista (może być z "dziurami") jest w A1:A1000 [syntax=n]=ADR.POŚR("A"&SUMA.ILOCZYN...
W kolejnych arkuszach pojawiają się dane dla dwóch pierwszych klientów. No pewnie, że tak będzie, bo tak to opisałeś. Domyślam się, że chodzi o przenoszenie do arkusza klienta, kolumny A z 'Target' i kolumnę klienta... [syntax=vb]Sub ArkuszeKlientow() Application.DisplayAlerts = False Dim Klient As String ok = Sheets("Target").Cells(1, Columns.Count).End(xlToLeft).Column...
To chyba nie przejdzie. Transponuj obraca jedynie zakres. Formułami można Np w taki (załącznik) sposób (nie jestem pewien, czy zgadza się układ wejściowy).
Najprościej byłoby z wykorzystaniem kolumn pomocniczych (załącznik) P.S. Formuły są "kopiowalne" w pionie i w poziomie, nie będzie więc problemu z kolejnymi (w przykładzie) miastami.
proszę o jakieś wskazówki. Moim zdaniem jeśli wprowadzisz oznaczenia D1 i D2, oraz przetransponujesz swój grafik do drugiego arkusza :idea: to uzyskasz nową oczekiwaną tabelę poprzez najprostsze, "przeciągalne" formuły :D 1067824 1067825
W załączniku.
wpisuję kolejno w 1a imię 1b nazwisko 1c nr tel Zawsze w tej samej komórce?(wiersz 1) Dodano po 16 w kodzie arkuszu (dane wprowadzone ) [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) Dim rekord As Range, baza As Range Set rekord = Range("A1:C1") Set baza = ActiveSheet.Next.Cells If Intersect(Target, rekord) Is Nothing Then Exit Sub...
chodzi o to, żeby z 1 i 2 (i innych których nie ma we wzorze) arkusza z danej kolumny konkretnego pracownika na ostatni arkusz przenosiły się w osobną tablkę Jeżeli posiadasz Excela powyżej wersji 10 :?: to tego typu efekt jak na zrzucie 1047238 możesz uzyskać poprzez utworzenie tabelki połączonej (łącza z danymi z tabelek "kierunkowych" np w ukrytym...
Przy korzystaniu z Power Query dokument WZ nie może być jeden ,muszą być zawsze kolejne WZ a Power Query tylko wyciąga z nich przydatne informacje i tworzy tabele
Moja propozycja - kod do umieszczenia w module arkusza: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column > 2 Or Target.Value = "" Then Exit Sub Select Case Target.Column Case 1 Call UtworzFolder(Target.Value) Case 2 If Target.Offset(0, -1).Value <> "" Then Call PrzeniesFolder(Target.Offset(0, -1).Value)...
to o czym piszesz to dla mnie czarna magia Jaka tam czarna. Sprawa jest dość prosta i spokojnie obędzie się bez różdżki, szklanej kuli, czy czapki Merlina :) Makro najpierw sortuje, następnie zmienia wartości na tekst w kolumnie D. Przycisk po prawej służy tylko testom. Pozostaje sformatowanie gotowej tabelki (można dopisać stosowną procedurę). Pewnie...
Jakie polecilibyście rozwiązanie problemu? Podobny temat. https://www.elektroda.pl/rtvforum/topic3...
No to znowu jest kilka możliwości, można zrobić trochę kodu, który przeleci przez te komórki i jak spotka to, co am spotkać, to dopisze w jakimś arkuszu kolejny wiersz (rekord), jeżeli lista tych nazwisk jest stała to można też ich wszystkich przepisać do arkusza zbiorczego, który potratujemy autofiltrem (rozwiązanie prostsze, nie wymaga programowania).
Moim osobistym zdaniem - VBA w Wordzie jest mało przyjazne i intuicyjne. Jeżeli już - to kod w VBA i przenoszenie do odpowiednich zakładek w Wordzie. A na pewno formularz musi być w Wordzie? Nie da się zrobić tego finalnego formularza również w Excelu?
Dzień dobry, Chciałabym przenosić przefiltrowane dane z kilku arkuszy do jednego. Tak jak w załączonym pliku, chcę aby z arkusza1, arkusza2 i arkusza3 przenosiły się odpowiednio osoby, przedmiot zamówienia i stan zamówienia, ale tylko dla wybranych osób (Zosia, Jakub, Maciej). Czy jest to wykonalne? Jeśli tak, to czy istnieje możliwość aktualizacji...
Zrobiłem tabele przestawną, jednak nie wiedziałem jak ją automatycznie odświeżać. Dzięki za pomoc. Czy są jakieś fora etc., w których można znaleźć gotowe przykłady do różnych zastosowań?
Witam Próbuję dane z excel - z różnych arkuszy przenieść do WORD. Znalazłam wątek "Makro zapis danych z EXcel do Word" (Niestety wątek jest zamknięty więc zakładam nowy. ) W wspomnianym wątku zamieszczono bardzo przydatny wzór - w załączniku. Jeśli uruchamiam makro z oryginalnego pliku działa bez zarzutu. Jednak przeniesienie fragmentu kodu nie skutkuje...
Arkusz zbiera bezpośrednio dane pomiarowe z urządzenia. Zbieranie danych w programie zewnetrzym i export do excela jest rozwiązaniem mniej korzystnym, niż wstawienie danych do konkretnej komórki wskazanej przez użytkownika.
Jeżeli chodzi o przenoszenie formatowania to excel właściwie nie ma żadnych funkcji. Można to zrobić jedynie poprzez makro (VBA) lub "pisaniną" poprzez formatowanie warunkowe i to w excelu 2007 i powyżej, bo niższe mogą mieć tylko max 3 warunki. Ten kto zna jako-tako programowanie w VAB może sobie poradzić. Ten kto nie ma pojęcia na początku upadnie,...
Cześć, Mam problem z doszlifowaniem makra, którego zadaniem jest przeniesienie wyfiltrowanych danych do jednego zbiorczego arkusza. Mam już makro, które działa bez zarzutów i zrzuca mi informacje do jednego zbiorczego pliku. Brakuje mi jednak funkcjonalności, która przy wywoływaniu komendy scal pliki w jedno, pobierze te dane, o które ją poproszę. Chodzi...
Niestety potrzebuję aby nazwy "zakończonych" pozycji znajdowały się dokładnie w kolumnie A i aby we wtorek w kolumnie A znajdowały się wszystkie zakończone do końca poniedziałku, w środę wszystkie zakończone od poniedziałku do końca wtorku, w czwartek w kolumnie A miały by się znaleźć wszystkie zakończone od poniedziałku do końca środy itp.
Nie wiem... To makro na Excel2003 już 11 tysięcy wierszy zrobić. Baza w 65 tysięcy, wszystkich formuł złożonych formuł w bazie danych?
Gorzej z sprzętem Tak samo prosta formuła :D jak widać na zrzucie "Suma luty X", "Y", "Z" :please: Policz na "piechotę" i porównaj :?: Bo ze względu na złe formatowanie Twój arkusz nie będzie tego dobrze liczył :cry:
Jeżeli to są funkcje excela (nie makro) to: Skopiuj (nie przenoś) skoroszyt B do katalogu gdzie jest skoroszyt A. Otwórz tylko skoroszyt A "Wejdź" w formułę gdzie jest odwołanie do skoroszytu B (będzie się jeszcze odwoływać do starej lokalizacji skoroszytu B) Skopiuj ścieżkę (zaznacz w formule ścieżkę do pliku B i Ctrl+C ) "Wyjdź" z komórki i zaznacz...
Witam. Mam pytanie, czy dysponuje ktoś makrem lub byłby w stanie napisać * lub doradzić jak napisać makro , które pozwoliłoby kopiować zakres danych do skoroszytu głównego. Oczywiście wszystkie inne skoroszyty są "kopią" tego głównego. Interesuje mnie taka sytuacja. Ktoś pracuje na pliku 1.xlsx w skład którego wchodzą powiedzmy 2 arkusze ( arkusz1 oraz...
Wprowadziłem zabezpieczenie żebyś dwa razy nie wprowadził tej samej umowy zarówno poprzez wprowadź jak i poprzez dodaj. Eliminuje przypadkowe powtórne naciśnięcie przycisku. Na marginesie na forum jak jesteś wdzięczny to wciskasz pod daną wypowiedzią "pomógł". :)
Witam potrzebuję pomocy w stworzeniu makra w Excelu 2007. Potrzebuję kodu który przepisze wiersze do nowego arkusza po spełnieniu poniższych kryterium: Zakres analizowania: Od wiersza 12 kolumna B Do wiersza 111 kolumna P Makro: jeżeli w arkuszu nr 1 w kolumnie P z zakresu wierszy od P12:P111 znajdzie się wartość większą (różna) od „0” (wynik...
Ostatecznie odpuściłem to sobie. Znalezienie rozwiązania zabrało mi zbyt wiele czasu.
Witam serdecznie, chciałbym napisać makro do excela, może ktoś mi pomoże z tematem A mianowicie: gotowy arkusz z uzupełnionymi danymi chciałbym zapisać w nowym pliku (sam chce wpisywać nazwę tego pliku. Nowy plik a arkuszem powinien wyglądać tak samo z tym, że kilka komórek ma być skopiowanych w inne miejsca a część usunięta do nowej edycji. Być może...
Hmm... Można się uprzeć przy formułach, ale wyjdzie "ciut" przydługawa ;) W załączniku przykład dla trzech kolumn. Zasada jest prosta, więc uzupełnienie nie powinno stanowić problemu.
Jego przeznaczeniem jest użytkowanie przez bardzo amatorską osobę Już podpowiadam. Dla w/w osoby: "4D, 5D, 5N, 29N" ; "4d ,5d ,5n ,29n" ; "4D,5D,5N,29N" ; "4D. 5D. 5N .29N" w zasadzie wygląda tak samo. O pomyleniu literki, bo przecież można się pomylić, nawet nie wspomnę. Jeśli 15 razy dziennie nie chcesz słyszeć: "Panie kefler! Ten pana program znowu...
Witam, Chciałbym ułatwić sobie pracę w excelu i wpadłem na pomysł aby stworzyć coś na wzór automatycznego wyszukiwania interesujących mnie pozycji i przenoszenie np do oddzielnego arkusza lub usuwanie zbędnych komórek. Co dokładnie robię ? Musze przygotowywać refaktury dla drugiej firmy tym samym muszę pobrać załącznik w excelu gdzie mam wszystkie pozycje...
Wszystko ma być zrobione w USER FORM Załącz plik z tym formularzem i przykładowymi danymi do odfiltrowania/wyszukania. Trudno wyczuć, czy najpierw filtrujesz listBox, czy kopiujesz "w locie" po... no właśnie otwiera się okno do wpisania wyszukiwanego tekstu
Dzień dobry, Niezbyt to jasne. Czym różnią się te 2 arkusze? Na jakiej zasadzie miałyby być uwzględniane te zmiany, czy chodzi o powiązanie funkcjami, czy o dosłowną kopię? Czy te arkusze są tam na stałe, czy są okresowo przenoszone gdzie indziej? Czy poszczególne wiersze (pracownicy) są zawsze w obu arkuszach w tym samym miejscu, czy mogą być w różnych...
Mam dziwny problem podczas pracy w programie EXCEL. Pracuję często na wielu otwartych plikach, kilkoarkuszowych. No i najczęściej jest tak, że wpisuję któreś z kolei dane do komórki i ku mojemu zdziwieniu (w sumie to już mnie to przestało dziwić) po zatwierdzeniu przyciskiem Enter, nagle zostaje przeniesiony do innego pliku. No i po takiej akcji, po...
Hmmm, Poradziłem sobie następująco, natomiast nie wychodzi mi zaszywanie dodatkowego warunku w tym kodzie. Obecnie makro przegląda arkusz źródłowy wyszukując jednego sprzedawcy (Agnieszka). Natomiast jak próbuję wcisnąć tam kolejną pętlę, aby wyszukał "Andrzej" i przeniósł wiersze do Arkusz3, "Basia" - do Arkusz4, "Iza" do Arkusz 5 itp, polecenie i...
excel przenoszenie danych przenoszenie makra excel excel makro przenoszenie
bosch produkcja polska listwy isostat lambda katalizatorem
diagnoza płyty głównej laptopa diagnoza płyty głównej laptopa
Demontaż prawej lampy Audi A6 1998: krok po kroku Światła awaryjne nie działają w Citroen C4 Picasso 2007