Dobrze, że dałeś sobie radę. To się ceni ale to samo co na pięciu przyciskach możesz mieć na jednym po zastosowaniu mojego kodu. Nie chcę Ci udowadniać wyższości Świąt Bożego Narodzenia nad Wielkanocą. Mam jednak drobne podejrzenie, że mój kod przekleiłeś w całości bez sprawdzenia. A tam był drobny błąd na który nie zwróciłeś uwagi. A1 . Zmień sobie...
Możesz wykorzystać: Wyszukaj.pionowo(), Indeks() z Podaj.pozycję(), Adr.pośr() z adres() Dla upiększenia możesz listę do wyboru twojego wiersza "zamknąć" w okienku z listą rozwijalną Np. w arkuszu który drukujesz będzie lista rozwijalna ty z niej wybierzesz dane (dany wiersz) a wszystko się "samo" uzupełni w innych arkuszach i w arkuszu wydruku. Wciśniesz...
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)....
Sprawdź bo nie mam jak sprawdzić - piszę z poczekalni w serwisie. Wejdź w ustawienia strony i w Powtarzaj wiersze wpiszesz wiersze początkowe. A potem zaznaczysz tylko wybrany miesiąc (bez wierszy nagłówka) i dasz drukuj zaznaczenie. Sprawdź co ci wydrukuje (by nie marnować kartek drukuj do pdf'u np poprzez pdfcreator'a)
Hmm, jedyne co mi przychodzi do głowy to http://obrazki.elektroda.net/96_12869857... for próba = 1 to Doskutku drukuj wymierz poprawka     If mamDosyć = True Then Exit For next Jeśli w końcu uzyskasz ideał :) to na innej drukarce/komputerze na 90% czeka Cię to samo...
Trochę lekkich poprawek kodu, i rozłożenie na 2 pętle spowodowało że kod działa prawidłowo. W jednej pętli drukowało 1 plik i koniec, nie miałem pomysłu i czasu na dłuższą zabawę z tym kodem dlatego wrzucam w takiej formie w jakiej mi się udało (przetestowane, działa) [syntax=vbscript] Sub drukuj_z_raportem() Dim PPath$, buf$ Dim r As Integer Cells(1,...
Cześć, Jak w Excelu wydrukować tylko zaznaczone wiersze, ale na jednej stronie jedno pod drugim? Robiłem obszar wydruku, drukuj zaznaczenie i każde drukuje się na oddzielnej stronie. Excel nie przewidział takiej opcji? :)
Z góry dziękuję za sprecyzowanie pytania, bo póki co to czarna magia...
Bez VBA się raczej nie obędzie. Są co najmniej dwa wyjścia (w pętli): 1. Filtrowanie i wydruk po każdej zmianie parametrów 2. Arkusz tymczasowy (czyszczenie, kopiowanie warunkowe, wydruk) Które wydajniejsze? Stawiam na Nr.1
Wszystko zależy od tego, co jest zainstalowane w systemie. Co dalej? Trochę o podstawach [url=https://support.microsoft.com/pl-pl...
Witam, Posiadam dziwny sposób mianowicie utworzyłam dokument gdzie jest zapisane dokładnie 14 stron, a kiedy klikam drukuj pokazuje, że jest 27 stron do wydruku, chociaż nie są zapisane, korzystam z Office 2010.
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
Witam Dodaj w obu pod "Sub drukuj_etykiete_nowe() " [syntax=vbscript]Application.ScreenUpdat... = False[/syntax]
Nie zaznaczam zbiorczo wszystkich arkuszy i tak drukuje. Sytuacja ma miejsce jeśli wybiorę ręcznie jakieś określone arkusze i dam drukuj aktywne arkusze to drukuje dwustronnie. W moim makro nie ma aktywnych arkuszy więc może to jest przyczyną wydruku pojedynczego. Jutro wypróbuję twoje makro i się odezwę. Dodano po 15 Niestety makro "zbiorczo" nie działa....
Zastosuj najpierw autofiltr a później drukuj
Zacznij od: http://obrazki.elektroda.pl/2291354500_1... Wpisz adres dowolnej komórki. Np A1 W makro If Range("A1")=True Then
Przykład w załączniku. Porównaj kod podany przez kol Aldrin z tym w formularzu. Prawda, że skądś to znasz? ;)
możesz mi to przybliżyć??? że niby jak by to było??? Dodano po 39 ok przeglądnąłem filmik na youtube o korespondencji seryjnej, utworzyłem dobie bazę danych z imionami i nazwiskami i jest ok, daje drukuj i drukuje mi każdą kartkę z innym nazwiskiem. Problem w tym że i tak co miesiąc będę musiał edytować sobie szablon, bo każdego dnia jest inna liczba...
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.
:) Nie wchodzę w zasadność, poprawność itd danych. Autor prosił o pomoc więc proszę. Widać że autor nie ma za dużo do czynienia z VBA, ale od czegoś trzeba zacząć. Każdy kiedyś stawiał pierwsze kroki, a najlepiej się uczyć na takich przykładach robionych dla siebie. Nagrywanie makra polecam jedynie by zobaczyć/zrozumieć jak to mniej więcej działa. Natomiast...
Witam, na chciałbym sobie ułatwić pracę w biurze, ale za bardzo nie znam się na makrach. Chciałbym zrobić takie makro: po otwarciu pliku excela, automatycznie wyświetla się okienko w którym wpisuje parę wartości (które kolejno wpisują się bo komórek B1,B2....B10- następnie klikam drukuj i plik się drukuje z całymi obliczeniami.
[syntax=vbscript]Sub DrukujSzablony() Set e = Sheets("Export") ow = e.Cells(Rows.Count, "A").End(xlUp).Row For x = 2 To ow For a = 1 To 5 e.Range("A" & x & ":AC" & x).Copy Sheets(a).Range("A100") Sheets(a).Range("A1:T44").PrintOut Copies:=e.Range("AD" & x) Next Next End Sub [/syntax] Ustaw arkusze szablonów na początku, od 1 do 5.
W czasie drukowania Otwórz arkusz, a następnie ukryć Sheets(.List(.Value)).Visible = True
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
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...
Drukuj przez control plus P a nie z ikonki na pasku narzedziowym moze razem z plikiem zapisana jest drukarka jaka jest w firmie CTRL+P i wybierz wlasciwa drukarke na twoim kompie i powinno byc ok.
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.
Wszystko się zgadza tylko punkt 3 miał by się wykonać automatycznie gdyż te czynności wykonywane będą codziennie a danych (wierszy w arkuszu1) jest poro. Drukarka domyślna. Też właśnie obawiam się błędów. Czy po komendzie drukuj można zrobić powiedźmy 4 sekundową pauzę? Cy to coś pomoże?
Jeszcze pytanie do marek003 czy można zrobić tak żeby drukowało każdego kartę zestawienie z podziałem na miesiące i nominał\harmonogram chodzi o to żeby były wypisane osoby jak w pliku od marka003, a obok zaznaczać odznaczać karty do druku poszczególne dla osób np. pana z poz. 1 np lipiec sierpień karta poz. 2 sam harmonogram\ nominał wszystko w jednym...
Witam W jakim trybie pracuje drukarka ? Może inaczej /jak to komputer/ drukuj do pliku i zobacz co tam jest jak masz tekst to już 30% masz załatwione. poz.dioda
Witam, taka ciekawostka z Excela i życia HelpDesku: Mam dwie zakladki w excelu (arkusz1 i arkusz2). Obie drukują się na kilku stronach, tj. arkusz1 ma 4 strony w wydruku a arkusz2 ma ich 6. Używam funkcji do numerowania storn i ich zliczania &[Strona] "z" &[Strony] przy drukowaniu tylko arkusza 1 dostaje odpowiednio 1 z 4, 2 z 4, itd. ale zaznaczając...
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...
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...
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.
wątki połączone, dziękuję:) Wracająć do problemu, jak zapewnić pobieranie pytania jako całość? Zrobiłem tak jak autor makra polecał, oddzielone są pytania enterem, ale mimo to czytane są wszystkie linie tekstu jako osobne. Jak to rozwiązać? Mam dwa pomysły ale nie potrafię ich zabisać w VBA. 1. (taki roboczy) po wygenerowaniu testu w wielkości czcionki...
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
Mam taki problem z drukarką EPSON STYLUS SX215. Pomimo iż wielokrotnie pobierałem i instalowałem ze strony producenta sterowniki, dalej coś z nimi jest nie tak jak być powinno. Nie pamiętam czy była jakakolwiek płyta kiedy ją kupowałem drukarkę, a jeżeli tak to już jej nie mam ( zakup był około 3, może 4 lata temu, ale raczej 3 ) . Przez te sterowniki...
Witam Nie wiem jak ugryźć temat, bo mam dwa pliki, jeden z bazą w której są magazynowane dane w kolejności na podstawie ID, zawarta data dnia bieżącego, cały rok w jednym arkuszu. Drugi plik z tabelką w której są stałe niezmienne a codziennie zmieniają się dwie zmienne które są wpisywane również w powyższą bazę. Nie wszystkie zmienne się oczywiście...
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...
Jak już jest dopuszczona możliwość korzystania z makr to można wszystko. Poniżej kod ustawiający obszar wydruku (bez wydruku) na ilość stron wynikających z "E22" Kod nie jest w module tylko w kodzie arkusza POŚW w "sekcji" Change Działa tak, że każda zmiana wartości w E22 zmienia obszar wydruku (nie trzeba nic wciskać wystarczy zmienić wartość i wcisnąć...
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ś...
Byc moze Copies:=Range("J34").Value
Witam , mam taki problem. Laptop działą bardzo wolno , przy włączeniu przez kilka minut nie da się praktycznie nic robić, potem jest już lepiej , ale i tak nie da się płynnie nic robić. Cały czas znika mi miejsce na C. Kiedyś kasowałem , ale przestałem to robić, Więc mam jeden dysk C z 0 mb wolnego miejsca. Główne procesy które mi zużywają CPU to svhost.exe...
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]
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...
Z formatowaniem lepiej to zrobić tak. Kolumn od N nie musisz drukować.
Bardzo dobrze podejrzewasz - sprawdź ile stron masz otwartych w arkuszu. Śmiem twierdzić że masz dwie strony, druga pusta.
Ale docelowo co chcesz zrobić? Pomóc sobie czy koledze? Czy może w ogóle wyeliminować kolegę :twisted: Innymi słowy chcesz tylko by excel "drukował" kartki dla kolegi (po twoim wybraniu paru opcji)? Czy żeby od razu przejął cały system magazynowy? dodane po chwili ------------------------------ Wybiera się dane z reguły z jakiejś listy rozwijalnej to:...
Załącz plik. Ale co pomogło?
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.
drukuj excel przycisk drukuj excel excel makro drukuj
foxconn g31mxp transceiver kenwood przyczepka samochodowa budowa
peugeot boxer kierunkowskazy centrum multimedialne
Czy stacyjka w Skoda Octavia 2 2004 musi mieć masę? Czy stacyjka w Skoda Octavia 2 musi być przykręcona?