Byc moze Copies:=Range("J34").Value
Co do zasad pisania kodu Jak już deklarujesz zmienne to powinieneś deklarować wszystkie. Zapomniałeś o zmiennej "mnoznik" i chyba błąd w nazwie zmiennej lastcell x Jeżeli potrzebujesz liczby całkowitej skorzystaj z operatora "\" a nie "/" lub z Fix(liczba) Czyli mnoznik = lastcell \ 10 + 1 lub mnoznik=Fix(lastcell / 10 + 1) Co do pętli niby założyłeś...
Sub drukowanie_pakowania() Dim wsh As Worksheet For Each wsh In ActiveWorkbook.Worksheets If wsh.Cells(1, 10) > 0 Then If wsh.Cells(1, 10) < 10000 Then If wsh.Name = "PRODUKCJA" Then GoTo dalej wsh.PrintView dalej: End If End If Next wsh End Sub
Gdybyś spojrzał do pomocy VBA, to znalazłbyś takie zdanie: This property applies only to worksheet pages. :( Znalazłem na szybko taki [url=http://www.vb-helper.com/howto_prin... Po modyfikacji do VBA i Twoich założeń powinien wykonywać to czego oczekujesz. Pozdrawiam
Mało szczegółów, to i kod taki sobie. ;) [syntax=vbscript]Sub Drukuj() Workbooks.Open (Range("B1")) Sheets("ArkuszDoWydrukowania").PrintOut ActiveWorkbook.Close End Sub [/syntax]
Sprawdź poniższe dwa warianty ... tak coś niby działa, ale sceptycznie podchodzę do takiego drukowania. W mojej ocenie, na teraz, drukarka będzie się przytykać - wstawiłem "opozniacz" (Const opozniacz), przy pomocy którego możesz sterować opóźnieniem nowego wydruku, gdzie: 0.5 = 0.5 s 1 =1 s itd. (opóźniacz pomysłu kolegi JRV ). Wariant nr 1 - drukuje...
Napisałem parę linijek kodu do drukowania etykiet. Zmieniłem nieco wygląd strony ZAMÓWIENIA, usunąłem niektóre kolumny i wiersze oraz wprowadziłem kolumnę do wpisania ilości kpl w paczce. Analogicznie można dopisać kod na 10x etykiety oraz dopisać do etykiet inne dane np. datę, wagę itp.
Jeśli nie miałeś do czynienia z formularzami, to najprościej zamknąć InputBox w pętli w Thisworkbook, przy zdarzeniu Open. Coś jak[syntax=vb]With Sheets("NazwaArkusza") For i = to 10 .Cells(i, 2)= Inputbox ("Wpisz wartość dla komórki B" & i) Next .activate End With[/syntax]Dograj sobie rejestratorem polecenie drukowania, lub po aktywowaniu arkusza naciśnij...
Temat zamykam - problem rozwiązany
Witam Szukam pomocy w stworzeniu makra , które potrafi drukować formularz z drugiego arkusza uzupełniaąc w nim dane z pierwszego. Myślałem o przyciskach w pierwszym arkuszu, które drukują wypełnione formularze w 2 egzpl.
Próbowałeś nagrać makro?
Najlepiej pętlą For. Musisz ustalić ilość kroków, wiersz początkowy itd. Np Jest 10 arkuszy, pierwszy wiersz Nr2, kolumna komórek łączących C. Nie do końca jest to miły sposób. Przy stałej, niewielkiej ilości arkuszy da się jeszcze przeżyć. W przypadku zmieniającej się dynamicznie ich liczby czyż nie prościej jest sprawdzić ile CheckBox-ów jest na...
Wiele przycisków w arkuszu to kiepski pomysł, żeby je obsłużyć musisz mieć tyle samo procedur. U mnie sprawdza się inny sposób: mała formatka z przyciskiem (taki asystent, można go potem rozbudowywać). Zaznaczasz komórkę w arkuszu a potem klikasz przycisk. Wiersz i kolumnę masz z obiektu ActiveCell. Formatkę masz zawsze na ekranie, więc jej nie musisz...
Sprawdź w Ustawieniach strony , czy zaptaszkowane "Drukuj wszystko na jednej stronie"
dzięki wielkie ! fajny kod, będę więc go też stosował.. ja przynajmniej moglem sie troche nauczyc przy pisaniu tego swojego prostego makra
Mozesz zarejestrowac nakie makro?
Metoda PrintOut z klasy workshet nie powiodła się Uruchamiasz makro z aktywnego arkusza "formularz" :!: a drukujesz inny arkusz "oswiadczenie" :idea: Twój wcześniejszy kod jest jednoznaczny :D tj. ActiveWindow. Selected Sheets
Można użyć zewnętrznego programu działającego wsadowo, połączyć pliki poleceniem Shell i wydrukować. Nie znam na tyle VBA aby kombinować tylko "pod nim". Nie wiem tylko czy nie idziesz w złym kierunku, do obsługi pdf lepiej użyć zewnętrznych programów niż kombinować z Excelem :)
Brak rozwiązania. Zamykam temat
Witam, serdecznie poszukuje pomocy odnośnie wykonanie Makra, które by czytało dane z tabeli, wstawiało dokładnie jedna dana w dokładnie jedno miejsce oraz drukowało tak przygotowany arkusz oraz numerowało strony od 1 . Chodzi o to by Makro wzięło z tabeli z pierwszego wiersza 3 dane, z każdej kolumny inna wstawiło do następnego arkusza oraz wydrukowało...
Te arkusze mają za każdym razem te same nazwy w jakiś powtarzalny sposób czy losowe? https://pl.extendoffice.com/documents/ex...
Możliwe, że Autor ma w Arkusz2 formularz, który ma być wypełniany z wybranego wiersza Arkusza1 i następnie drukowany. No ale to tylko Autor wie, a jakoś się nie zgłasza.
Następny mój problem, szukam makra które wyszukuje plik Excela, np 1111 i ten plik wysyła na domyślną drukarkę do wydruku? ktoś mi pomoże
Musisz wpisać większą treść wiadomości przed wysłaniem. W przypadku wysyłania plików opisz szczegółowo plik w treści wiadomości. Niech Gulson coś w końcu z tym zrobi.
Są przynajmniej 2 rozwiązania: 1. drukowanie z Excela arkusza z formatką etykiet 2. powielenie wierszy w Excelu (jak w załączniku) i użycie korespondencji seryjnej w Word.
Rozwiązanie dla Excela. (W czasie prób wyłącz drukarkę) Makro drukuje zadaną ilość stron, zmienia Nr i umieszcza napis "Oryginał" lub "Kopia". Ustawienia w arkuszu "Opcje".
Witam wszystkich, chciałabym dowiedzieć się jak zrobić (i czy w ogóle mozna) żeby Excel na podstawie zawartości komórki wyszukal plik z danego folderu i go wydrukował w ilości podanej w innej komórce? Np komórki a1: abc B2: 2 Excel wyszukuje że wskazanego folderu plik abc.jpg i drukuje go 2 razy. Czy znajdzie się ktoś miły i poratuje? :) z góry ślicznie...
Witam Potrzebuję pomocy w napisaniu makra za pomocą którego można będzie wydrukować formularze z danymi pracowników. Lista pracowników jest w Excelu. Najlepszym rozwiązaniem byłoby umieszczenie obok nazwiska pola wyboru które po zaznaczeniu powodowało by wstawienie do szablonu i wydrukowanie określonych danych. Na stronie A4 powinny mieścić się 2 takie...
Zrób sobie kopię pliku, w makro linię ".PrintOut" zamień na ".Printpreview" i odpal makro...
Drukowanie ogarnąłem. Działa fajnie: Sheets("1").PrintOut Copies:=2, Collate:=True, _ IgnorePrintAreas:=False Dałbyś radę podesłać kod do BeforeDoubleClick dla komórki przykładowej B2. Po DoubleClicku komórki B2 przenosi mnie do Sheets("1"). I jeszcze taka prośba, do poniższego kodu chciałbym aby po klikneciu buttona jeszcze wyskoczył Msgbox "Czy na...
Sądząc po nazwie ("Polewyboru") to nie ActiveX tylko formularzowe. Wykorzystaj wartość komórki wpisanej jako "łącze komórki"... P.S. Na końcu procedury włącz odświeżanie ekranu.
Niestety też nie widzę opcji by nie było makra. Ale nie makro ukrywające tylko zwykłe wprowadzenie informacji do wydruku do ilu stron ma drukować. Czyli pod przycisk "wrzucić" [syntax=vb] Sub Druk() ActiveWindow.SelectedSheets.PrintOut From:=1, To:=Sheets("POŚW").Range("E22") End Sub [/syntax] I "drukować" przyciskiem.
albo jeszcze lepiej żeby zapisywał tam gdzie jest plik excel
Arkusz kalkulacyjny zawiera makra. Sprawdź, może w nich jest przyczyna. Makro może wiele. :cry:
Jeżeli tak to proponuje nagrać makro i podpiąć je pod przycisk (będzie najprościej). Włącz na wstążce zakładkę deweloper Plik-opcje-Dostosowanie wstążki-i w oknie po prawej stronie zaznaczyć Deweloper i OK Na wstążce pojawi się karta deweloper.Otwórz ją. Przejdź na twój pierwszy arkusz. Wciśnij "Zarejestruj makro" Teraz postępuj tak jak zawsze robisz...
reszta już prosta :) dziękuje pięknie - kombinowałem kombinowałem ale na taki prosty pomysł nie wpadłem :P to może pomożesz jeszcze w jednym - mam makro drukujące zaznaczony w arkuszu obszar ale poszukuje możliwości zapisania w makro na której drukarce ma zostać wykonany wydruk - mam dwie i chciałbym drukować tylko na jednym z nich.
Sprawdziłem i wygląda na to że jest wszystko o co chodziło. Jesteś wielki. Mam jeszcze tylko pytanko czy jest możliwość aby po kliknięciu generuj PZ od razu się drukowało a nie przenosiło do innej zakładki i czy dało by rade zrobić takie makro dokladnie to samo do drugiego arkusza tego do skupu z usługa suszenia. Zeby też drukowało PZ. Jesteś wielki...
A ja proponuję najpierw zautomatyzować Twój szablon z wykorzystaniem listy rozwijanej nazwisk oraz formuł wyszukaj.pionowo :idea: np tak jak na zrzucie i w załączonym pliku 934719 934722 a potem drukować ręcznie lub poprzez nagrane makro :D
W mojej ocenie w Twoim pliku widać, że w ogóle nie panujesz nad tym co drukujesz :cry: Ustaw sobie właściwie obszar drukowania, spójrz na widok podział stron, ustaw właściwe skale. W większości arkuszy masz ustawione: szerokość jedna strona i wysokość jedna strona i normalnie te dwa obrazki się nie mieszczą "w drukarce" :D Proponuje albo zmodyfikować...
Bardzo ciekawie zrobiona aplikacja. Przesyłam wzór wydruku etykiety. Prześlę makro do wydruku ale jest pewien problem. Niejednoznaczne są używane nazwy wyrobów, na jednym arkuszu jest to np.Sałatka drobiowa a na drugim Drobiowa. Należy stworzyć słownik nazw wyrobów i tylko takimi się posługiwać. Zrobię swoją propozycję zmian do przedyskutowania.
Nagraj makro drukowania, podepnij pod przycisk i dopisz linię Range(z numerem)=Range(z numerem)+1 Drukowanie realizuj przyciskiem, nie przez plik>drukuj, czy w inny sposób...
Swój problem rozwiązałem rejestratorem makr. Uruchamiamy Filtruj z zakładki Dane, i usuwamy zaznaczenie "Puste" Przechodzimy do drukowania, w którym zaznaczamy ilość kopii i czy mają być sortowane czy nie . I drukujemy. Usuwamy filtrowanie. Zatrzymujemy rejestrator makr. I mamy makro filtrowania i drukowania. Powodzenie tym, którzy rozwiązują ten problem....
Funkcji nie ma ale proste makro może to załatwić. Powiedzmy, że w A1 wpiszesz datę (zgodnie z formatem daty excela) 2010-05-05 Pod przycisk (z formularzy) podepnij poniższy kod i już. Drukuj tylko za pomocą tego przycisku, inaczej data się nie zmieni. Ewentualnie w kodzie dostosuj do swoich potrzeb nazwę komórki z datą (A1) i nazwę arkusza (Arkusz1)....
Niestety nie interesuje mnie wysyłanie do wszystkich tylko do pojedynczych osób.. Do korespondencji seryjnej możesz wykorzystać bazę z jakimś polem od którego będzie zależało czy adres się drukuje czy nie.(wstawiasz w to pole np. jakiś krzyżyk) Nie musisz drukować całej bazy za każdym razem. Tu na pewno coś znajdziesz [url=http://office.microsoft.com/pl-pl/w...
To pobieranie danych za pomocą formuł a wydruk za pomocą makra.
Tu jest przykład jak bym chciał to wydrukować na drukarce mojej koleżanki z pracy: If key = 6 Then Arkusz3.PrintOut Copies:=1, ActivePrinter:="\\MAŁGOSIA\HP LaserJet 3200 Series PCL 6 na Ne06:", Collate:=True Jeżeli znasz adres XEROA5 to wpisz jak nie to wykorzystaj nagrywanie makra. Włącz "zarejestruj makro". Wybierz menu...
i właśnie o makro by mi chodziło, tylko że jestem w tym zupełnie zielony. Można trochę jaśniej, jak ma to dokładnie wyglądać?
W makro obsługującym przycisk użyj select-a. Do ustalenia obszaru druku :[syntax=vb]ActiveSheet.PageSetup.PrintA... = "$A$1:$G$56"[/syntax]
Przy okacji trochę mi sie koncepcja zmieniła - gdybym musiał wykluczyć więcej niż jeden arkusz - to dałoby się? Można wykluczać arkusze, można też uwzględnić tylko te z listy... Wykluczanie generalnie można zrobić tak: - wykluczasz Arkusz1, Arkusz2 i Arkusz3, drukujesz pozostałe[syntax=vbscript]If ws.Name <> Arkusz1.Name And ws.Name <>...
witam, potrzebuję pomocy w zrobieniu makra tak by: 1. posortować dane rosnąco w tabeli wg kolumny A [KOD] 2. ustalić zakres wydruku - wszystkie wiersze wypełnione przez inne makro w kolumnach od A do D oraz puste E i F za każdym razem inna ilość wierszy - od 1 do max. 300, (nie chcę drukować pustych stron). 3. wydruk zakresu wypełnionego danymi na drukarkę...
Ale nie wyczerpuje ona mojego problemu... Ale załóżmy, że arkusz ma być zgodny także 97-2003 I tu powstają schody. W zależności jaką wirtualną drukarkę PDF zainstalujesz obsługa może być różna. Dodatkowo obsługa zależeć będzie od tego w jaki sposób chcesz drukować. Mam zainstalowany PDFCreator i takowy posiada możliwość obsługi z wiersza poleceń co...
Jak zmieniłeś nazwy arkuszów ("Arkusz1" to teraz "BAZA" a "Proszki" to "MAŁE") to w całym kodzie makra trzeba je zmienić, a nie tylko w jednej linii. Poza tym (nie chce mi się tego mocno analizować dlaczego) ale makro odczytuje ostatnią pustą komórkę w kolumnie B arkusza "Dane" jako "zapisaną". Nie wiem czego - może ktoś z kolegów wyjaśni. Dlatego dołożyłem...
Jak to zrobić? 1. Nagrać makro (obszar wydruku, orientacja strony) 2. Usunąć nadmiar (interesuje nas wyłącznie 'PrintArea' oraz ''Orientation') 3. Podstawić wartości 4. Cieszyć się działaniem
Nie wiem, co dokładnie chcesz robić. Twoje makro zaznacza po kolei różne arkusze (nie wiem czy wszystkie, czy wybrane, bo są podane konkretne nazwy), ale tylko dwa z nich drukuje, wskazując wcześniej różne zakresy komórek do druku. Polecenie PrintOut to polecenie drukowania. Możesz przed nim dopisać warunek [syntax=vbscript]If Range("A1").Value = "x"...
Witam Mam plik " Wzor" i z niego muszę dokonać drukowania określonych arkuszy. Makro ma zadanie wydrukować najpierw arkusz o nazwie "AAA"; potem arkusz "BBB". Drukowanie jest wysyłane na domyślną drukarkę i drukowanie dwustronne. :idea: Jak ja to bym widziała :D : W arkuszu "MENU" w komórce "F5" makro wstawia liczbę "1". Wtedy zadziałają funkcje Excel...
Witam.Czy znajdzie się jakaś życzliwa DUSZA? Jestem początkującym w VBA. Można powiedzieć, że dopiero zaczynam i dlatego proszę o pomoc. Jakiś czas temu znalazłem w internecie plik, który przesyłam w załączeniu. Oczywiście plik ma małą ilość danych. Znalazłem też w internecie makro do wybierania drukarek i wstawiłem je pod ComboBoxa. Teraz można wybierać...
Witam, Proszę o pomoc w napisaniu makra które po otwarciu pliku "arkusz ocen" będzie prosiło użytkownika o wskazanie lokalizacji pliku "baza". Po wskazaniu pliku excel otworzy plik "baza" skopiuję arkusz 1 (w tym pliku jest tylko jeden arkusz) i wstawi go do pliku "arkusz ocen" jak pierwszy arkusz. I teraz jeżeli w pliku "arkusz ocen" jest już skopiowany...
Mam plik .xsl z licznymi arkuszami. Potrzebuję by do jednego pliku .pdf drukowały się wybrane arkusze W pliku mam arkusz ze spisem treści (nazw arkuszy w pliku - kolumna B) przy których (kolumna C) zaznaczono niezbędne do druku arkusze (naprzeciwko których zaznaczono "PRAWDA"). Czy poradzicie jak stworzyć makro do druku? Dziękuję ogromnie!
Nie ma przykładowego pliku :cunning: , więc można Ci tylko udzielić ogólnikowych rad :D : 1. Przeszukaj zasoby Elektrody nt filtrowania danych :idea: ; 2. Rozważ czy konieczne jest filtrowanie - może wystarczy tylko wyszukiwanie potrzebnych wierszy ze wszystkich arkuszy do arkusza zbiorczego :?: np jak w poście https://www.elektroda.pl/rtvforum/viewto...
Pytanie jak z Excela wydrukować plik word aby zarejestrowało to makro. Żeby zobaczyć jaki kod się stworzy przy wydruku z Word-a można makro zarejestrować w Word-zie, a następnie je dostosować, tak, aby np. otwierało plik/pliki Word-owe i je drukowało. P.S. Gotowe rozwiązanie może i jest super, ale jeszcze lepsza jest przyjemność stworzenia czegoś samemu...
A jak oglądasz/drukujesz tego PDF-a, to już się źle wyświetlają? Tak. One od razu do mnie przychodzą mailem z tymi znakami. Ten plik jest generowany do pdf z jakiegoś programu kadrowego i chyba przy generowaniu tego pliku powstaje ten błąd.
Rozumiem, że chcesz to zrobić całkowicie bezkosztowo, jeżeli te kilka stówek to za dużo. Ok, to jeszcze pytanie gdzie jest ten formularz do drukowania: Excel (najłatwiej), aplikacja webowa (trochę trudniej) czy instalowana (da się, ale trzeba powalczyć)? Jeżeli nie jest w Excelu, to czy da się go włożyć do Excela i zadziała? Ja bym spróbował zautomatyzować...
Witam mam pewien pomysł...ale oczywiście wiąże si eto z kolejnym problemem... jeśli wstawię jakiś kształt z półprzezroczystym tłem to będzie ładnie wszystko maskował i wszystkie komórki będą niedostępne bo klikając na tło klikniemy na format a że format też będzie zablokowany to nie będzie można go edytować:) no i oczywiście butony działają (bo nałożony...
Tworząc makro i umieszczając przycisk z przypisanym makro, które sprawdzi tabelę, a gdy pole będzie puste - zwróci komunikat zamiast wysłać wydruk do drukarki. Korzystanie z przycisku Drukuj w menu programu wymusi jednakże wydruk z pustym polem. Aby nauczyć się pisać makra - F1 - pomoc, hasła: Visual Basic, makro. Jest też obfita literatura na ten temat.
Cześć wszystkim! Próbuję rozwiązać pewną kwestię. Otóż... w arkuszu excela mam listę unikalnych znaków (jeden pod drugim, każdy w innej komórce). Mam również plik w formacie PDF. Każda strona zawiera w swojej treści jeden z tych unikalnych znaków. Zadanie polega na tym, aby wydrukować strony z pliku PDF w takiej kolejności w jakiej są znaki w excelu....
Witam Znalazłem w sieci makro które powinno drukować w pętli wszystkie dokumenty doc. w określonej lokalizacji, niestety makro zatrzymuje się po wydrukowaniu pierwszego pliku. [syntax=vbscript]Sub drukuj_z_raportem() Dim PPath$, buf$, r&: r = 2 PPath = "C:\Temp" buf = Dir(PPath & "*.docx") Cells(1, 1) = "plik ze scieżka" Cells(1, 2) = "wydrukowano"...
Do etykiet potrzebne jeszcze opcja drukuj , no abym mógł z makro podpisać drukarkę tj nazwa drukarki , własiwości w tym przypadku wydruk etykiet a nie wydruk automatyczny. I wazne aby makra działały tylko gdy z pobranych danych np hani numer zaczynał się na 30 jeśli bedzie inny nie zadziala
Witam! Bardzo potrzebuję pomocy. Mam plik raportu o nazwie "raport.xlsm" za pomocą którego przenoszę różne dane do kilku różnych plików w tym do pliku "plik do wydruku.xlsm" znajdującego się w innej lokalizacji niż "raport.xlsm". Zawsze po przeniesieniu danych muszę otworzyć "plik do wydruku.xlsm" w celu wydrukowania 2szt. danych z arkusza1 tego pliku...
Witaj, Można napisać proste makro, które: - wczyta ilość stron do wydruku (z komórki poza drukowanym arkuszem, albo inputbox z klawiatury) - powtórzy się zadaną parametrem uzyskanym wcześniej ilość razy wykonując dokładnie dwie rzeczy - inkrementację numeru oraz szybki wydruk na domyślną drukarkę (bez zadawania pytań). Nie testowałem takiego rozwiązania,...
Witam, Dla usprawnienia pracy, chciałem stworzyć plik wydruku. Aktualnie po wykonaniu badań, wypisuje ręcznie WZ, a następnie w wolnej chwili przenoszę te dane do arkusza Excel. Arkusz jest podzielony na dno tygodnia i odpowiednio kolumny które posiadają dane z WZ. Posiadam wzór WZ w Wordzie i Excelu z pustymi miejscami na wypełnienie danymi. Usprawniając...
OK, ale po co te przenoszenie do arkuszy? Nie może być w jednym? Chcesz to oglądać? drukować? kopiować do jakiejś bazy? Wyjaśnij wszytko od początku do końca od strony użytkownika. Kiedy będziemy wiedzieć jak to ma działać i co robić, to dopasuje się arkusze i interfejs użytkownika tak, aby to działało zgodnie z oczekiwaniami. Opisałeś swoją wizję,...
mam x arkuszy, dla których chcę zastosować ten sam format wydruku Skąd więc wiadomo, że Activesheet to akurat drukowany arkusz? Przedstaw resztę makra drukowania/podglądu.
Kolejne pytanie do tego wątku, z powodu problemu z konfiguracja skryptu na excelu 2002 wpadłem na pomysł tworzenie pdf za pomocą wirtualnej drukarki. Mam zainstalowaną drukarkę o nazwie "doPDF" działa ładnie do momentu używania marka ponieważ makro nie wybiera drukarki z listy tylko drukuje na obecnie zaznaczonej w excelu. Zastanawiam się czy nie da...
Bardzo wam dziękuję! Podziałało i znacznie ułatwi mi to pracę. Skoro, ktoś już się moim tematem zainteresował, potrzebowałbym jeszcze 3 makr, także starałem się coś wykombinować, ale ciągle mam jakieś błędy.. 1) Jeżeli któraś z komórek w kolumnie E, ma wartość "kontrakt deaktywny", makro koloruje cały wiersz w którym jest ta komórka na czarno. 2) Jeżeli...
Dzień dobry, Mam pewien problem. Zrobiłem sobie programik, który będzie tworzył listy obecności w danym miesiącu. Chciałbym ułatwić sobie jeszcze pracę tym, że nie będę wpisywał ręcznie do arkusza imienia i nazwiska pracownika. Zależy mi na tym, by makro dodawało pracownika w komórkę B5 i drukowało całą kartę. Proszę o pomoc jak zrobić coś takiego w...
Odnośnie wyboru drukarki polecam następujące makro [syntax=vbscript]Sub Druk() ActiveSheet.PageSetup.PrintArea = "$A$1:$K$4" With ActiveSheet.PageSetup .CenterHorizontally = True .CenterVertically = True .Orientation = xlPortrait .PaperSize = xlPaperA4 .FitToPagesWide = 1 .FitToPagesTall = 1 End With Application.Dialogs(xlDialogPrinterSetup... ActiveWindow.SelectedSheets.PrintOut...
Cześć :) mam taki problem: W nowej firmie prowadzona jest dokumentacja. Są dwa pliki: 1) Zestawienie - zestawienie EXCEL w formie tabelki zawierające: nr karty, datę i masę. 2) WZ wzór - plik w WORDZIE, przerobiłem go na Excel. Jest to zwykły wzór w którym zawierane są trzy ważne dane: nr karty, data, masa (+ podpisy, adresy itd.) Codziennie wprowadzane...
Tak, zawsze wpisując do tych samych pól w arkuszu zostaje mi baza przyjęć towaru od klienta. Całość ma wyglądać w ten sposób mam pierwszą stronę w arkuszu wypełniam wyżej wymienione pola zawsze te same 1a 1b i 1c i klikam drukuj drukuje mi się potwierdzenie pobrania sprzętu do naprawy a wszystkie dane zostają zapisane w drugim arkuszu kolejno 1,2,3...
Witam, mam problem z napisaniem makra tzn. wypełniam arkusz pierwszy z niego wypełniają się trzy następne odpowiednimi informacjami, no i zaczyna się arkusz drugi chce wydrukować z drukarki "KMC308 - zwartwit briefpapier" dwie kopie, arkusz 3 działa (bo wybiera standardowa drukarkę), arkusz 4 chce drukować z drukarki "KMC308 - zwartwit CMR" cztery kopie....
Ja zaproponuje takie wskazówki: Proponuję dodać jeszcze jeden arkusz (później ukryty) np o nazwie słownik. W arkuszu tym stworzył bym za np pomocą funkcji jeżeli(), licz.jeżeli(), max() i wyszukaj.pionowo() "aktywny" słownik firm na podstawie danych z arkusza "lista...". Tak zrobioną listę/słownik powiązałbym z pierwszym okienkiem wyboru w arkuszu głównym....
Rzeczywiście autor nie ma talentu do przekazywania informacji. Wydaje mi się że o to mu chodziło (załącznik). Do autora topiku: Nie da się funkcjami wydrukować tylko wybranych stron. Można ukrywać widoczność ale wtedy ostatecznie będą białe/czyste strony drukowane. Pozostaje makro - w sumie proste ale ... w makrach położenie poszczególnych komórek jest...
witam, czy moge jeszcze raz prosic o pomoc z makrem powyzszym? mam juz makro ktore po czesci robi to co chce, czyli zapisuje excela w formacie pdf, zapisuje je w okreslonej lokalizacji, po dokreslona nazwa i drukuje. teraz chcialabym dolozyc do tego wyslanie maila z tym pdfem na adres mailowy, ktory bedzie zawarty w aktywnej zakladce np w polu h5, a...
Dzięki za wskazówkę, ale niestety ona nie działa. Jeśli ustawię w ten sposób to wydrukuje mi jedynie jedną kartkę, a nie wszystkie z dokumentu. Ręcznie ustawianie granicy drukowania przy kilkuset stronach jest nieco męczące. Niemniej kombinując nad problemem nagrałem makro, a następnie z zarejestrowanego kodu stworzyłem kawałek skryptu, który rozwiązuje...
Witam serdecznie. Posiadam makro, które z założenia ma drukować dokumenty worda utworzone w korespondencji seryjnej, z poziomu excela. Pętla drukuje pierwszy napotkany dokument we wskazanym folderze. Niestety nie potrafię sobie poradzić z warunkiem dla wybranych przeze mnie plików. W praktyce kod ma zostać zastosowany wielokrotnie spod kilku przycisków...
Witam! :) Do marek003 :) Tak to prawda :)ja wprowadzam dane a inni się na nie gapią,drukują i nie wiem co jeszcze ( .....kontrolują hmm...)Ja je zbieram i jakby co to robię zestawienie kwartalne,pół roczne,roczne itd. Dane biorę z Kart Pracy :) pisanych odręcznie przez pracownika nadzorującego zadanie X czy Y. (opracowuję i wklepuję w program ....i...
Mam do wydrukowania etykiety. Każda powinna mieć kolejny numer. Do tej pory po prostu drukowałem/kserowałem etykiety i nabijałem numery numeratorem. Czy mógłbym wydrukować je już z kolejnymi numerami - czyli jest standardowy tekst i każda kolejna strona różni się tylko kolejnym numerem ( Na każdej stronie a4 mieszczą się 2 etykiety z tym samym numerem,...
Witam, Dziękuję za odpowiedź. Ja te pliki do analizy danych mam zrobione przez wpisywanie nazw plików, kolumn i wiersz oraz funkcje (bez makr) wyszukaj.poziomo, wyszukaj.pionowo, podaj. opozycję i przesunięcie - działa to w miarę sprawnie (chociaż dość długo czasem "mieli" to Excel) - ale trzeba wcześniej popracować "ręcznie" nad danymi źródłowymi ......
Mam komórke C5 w której wpisuje numer zamówienia klienta :?: , wykorzystując do tego inputbox. Wszystko działa świetnei :?: do momentu, kiedy zamiast 6 produktów faktura ma 7 produktów Czarno to widzę ten Twój projekt przy takiej "precyzji" działania i opisu :cry: We wszystkich wariantach faktur z Twojego pliku w komórce C5 masz albo "datę wystawienia...
Witam, Potrzebuję kod makro który podzieli scalone komórki i posortuje zakres A4:E150 według kolumny od E4. Mam kod który sortuje nie scalone komórki http://obrazki.elektroda.pl/4190262600_1... Sub Sort() Dim oneRange As Range Dim aCell As Range Set oneRange = Range("A3:E200") Set aCell = Range("E3")...
Prot, bardzo dziękuję, jest to rozwiązanie które spełnia moje oczekiwanie i je zastosuje w moim szablonie, tylko za bardzo nie rozumiem komendy ”=Fir”, pozostałe formuły są mi znane. Makro adamas_nt również działa bardzo dobrze. Wielkie dzięki. Ale jest mały problem z makrem, nie chodzi o to, że źle działa tylko tabelka docelowa trochę się...
Czołem, Przyda mi się pomoc w przebudowaniu makra jakie posiadam. W chwili obecnej mam makro, które drukuje mi wszystkie dokumenty per filtr w raportu. Potrzebuje zamienić opcję drukowania na: 1)Otwarcie szablonu prezentacji 2)Aktualizację danych i wykresów per filtr tabeli przestawnej 3)Zapis jako prezentacji nazwš filtra z aktualnš datš (komórka z...
Niestety nie można zarejestrować w makro "inna komórka", VBA nie zrozumie takie. W post #2 PRL podal Ci link Dodano po 3 Być może jednak wiersze w arkuszu są równomiernie, na przykład co 40 wierszy umieścić numery?(w m6, m46, m86 itd.) Dodano po 19 No tota M6, przy prawej krawędzi, lub na ilu kolumny w lewo? Numer na każdej stronie powinno być 5 wierszy...
Borykam się z problemem założenia pętli. Staram się uczyć VBA jednakże jestem dopiero początkujący. Chciałbym założyć makro, które będzie mi drukować wskazane indeksy w arkuszu 1, pobierając dane z arkusza 2. Warunki: -Każdy indeks na osobnej kartce; - W przypadku nie znalezienia danych w arkuszu 2 pojawiać się będzie komentarz w arkuszu 1. Szczegóły...
Witaj, Takie makro może zrobić chyba to, o co Ci chodzi z przepisywaniem danych do KP: [syntax=vb]Sub Makro2() Const X0 = 1 Const Y0 = 5 Dim imnaz, zaco, mies As String Dim kwota As Double If Val(ActiveCell.Value) > 0 Then kwota = Val(ActiveCell.Value) mies = ActiveCell.Offset(Y0 - ActiveCell.Row, 0).Value zaco = ActiveCell.Offset(0, X0 - ActiveCell.Column...
Wstaw przycisk do arkusza "faktura" i podepnij makro, w którym można wykonać kilka czynności za jednym "klik". Np 1) Drukowanie /opcjonalnie 2) Inkrementacja numeru faktury /opcjonalnie 3) Aktualizacja stanów /konieczne 4) Czyszczenie druku /opcjonalnie Jest jeden problem. W arkuszu "chemia" nazwy nie są unikatowe. Zauważ, że funkcja WYSZUKAJ,PIONOWO...
Ten temat dotyczy pewnej funkcji, a dokładnie w moim plik bazowym generuję pewną listę, w tym przypadku jest to lista szkoleń. Po wygenerowaniu tej listy albo ją bezpośrednio drukuję albo generuję plik .pdf i ten plik wysyłam dalej do innych osób. Jednak niektóre z tych osób prosiły mnie o wysłanie pliku nie w .pdf tylko .xls(m) aby mogli sobie ją przetwarzać....
Dzień dobry , Chciałabym poprawić makro, żeby zamiast sztywnego przypisania powtarzanego w drukowaniu wiersza wstawiana była zmienna. Fragment nagranego makra wygląda tak: .PrintTitleRows = "11:11" ' powtarza wiersz 11 na każdej stronie Moje nieudane próby, gdzie x to numer wiersza .PrintTitleRows = Chr(34) & x & ":"...
Witam Do pełni szczęścia w trzymiesięcznej pracy nad wieloma formularzami w excelu brakuje mi ostatniego polecenia, które : Zapisze arkusz jako plik PDF w katalogu domyślnym z jednoczesnym przypisaniem jako nazwy pliku treści z wybranej komórki, w określonej serii (np partia 1.pdf,partia 2.pdf,partia3.pdf itd) Użytkowanie formularza obecnie wygląda...
Rozumiem intencję etiene8912. Niefortunnie użyty jest termin korespondencja seryjna, bo nie tu leży rozwiązanie problemu drukowania kart dla kierowców. Po wpisaniu wszystkich danych do tabeli w Excelu, wygenerować się mają załączniki wg wzoru attestation_of_activities_pl.doc dla każdego kierowcy. Próbowałem pisać makro w Excelu, które kopiuje plik attestation_of_activities_pl.doc...
Witam, szukam dokładnie takiego makra udało się? Chodzi o guzik który uruchamia drukowanie podpiętego pliku,
drukować excel makro makro excel drukować drukować excel
klawiatura myszka blokuje samsung mruga dioda zasilania kamera unifi
telefunken czarny ekran mikrokomputer cobra1
Reddish-Brown Color Codes: Mahogany, Russet, Burnt Umber, Pigments & Trends Current Division Formula: Parallel Resistor & Impedance Calculations, PCB & Power Supply Applications