Sprawdź takie makro: Cells(CC, 3).Cut zastąp linijką Cells(CC, 3).Copy . Makro działa od pierwszego wiersza, jeśli pierwszy wiersz Twojej tabeli to nagłówek, początkowe parametry CA oraz CC zmień na numer wiersza, od którego zaczynają się faktyczne dane. Makro działa do momentu napotkania pierwszej pustej komórki w kolumnie C.
Zrobiłem bez makr. Może ktoś Ci przerobi na makro. Łącze do formantu w komórce bieżącej, formatowanie niestandardowe ukrywające wpis ;;; formatowanie warunkowe określające kolor. Niestety łącza nie dają się kopiować, bo są zawsze adresami absolutnymi, nawet jeśli się je zapisze bez dolarów.
Zobacz, czy o to chodziło. Makro do kopiowania: [syntax=vbscript]Sub Kopiuj() Dim b As Worksheet Dim ow As Long Set b = Sheets(ActiveSheet.Index - 1) ow = b.Cells(Rows.Count, "A").End(xlUp).Row - 1 Dim CopyRng As Range, PasteRng As Range b.Range("A4:B" & ow).Copy ActiveSheet.Range("A4").PasteSpecial Paste:=xlPasteValues b.Range("N4:O" & ow).Copy ActiveSheet.Range("N4").PasteSpecial...
Witam, chciałabym zapytać czy macie może gotowe makro, które kopiowałoby tabelę razem z formatowaniem z jednego arkusza do drugiego. Muszę powielić taką samą tabelę w dużej liczbie arkusze i wolałabym uniknąć jej każdorazowego formatowania. Z góry dziękuję za pomoc.
Skoro chodzi o zbędne spacje wiodące to użyj USUŃ.ZBĘDNE.ODSTĘPY(), potem przekopiuj tylko formaty do wyniku funkcji i masz tak jak trzeba :) Oczywiście kopiowanie formatowania można zrobić w VBA, wystarczy nagrać sobie makro podpiąć pod skrót lub przycisk i po problemie. Tu jeszcze archiwalny temat z podobnym problemem https://www.elektroda.pl/rtvforum/topic3...
A sprawdziłeś, że nie działa? Ja nie znam specyfiki tego programu. Pliki .pdf przeglądam najczęściej w przeglądarce. Z przeglądarki kopiuje się bez formatowania.
Czy ktoś ma pomysł na to aby nie zaznaczał całych kolumn A:G tylko aby zaznaczył od komórki A4 do komórki GX Taki efekt możesz uzyskać poprzez wstawkę kodu: [syntax=vbscript]Set thisWb = ActiveWorkbook Set wksK = thisWb.Worksheets("Kosztorys") Lastrow = wksK.Cells(Rows.Count, 1).End(xlUp).Row wksK.Range("A4:G" & Lastrow).Copy[/syntax] ale efekt takiego...
Oto projekt. Początkowo Pan otworzyć i odczytać z makrami.(na otwarcie i zamknięcie książki) i poprawi stałych (bo nie mogę odgadnąć nazwy plików). Następnie skopiuj makra do prawdziwych plików Interesuje mnie jak długo potrwa pracy makro, ponieważ kopiowanie w komórki z formatowaniem (kolor, czcionki) zajmuje znacznie więcej czasu niż w komórki niesformatowany....
W prosty sposób można tylko w dodatkowej kolumnie D, w której byłby wyliczany postęp jako ułamek. W kolumnach B i C można to zrobić, ale trzeba dla każdej komórki podać osobną formułę, bo przy definiowaniu tego typu formatowania nie można używać adresów względnych, zatem nie można skutecznie kopiować komórek sformatowanych tak, aby każdy wiersz był...
Wielkie dzięki za to makro - jest świetne. Właśnie o to mi chodziło. A co należy dopisać aby makro kopiowało wiersze z formatowaniem. W niektórych komórkach mam też hiperłącza, a są kopiowane jako tekst. Jeszcze raz dziękuję za pomoc!
Po pierwsze: z którym fragmentem nagranego kodu masz problem? Po drugie: Nagraj makro kopiowania całego arkusza do nowego pliku ze zmianą jego (pliku) nazwy. Masz 100% gwarancji zachowania formatowania. Jeśli w arkuszu jest nadmiar danych można dopisać usuwanie. Jeśli jesteś początkujący, to nagrywarka jest podstawą. Przykład: To jest nagrane makro...
Jeśli chodzi o klasyczne odwołanie, to nie jest to możliwe, gdyż odwołanie zwraca tylko wartość komórki, bez formatowania. Ponadto, nawet z użyciem VBA, komórka zawierająca formułę musi być sformatowana jednolicie (to znaczy można sformatować całą komórkę, ale nie poszczególne znaki). Szkoda, że nie dałaś pliku załącznika, bo wtedy łatwiej można by...
Dziękuję za uwagi. Muszę nieco doprecyzować: nie jest konieczne użycie formatowania specjalnego, przenosi się też formatowanie walutowe. Przy okazji, formatowanie specjalne nie zostaje zachowane w swojej oryginalnej wersji, tylko komórki docelowe zostają sformatowane formatem walutowym. Zapewne Excel uznał formatowanie specjalne użyte w moim pliku za...
Może będziesz wiedział gdzie popełniam błąd i coś zasugerujesz. Podstawowa przyczyna złego formatowania to przedziwne style w Wordzie, które utworzyłeś jako listę numerowaną (dodatkowo jako numerowane cyframi rzymskimi :| ). Proponuje przeanalizować makro - działa ono w oparciu o 3 symbole wieloznaczne (np." arabskiej :idea: ), poprzez polecenie znajdź...
(at)speedy9 , w temacie napisano wyraźnie - makro. EDIT: W dalszej dyskusji podałem rozwiązania za pomocą formatowania warunkowego zaproponowanego przez (at)speedy9 ale z nieznanego mi powodu zostało to wycięte. Więc podaje tu: =ORAZ(CZY.PUSTA(1:1))... Ot tylko tyle dla wiersza 1, dalej można sobie formatowanie kopiować.
Koledzy dobrze radzą, ale to trzeba wdrażać od początku projektu. Więc na przyszłość trzeba to zaplanować inaczej. Tymczasem jednak potrzebne jest rozwiązanie doraźne, polegające na kopiowaniu tego co jest. Na razie to jest ilość danych, z którą Excel sobie poradzi, ale jak danych będzie przybywać, to kopiowanie będzie trwało coraz dłużej. Ponieważ...
Witam mam mały problem z makrem, a mianowicie chciałbym żeby to makro kopiowało tylko wartości komórek, a nie całe komórki nawet z ramką i kolorem czcionki, da się je jakoś przerobić.[syntax=vb]Option Explicit Sub CopyMultipleSelection() Dim SelAreas() As Range Dim PasteRange As Range Dim UpperLeft As Range Dim NumAreas As Integer, i As Integer Dim...
Spróbuj zamienić: [syntax=vb]Selection.PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone _ , SkipBlanks:=False, Transpose:=False[/syntax] na: [syntax=vb]Activesheet.Paste[/syntax] Sprawdź również formatowanie komórek.
Profesjonalne podejście do programowania zawsze rozdziela Dane (surowe) i Widok (coś, co je prezentuje). Implementacje tego są przeróżne, ale zasada jest fundamentalna. Excel to chciał dać mniej abstrakcyjnie, dotykalne paluchem "dana jest tam gdzie ją widać" - i to daje ogromne problemy (90% kodu excelowego na świecie to kopiowanie z miejsca na miejsce)...
Naprzemienne kolory zrealizujesz formatowaniem warunkowym. Formuła: =MOD(WIERSZ();2)=1 Co rozumiesz pod pojęciem A po kolejnym użyciu nie kopiowało nagłówka tabeli tylko wstawiało wyszukane rekordy Z nagłówkiem nie ma problemu, wystarczy sprawdzić czy jest i kopiować warunkowo (gdy nie ma). Natomiast nic nie wiadomo co to za "wyszukane rekordy".
Witam. Dokładnie o to mi chodziło , bardzo dziękuje . Tylko jeszcze jedno pytanie a dokładniej : przy kopiowaniu do pliku B, zmieniają mi się również formaty w komórkach ( na te z pliku A) czy da się skopiować tylko wartości tak aby nie zmieniać formatowania komórek w pliku B ???
Formatowanie, przy rozszerzaniu tabeli, jest automatycznie kopiowane z wiersza wyżej. Po prostu nie rób z góry określonej ilości wierszy. Alternatywnie sformatuj tabelę dopiero po jej utworzeniu.
automatycznie skopiowały się poniżej tabelki To spróbuj wykorzystać makro powiel() (uruchamiane skrótem ctrl+p ) :idea: :D z załączonego pliku. Dla pewności działania konieczne jest formatowanie ilości (Qty) jako liczby, a nie jako tekst :cry: (jak w Twoim przykładzie) :!: 1026922 1026916
Mnie te makra nie zawiesiły Excela ani razu, ale testowałem je na wersji 2007 i 2010. Być może problem jest spowodowany przez połączenie wklejania danych ze schowka z wstawianiem komórek. Jeśli formatowanie komórek nie ma znaczenia i kopiowane są stałe (tak to przynajmniej wygląda w przykładowym pliku), to może zrezygnować z kopiowania na rzecz przypisywania...
U mnie działa (oprócz kopiowania wysokości komórki z tym że tego nie ma w kodzie). Możesz podać cały komunikat błędu? Jest możliwość wciśnięcia przycisku "debug" Jeżeli tak to którą linie kodu wskazuje żółta strzałka (zaznaczenie)? Przy każdym formacie wyrzuca błąd. Jak nie formatujesz inaczej to też? A możesz jeszcze podać jak sformatowałeś komórkę?
Mam problem aby zrobić jako makro kopiowanie do dowolnej komórki wartosci z komórki formatowanej jako data i z funkcją DZIŚ. Chodzi o to że w pliku potrzebuje wstawić w jedną kolumnę (kol. C) aktualną datę (ale jeśli zrobiłbym z funkcji dziś to codziennie ta data by się aktualizowała dlatego chodzi mi tylko o wartość formuły). Zrobilem komórkę z funkcją...
Nie wiem jak Calc w Open Office "czyta" makra napisane dla Excel,a. Nagraj jakieś makro w Excelu (kopiowanie, zaznaczanie komórek, zakresów, formatowanie itp), przenieś je do Calc,a i sprawdź czy dzieje sie to, co powinno (nie mam OpenOffice, żeby sprawdzić). Ewentualnie poczekaj na kogoś bardziej zaawansowanego. -------------- Dodano po 8 chwilach....
Formatowanie w pliku wstawione jest takie, jakie będę otrzymywał z innych działów w firmie, czyli musi takie zostać.
Witam Musze przekopiować wiele pojedynczych komórek z jednego arkusza do drugiego. Kopiowanie danych musi się odbywać z zachowaniem formatowania i odniesienia do list słownikowych. Kopiowanie odbywa się po jednej komórce ponieważ makro musi być uniwersalne i pod parametry w i k, poz i kol_doc wpisywać zadane wartości. Przy poniższej operacji trwa to...
Obszar = InputBox("Podaj obszar kopiowania danych", "Obszar danych", "A1:K10") Przed petlą For
Jak musiałby wyglądać skrypt do rozróżnienia komórek z zawartością liczb / komórki z liczba z literą. Chodzi o to, że niektóre wartości liczbowe nie chcę oceniać . zastosuję wtedy wpis do komórki w postaci mieszanej np. 6/mm . Tym samym skrypt nie powinien formatować już takiej komórki. Formatować winien tylko te z zawartością liczb Inna sprawa
1. Załóż filtr w oryginalnej tabeli (niepuste) -> zaznacz całą tabelę i wtedy dopiero kopiuj dane . Może nawet lepiej wklejać "tylko wartości" niż dane z pełnym formatem każdej kopiowanej komórki. Zrobisz to w jednym ruchu zamiast korzystać z pętli (2000 razy). Po nagraniu makra można edytować zaznaczony zakres tak, żeby najlepiej nam odpowiadał. 2....
Stworzyłem (nagrałem) makro dla pierwszej tabeli (Tabela1), które będzie formatowało poszczególne kolumny. Błędne podejście do zadania :cry: Prościej będzie dopracować sobie jedną tabelkę (template), a potem kopiować całe arkusze :spoko: Na zrzucie widać wierne kopiowanie tabeli, a w załączonym pliku makro kopiuj() 952012 952013
Dziękuję bardzo, działa najogólniej tak jak myślałem - mam jeszcze propozycję kilku ulepszeń, o ile mogę prosić;-): 1) przerobienie tego kodu, żeby te utworzone skoroszyty zostały zapisane w folderze / lokalizacji liku, z którego były kopiowane 2) skoroszyt z kopią miałby 2 arkusze (przykład w załączeniu): - 1 o nazwie "dane" z tymi wykopiowanymi danymi...
Wyjaśnij dokładnie o co Ci chodzi. Czy to mają być formuły czy makro? Kiedy miałoby nastąpić to kopiowanie? Co by je wyzwalało? Gdzie dokładnie (do którego wiersza) miałyby być kopiowane te dane? Domyślam się, że chodzi o kopiowanie tylko wartości, ale nie napisałeś tego wyraźnie (dane, to nie tylko wartości, ale również formuły, formatowanie itp.)....
Np. potrójnie zagnieżdżoną pętlą For wg.schematu: For pracownik = 1 To ilePracowników (tu przydałaby się rozpiska w osobnym arkuszu np. "Pracownicy", bo gdzieś trzeba ich policzyć) For miesiac = 1 To ilość miesięcy (tu LCase(nazwa arkusza) lub indeks daje nazwę m-ca) w tej pętli obliczasz bez zerowania również Nr wiersza wynikowego dla arkusza "Wynik"....
Można szukać różnych rozwiązań, ale przede wszystkim potrzebny jest załącznik, żeby było widać jak te dane są sformatowane, czy wszystkie jednakowo (np zł czy PLN), czy są tylko te dwie waluty, czy zawsze jest wpisana waluta. Poza tym istotne jest do czego ma służyć wynik - czy tylko do oglądania, czy do jakichś dalszych obliczeń. Czy poza oznaczeniem...
Dzień dobry Zarejestrowałem proste makro, które polega na tym, że: 1. Robię duplikat arkusza. 2. W duplikacie kopiuje jedną całą kolumnę i w tym samym duplikacie wklejam ją specjalnie "tylko formatowanie" 3. W kolumnie gdzie wkleiłem samo formatowanie pisze formułę =JEŻELI(D8="Wycena indywidualna";D8;D8*$E$5) 4. Akceptuję propozycję arkusza o przeciągnięciu...
Wspominałem już o EPPlus? 1. Pobierz [url=http://epplus.codeplex.com/]stąd bibliotekę. 2. Upewnij się, że projektu w VS nie kompilujesz do wersji Client. 3. Bibliotekę EPPlus.dll dołącz przez referencję do projektu. 4. Stwórz w Excelu szablon z makrem, formatowaniem etc. 5. Kod zapisujący dane z tabeli będącej źródłem dgv do szablonu to (uwaga...) [syntax=csharp]using...
Witam. Mam plik w Excelu oraz szablon w Wordzie. Moje makro działa tak: Odpala szablon w Wordzie, aktywuje Excela, kopiuje odpowiednią komórkę, aktywuje Worda i wkleja wartość w odpowiednie miejsce. Jednak wkleja ją z takim formatowaniem jakie jest w Excelu, a ja chcę aby był to wklejony czysty tekst. W Wordzie korzysta się z: Selection.PasteAndFormat...
Z góry bardzo dziękuje za jakąkolwiek pomoc, ponieważ kombinuje już od paru miesięcy, i nie moge sobie poradzić. Z takim "arkuszem" nie poradzi sobie żadne makro. Każdy arkusz praktycznie jest inny tzn różne liczby kolumn, różne opisy, wiersze pojedyncze i dwu lub kilkuliniowe :D , formatowania komórek domyślne lub "od czapy" (np komórka D2 w arkuszu...
Cześć! Stworzyłem makro, które z arkuszy odpowiadających kolejnym dniom kopiuje z zadanych zakresów wartości i formaty komórek (kolory, formatowania warunkowe itd.) do arkusza głównego. Niestety formatowania warunkowe nie nadpisują się w głównym arkuszu i po kilkukrotnym wykonaniu tej operacji plik nie nadaje się do użytku - szybkość jego działania...
Przekreślenie jest efektem formatowania tekstu w komórce. Wyniku formuły nie można w ten sposób formatować. Pozostaje makro - nagraj przekreślenie i będzie prawie gotowe. Glównie chodzi o przypisanie tekstu i sformatowanie: Characters(Start:=1 lub 6, Length:=5).Font.Strikethrough = True lub False. Po mojemu, oprogramować należy arkusz z M/K przy Worksheet_Change.
Hej, podejrzyj kod w załączniku :) Najpierw dzieli on dane na zakładki, a potem kopiuje je do plików. Formatowanie nagłówka i stopki jest proste - wystarczy że zarejestrujesz makro ustawiając sobie nagłówek i stopkę, a potem zmodyfikujesz powstały kod wg własnych potrzeb. Z tą różnicą że zamiast fragmentu: With ActiveSheet.PageSetup [...] wstawiasz...
Czy da się to zrobić bez zamieniania obszaru na tabelę Excela? Da się, ale jest z tym więcej zachodu, a za chwilę będziesz znowu coś zmieniać i znowu będziesz pytać. Jaki masz problem z tabelą Excela? Ona jest bardzo elastyczna, jak dopisujesz wiersze, to formuły się automatycznie kopiują, można ją dowolnie formatować, nawet tak, że prawie jej nie...
Witam, poprawiłem kod, ale dalej mam błędy, mianowicie: 1. With Activesheet.UsedRange działa bez problemu 2. Columns(kW.Column).Select - tu wyrzuca mi błąd (info w komentarzy kodu makra) Czyżby to zaznaczenie nie było potrzebne, aby skopiować formatowanie z kolumny D do kolumn E, F, G. Poprawiłem źródło i kolumny docelowe kopiowania formatowania, ale...
Witam , tabela jest nazwana kierownikiem pracownika. To moje formatowania ( chyba jedyne co mi wyszło ) :) . Generalnie popełniłam błąd i makro powinno działać dla daty ukończonej , powinien powstawać nowy skoroszyt a nie arkusz. Czy jesteśmy w stanie to rozwiązać? Niestety plik wygląda w tym momemcie troche inaczej
Witam To makro realizuje kopiowanie wszystkich plików znajdujacych sie w katalogu do jedengo. Sub Merge() Dim bookList As Workbook Dim MergeObj As Object, dirObj As Object, filesObj As Object, everyObj As Object Application.ScreenUpdating = False Set MergeObj = CreateObject("Scripting.FileSystemObject... Set dirObj = MergeObj.Getfolder("C:\2014") Set...
czy da radę osiągnąć pożądane rozwiązanie przy użyciu funkcji Przy użyciu kilku formuł można uzyskać pożądany efekt 864279 Wszystkie formuły w ukrytych kolumnach J:M załączonego pliku. chciałbym aby tak jak na zaznaczonym wzorze część wartości była pogrubiona - da radę coś takiego zrobić? Oczywiście, że się da :lol: - wystarczy zrobić makro, które...
Formatowanie jest bardzo proste, to są dwa formatowania, jedno dla górnego indeksu a drugie dla dolnego indeksu. Jeśli chodzi o drugą część mojego pomysłu to chodzi o to że jeśli to formatowanie będzie już działać poprawnie to jak już wiem że po skopiowaniu danemu pracownikowi Wzoru Grafiku wszystkie komórki będą na czerwono nawet te które powinny być...
A nie prościej zrobić formatowanie warunkowe. Wówczas mamy sprawdzanie przez excela wartości i makro nie obciąża go dodatkowo...Piszę już jakiś czas makra i np jak robi się kopię dużych arkuszy, to makro jest zbyt wolne - lepiej zamiast przenoszenia Rows(A) użyć zaznaczenia i polecenia kopiuj excela wpisując formuły poprzez makro niż kopiować fizyczną...
Tak codziennie każdy pracownik w swoim arkuszu zaczyna od B4. Na koniec dnia ja to wszystko kopiuje do arkusza PH1 i arkusz ten przesyłam dalej a plik na którym pracowaliśmy beckupuje a na kolejny dzień jest kolejny plik "czysty" który zaczynają uzupełniać od nowa. Sprawdź sobie. Super o to mi chodziło, działa błyskawicznie aż nie wierzyłem że takie...
Szkoda, że nie chcesz załączyć przykładowego pliku, bo w ten sposób zmniejszasz swoje szanse na uzyskanie optymalnej pomocy, a potencjalnych pomagających zmuszasz do wypytywania o wszystkie szczegóły. Z tego co teraz napisałeś zrozumiałem, że arkusz "Generator cen" zawiera jakieś formuły, które mają być użyte do przeliczenia danych z arkusza "301" i...
Pewnie można, ale to już dłuższa historia... :) Najprościej - jeżeli plik-źródło jest w tej samej lokacji - wstawić kwerendę wybierającą dane (Dane->Importuj dane zewnętrzne->Nowa kwerenda bazy danych, wybrać Excel Files * i OK, wskazać plik-źródło (można zaznaczyć "Tylko do odczytu"), a dalej z kreatora" wybrać zakładkę, rozwinąć ją krzyżykiem, wybrać...
PRL: nie ukrywam, że moja wiedza na tym etapie się kończy, stąd moja prośba o pomoc w dopasowaniu skryptu do mojej tabelki. Chciałbym, żeby kopiowały się całe wiersze zachowaniem formatowania (scalenia itp)
Są zdefiniowane. Procedura polega na kopiowaniu z jednego pliku danych zawartych w kilku kolumnach i doklejeniu do innego pliku. Po wklejeniu makro ma sformatować datę w pierwszej kolumnie.... Makro jest bardzo rozbudowane i ciężko mi będzie wszystko pokazać. Dodano po 3 Rodzaj błędu to: Run-time Error '6': Overflow
Najlepiej aby makro robiło to od początku do końca, bo tak to za każdym razem trzeba bawić się w formatowanie i zamienianie. do tego dojdzie tabela przestawna, sortowanie i dzielenie. Jeśli ktoś ma pomysł jak to ugryźć i byłby w stanie podpowiedzieć/ pomóc to będzie bardzo miło. Tak jak chyba już wspominałem, z VBA raczkuję i nie potrafię sobie poradzić...
Wielkie dzięki za pomoc! Zmieniłem trochę twój kod do moich celów. W twoim kodzie makro kończyło pracę gdy w pierwszej kolumnie napotkało pierwsza pustą komórkę. Potrzebowałem mieć pewność, że wszystkie dane zostaną skopiowane. Dlatego też zmieniłem pętle DO WHILE na pętle FOR i użyłem funkcji adamas_nt . [syntax=vb] Sub Copy() Dim myPath As String...
Coś musisz wyjaśnić: Cały czas wydawało mi się, że kolory i wartości uzupełniasz we wzorcach (w tabeli u dołu arkusza) i gotowe kopiujesz do górnej tabeli. Czy jest inaczej? Ten błąd to wynik kopiowania formatowania warunkowego. Przy zastosowaniu makr (rezygnacji z cf) zniknie.
Witam, Może znajdzie się ktoś, kto ma pomysł, na mój problem: Stworzyłem makro, które z formatki wypełnionej przez użytkownika, kopiuje dane, dodaje inne potrzebne kolumny i kody i wrzuca wszystko do csv - korzystając z funkcji SaveAs z parametrem Local:=True. wbkNowy.SaveAs Filename:=Sciezka, FileFormat:=xlCSV, CreateBackup:=False, Local:=True Wszystko...
To nie było gotowe rozwiązanie, ale schemat podzielenia nazwy pliku, oczywiście w ten sposób możesz też podzielić nazwę pliku. Tak, potrzebna jest pętla. Mniej więcej taki algorytm musisz pomyśleć gdzie to wkleić, bo część już masz zrobione 1. Wyszukujesz plik są różne sposoby wyszukania i w związku z tym różne konstrukcje pętli. 2. Jeżeli jest plik...
Dobra znalazłem mniej więcej to co chciałem tylko teraz mam kolejne problemy - potrzebuje aby formuła kopiowała po kolei do kolumn a nie w jednej linijce? - czy jest możliwość kontroli nad tekstem z komórki tzn czy można wyciągnąć pojedyncze wyrazy i włożyć je do innych komórek w przypadku innego rozmieszczenia kolumn? - czy można ustawić jakoś formatowanie...
Co ma wspólnego makro do zaznaczania aktywnego wiersza z funkcją, której nagłówek pokazujesz? Jak i do czego używasz tej funkcji? Zaznaczanie aktywnego wiersza masz zrobione formatowaniem warunkowym z formułą: [syntax=text]=KOMÓRKA("ROW")=WIERSZ()[/s... z tym są dwa. Pierwszy - należy właściwie zaznaczyć zakres komórek, w którym to formatowanie...
Zainteresuj się używaniem zapytań SQL w Excelu. Pierwsze zapytanie tworzy (gdzieś) listę unikalnych wartości z kolumny K, a drugie według tej listy w pętli tworzy kolejne pliki. Można zastosować wcześniej sformatowany wzorzec pliku (taki zapis nie niszczy formatowania), do którego zapiszesz dane i nadasz mu właściwą nazwę podczas zapisywania. Zalety:...
Dodalem Excel z przykladem (musialem spakowac zip) 1. Numer w A1 zmieniamy manualnie. Na jego podstawie test w polach ponizej B4, B11, B18, B25 text zmenia sie automatycznie (jest pobierany z innego Arkusza (input) przez VLOOKUP. 2. Klikamy w 'Copy Text' zeby uruchomic macro. Macro skopiuje zawartosc komorek po lewej, do pol tekstowych po prawej (tylko...
Witaj. Formatowanie warunkowe w Excelu 2003 nie umożliwia sprawdzania wartości w innym arkuszu (nie wiem, czy nowsze wersje to potrafią, bo nie używam). Dla mnie rozwiązaniem problemu było skopiowanie tabeli świąt do komórek A100 w dół i użycie formatowania warunkowego z warunkiem opartym na tych komórkach. Oczywiście A100 w dół można sobie ukryć, a...
Arkusz z danymi: nagrywasz makro, robiąc operacje jak niżej 1. zakładasz filtr 2. kopiujesz odfiltrowane dane do drugiego arkusza Na drugim arkuszu dodajesz przycisk którym aktywujesz nagrane makro Modyfikujesz makro tak aby parametry filtrowania były odczytywane z komórek arkusza a nie przyjmowane na stałe. Takie funkcje jak WYSZUKAJ.PIONOWO lub ADR.POŚR...
Witam, jako, że raczkuję w VBA proszę o pomoc. Mianowicie, potrzebuje w pliku w zał. : Arkusz "Cena katalog 2019" - kolumna A - podwójne kliknięcie na daną komórkę w kolumnie A np. A5 powoduje skopiowanie danych z tej komórki do Arkusza " Oferta PDF " komórka B17. Każde kolejne podwójne kliknięcie powoduje dodanie wiersza w Arkuszu "Oferta PDF" pod...
1. pobiera listę plików .xlsx w folderze 2. usuwa zakładki, tworzy nowe i orzenosi dane z pobranego pliku z folderu 3. przenosi dane z jednej zakładki do finalnej KOR 4. przenosi poszczególne wiersze z zakładki RAT do zakładki KOR do tego samego wiersza jako kolejne kolumny 5. tworzy nowy plik z danymi z zakladki KOR, zapisuje i przechodzi do pkt 1...
Jeżeli ma "coś" wyskakiwać to tylko tylko makro. Jeżeli chcesz to zrobić sam to poczytaj o VBA ale może na początku zacznij od prostszych rzeczy w stylu kopiowania komórek , pobierania danych z komórek poddawania ich różnym obróbkom matematycznym i zwracania wyniku do excela. Jeżeli wystarczą ci kolorki i ewentualny ruch myszką by zauważyć wszystkie...
Musiałbym wtedy kopiować tekst do innego edytora, tam usuwać entery i wrzucać przecinki, a później w Excela. Problem polega na tym, że chcę tego uniknąć, bo niektóre opisy są obszerne, a produktów 24.000 i do każdego opis jest inny. Może ktoś zna jakieś makro na pomijanie styli tekstu przez Excela? Dodano po 34 Temat rozwiązany. Sposób miałem prosto...
Dobry wieczór, Jeżeli makro działa poprawnie i jedynym problemem jest kopiowanie wartości, to powinno wystarczyć dopisanie w linijce po słowie PasteSpecial i spacji (pod koniec kodu) frazy Wielkie dzięki! Zadziałało. Najlepsze jest to, że znalazłem tę komendę, ale nie byłem wcześniej w stanie poprawnie jej zapisać :-) To jeszcze jedno: czy oprócz tego,...
Całość wygląda tak: W Wordzie mam duży tekst (ponad 1000 stron), z wieloma rozdziałami (ponad 300). Z każdego rozdziału muszę wybrać teksty "zielone", pozbyć się niepotrzebnych znaków, sprawdzić i poprawić ewentualne błędy (dla bezpieczeństwa dotychczas kopiowałem rozdział do osobnego pliku), i w kolejności występowania przenieść do konkretnej komórki...
... Dim bf As New DataObject 'schowek ... bf.SetText bufor bf.PutInClipboard ' do schowka ... SendKeys "^V", True 'wklej ... Reference to Microsoft Forms 2.0 :D Nawet nie byłem bliski pomyślenia o tym ... znaczy się ... nie myślałem ... :| :D Dzięki za podpowiedź ... ale niestety przyda się do innych celów ... chodzi o to że, jeśli kopiujemy (korzystając...
Witam! Nowy, czysty skoroszyt. Komórki mają formatowanie domyślne. Do komórki D3 wpisuję z ręki formułę ="0987", excel zgodnie z przewidywaniem traktuje tekst jako tekst, mamy wyrównanie do lewej, 0 zachowane. Do komórki D4 wpisuję formułę =D3, i tym razem excel zgodnie z przewidywaniem traktuje tekst jako tekst, mamy wyrównanie do lewej, 0 zachowane....
Kopiowania i wklejania, tudzież opcji odwrotnej nie polecam. I tak w efekcie końcowym po wklejeniu wierszy (w trybie projektowania ma się rozumieć) trzeba ręcznie zmienić właściwość LinkedCell na właściwą. W tym momencie makro działa prawidłowo. Po usunięciu wierszy też makro działa właściwie. Dalej drukuje zaznaczone. Można oczywiście w VBA napisać...
Witam Mam do uzupełnienia dość spory arkusz. Zazwyczaj chodzi o wpisanie wartości w dwóch komórkach, ale często sprawy się komplikują i muszę wstawić nowy wiersz, skopiować kilka potrzebnych komórek z wiersza powyżej (nie wszystkie), wprowadzić zmianę w jednej komórce i sformatować wiersz. Jako, że jest tego dość dużo, a czasu mam mało, chciałem użyć...
witam, Czy ktoś z Was ma pomysł jak zrobić coś takiego: Potrzebuję stworzyć tabelę z godzinami pracy pracowników od..do i w kolumnie obok zastosować formułę złącz.teksty ( żeby wyświetliło się np 9-17) ale chciałbym żeby kolor teksty, który będzie wynikiem formuły miał taki sam kolor czcionki jak komórka po lewej. Ewentualnie czy ktoś ma jeszcze pomysł...
Witam. Od dłuższego czasu szukam i nie znalazłem nic co w pełni spełniałoby moje oczekiwania. Poszukuję opcji (pewnie makra) które działałoby i blokowało możliwość wklejania wyciętej komórki/komórek. O ile to możliwe najlepiej było by aby w chwili wyboru opcji "wytnij" zadziałała opcja "kopiuj" i wartości z kolumn zostały by skopiowane i wstawione "jako...
Witajcie Mam makro które kopiuje mi zaznaczony ciąg danych i wkleja do Outlooka po czym wysyła, jednak nie uwzględniając formatowania warunkowego. Np. wszędzie gdzie mam kolory stałe to są, ale tam gdzie kolory są uzależnione od wartości w kolumnie to już tego po skopiowaniu nie uwzględnia. Czy możecie mi pomóc w tym temacie? [syntax=vbscript] Dim rng...
Najlepiej jeszcze aby procesor tekstu sam wypełnił za użytkowników paragrafy ;). Z tego co wiem to MS-Word nie kompiluje plików. Uważaj bo w informatyce ten termin ma trochę specyficzne znaczenie. Chodzi ci oczywiście o łączenie/scalanie plików, a to po angielsku "combining" lub "merging". Wydaje mi się, że za bardzo byś sobie chciał ułatwić/zautomatyzować...
Mam skoroszyt w którym są arkusze odpowiadające tygodniom w roku (T-01, T-02...itd.) ale dodaję je na bieżąco gdy dany tydzień się rozpoczyna, kopiując przy tym wartość jednej z kolumn do innej kolumny w nowym arkuszu (wartości z kolumny G z arkusza T-01 mają zostać skopiowane do kolumny D w arkuszu T-02 ) układ każdego arkusza jest identyczny. Zastanawiam...
Aby kopiować dane z kolejnych arkuszy trzeba je policzyć i wskazać w kodzie, o który nam chodzi (odwołanie). Najprościej realizować to w pętli For, gdzie zmienna-licznik to indeks arkusza. Tu mała uwaga: po zakończeniu działania procedury CommandButton1_Click identyczna wartość przechowywana jest w zmiennej globalnej plik i polu TextBox1 , w przykładzie...
udało się rozwiązać problem, ale mam jeszcze jedno pytanie. Co zrobić żeby dane pobrane z formuły INDEX i MATCH po zapisaniu w folderze były stałe ?. To znaczy jak na przykład osoba której prześlę ten plik, a nie ma dostępu do pliku źródłowego widziała wygenerowane wcześniej dane w komórkach ? Cieszę się, że udało Ci się rozwiązać problem z funkcją...
Cześć, Mam taki problem. Potrzebuje stworzyć makro, które porównuje dwie tabele z dwóch plików. Wartości które się nie zgadzają muszą zostać wypełnione kolorem czerwonym. Chodzi o to by w Zeszyt1 dla każdego produktu w którym cena i marża nie zgadza się z Zeszyt2 komórki powinny być wypełnione kolorem czerwonym. Niestety nie mogę skorzystać z formatowania...
W załączniku są pliki końcowe, które bedą używane i teraz fajnie by było, gdyby znalazły się jeszcze następujące rozwiązania: 1. W pliku czerwony1 , jeśli dodatkowo wartości w kolumnach M i U zostaną zmienione na kolor czerwony , to nie zważając na to, czy w kolumach odpowiednio AM i AQ są wpisane godziny , kopiowałoby te wartości razem z wartością...
Witam, stworzyłem makro które pobiera dane z zamkniętego pliku i wkleja dane w wyznaczone miejsce w drugim pliku. Z makrami dopiero początki, więc kopiuje gotowe kody i próbuje je odpowiednio dopasować [syntax=vbnet]Option Explicit Private Function GetValue(path, file, sheet, ref) Dim arg As String If Right(path, 1) <> "\" Then path = path &...
Nie widzę potrzeby stosowana makr. Formuły i formatowania powinny wystarczyć. Ad.1. Poprawność danych > lista Ad.2. WYSZUKAJ.PIONOWO z argumentem (nazwa arkusza) podstawianym przez ADR.POŚR
Witam! Mam w pliku Excel arkusz dla każdego tygodnia roku kalendarzowego o nazwach T-01, T-33, T-43 itd. W arkuszu posiadam makro do szybkiego tworzenia nowego arkusza przenoszące układ i formatowanie obecnego arkusza i dodatkowo przenoszące do nowo tworzonego arkusza wiersze dla których wartość w kolumnie J jest większa od zera. Plik służy mi do cotygodniowego...
Hej, poniżej kod, który mam do tej pory. Niestety nie działa tak jakbym chciał, nie bardzo wiem jak go nawet skorygować i odpowiednio wkleić komendy. To jest zrobione poprzez nagrywanie, także amatorka... [syntax=VBA] Sub generujraport() ' ' generujraport Makro ' ' Klawisz skrótu: Ctrl+a ' Cells.Select ActiveSheet.Unprotect ActiveSheet.Range("$A$4:$N$9").AutoFilte...
Witam Mam mały problem z makrami, sam nie potrafię sobie poradzić i mam nadzieje, że znajdzie się tu ktoś, kto mi pomoże Ale o co chodzi? Mam makro w Wordzie (Office 2007, odniesienie do biblioteki Excela): [syntax=vb] Sub dane() Dim objExcel As New Excel.Application Dim exl As Excel.Workbook Set exl = objExcel.Workbooks.Open(ActiveDocument.P... & "/excel.xls")...
Witam, Uprzejma prośba o pomoc / podpowiedź / wyjaśnienie (na wstępie nie jestem programistą …. niestety!). 1. Formatowanie kilku zakresów jednocześnie. Chce nadać (za pomocą makra w VBA Excel) kilku zakresom danych ten sam format. Zakresy tu np: (B15:B38) (B51:C62) (B98:D112) Format to: ###,00;[Czerwony] - ###,00;- Bez tła (przeźroczyste tło)...
Chcę aby w arkuszu produkcja kolumna N , wpisując słowo 'got.' formuła przekopiowała mi cały wiersz do arkusza zrobione. No a jak "kolumna N" nie zna dobrze VBA :?: :D To jeśli W Excelu porusza(m) się biegle szuka(m) innych możliwych rozwiązań dla uzyskania pożądanego rezultatu. Przykładowo w Excelu 2007: 1. Porządkuje skoroszyt Produkcja.xls :sprawdzam...
Witam Mam bazę danych w Accessie, z której zaciągam dane do exela następującym makrem: [syntax=vb]Sub Zaciagnij() Dim strMyPath As String, strDBName As String, strDB As String, strSQL As String Dim i As Long, n As Long, lFieldCount As Long Dim rng As Range Dim wartosc1 As String Dim adoRecSet As New ADODB.Recordset Dim connDB As New ADODB.Connection...
Dzień dobry, Bardzo proszę o pomoc z makrem, potrzebuje pętle które będzie miała za zadania kopiowanie i wklejanie w odpowiednie komórki między arkuszami aktualnie mam napisane makro ale niestety sam nie potrafię jeszcze stworzyć takiej pętli Dodano po 3 Mam już coś takiego ale jeszcze nie jest to co bym chciał osiągnąć Potrzebuje dla następnego wiersza...
Witam Proszę o pomoc, nie potrafię zmienić tego makra tak by kopiowało tylko wartości z wiersza „A” a nie jak teraz wszystko wraz z formatowaniem. Dodam że VBA jest mi raczej obce a dołączony kod jest z innego postu po drobnej modyfikacji z mojej strony. Ogólnie potrzebuję chronić cały arkusz hasłem oprócz wiersza „A”. Po jego...
No to kicha bo ja z pisania makr jestem noga :) mam jeszcze pomysł jak to ugryźć na metodę ręczną ale szybsza niż w przypadku kopiowania w poszczególne okienka - zrobić w dodatkowym arkuszu ciąg w formatowaniu bazy i na formularzu rozpisać formuły oddające pola w ciągu. Będzie mniej kopiowania i będę musiał drukować każdą osobę osobno ale będzie szybciej...
Od jakiegoś czasu przeszukuję informacji na temat utworzenia makra w Wordzie, które działało by następująco: W danym otwartym dokumencie jest napisane zdanie np. „Ala ma kota”. Zdanie to makro powinno skopiować do linijki niżej oraz zmienić czcionkę na następną na liście w pasku formatowania. I tak powtarzać do wyczerpania wszystkich krojów...
Witam, Stworzyłem plik generujący raporty z tabel przestawnych. Chciałbym teraz pierwsze kilka arkuszy (pierwsze arkusze to raporty, reszta to dane i tabele przestawne) skopiować do nowego pliku. Chciałbym także zachować formatowanie arkuszy ale przenieść jedynie wartości (zamiast formuł). Pomoże ktoś w stworzeniu takiego makra? :) Z góry dzięki!
Witam, Chciałabym stworzyć makro, które wyszukiwałoby w drugim arkuszu po kolumnach komórkę zawierającą te same dane i kopiowało określoną ilość wierszy znajdujących się w tej samej kolumnie pod tą komórką. Konkretnie: W arkuszu "metryka" w komórce M8 znajduje się nazwa sekcji, którą trzeba wyszukać w arkuszu "profil geologiczny" w pierwszym wierszu....
makro kopiowanie kopiowanie makro makro kopiowanie danych
czujnik temperatura powietrza punto naprawa statecznika elektronicznego membrany słuchawek
wsteczna kamera cofania manta software
Krups Sensation EA910B10 Reset Steps: Soft, Factory, and Service-Level Procedures ESP8266 programowy reset – ESP.restart(), esp_restart(), MicroPython, AT+RST