Wpisz sobie jako parametr: [syntax=vbscript]Copies:=Range("A1").Val... A1 jest adresem komórki, gdzie masz wpisaną liczbę kopii. Można też użyć nazwy tej komórki, jeśli komórka została jakoś nazwana.
kwestia zabawy z ustawieniami strony i marginesów To wcale nie jest zabawa :| - to jest bardzo ważny element całej procedury VBA, bez pełnej jasności co wchodzi w obszar wydruku (czy tak jak pisałeś wcześniej Arkusz2!A2:B25, czy Arkusz1!A1:G45 :cry: ) nie można zbudować prawidłowego kodu makra :not: Najprostszą metodą uzyskania makra (również w OpenOffice)...
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
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
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
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...
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".
Próbujesz w OpenOffice uruchomić makro napisane w Excelu? Nie będzie działać. Trzeba przepisać. Mnóstwo informacji znajdziesz w Internecie. Tu przykład makra wydruku z zapisaniem "oryginał/kopia": http://obrazki.elektroda.pl/5534132900_1... Generalnie nie jest to trudne. Trzeba "złapać". Zakres C7:C10 aktywnego arkusza w VBA zapisujesz...
Plik działa, ale wymaga abym nazwę wpisał sam i wskazał adres zapisu Jakoś nie widzę zapisywania. Powinno być w pytaniu po Else... Czas mierz przed msgbox'em z pytaniem, a wynik możesz wyświetlić w tytule.
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]
Załączam przykładowe makro: - zapisu do pdf bieżącego arkusza Excela - wydruk pliku arkusza za pomocą komendy Shell i Acrobat DC - wydruk zewnętrznego pliku *.pdf za pomocą komendy Shell i Acrobat DC. Nie ma żadnych zabezpieczeń (błędne ścieżki, brak plików itp.) Trzeba uzupełnić własną ścieżkę do Acrobat.exe. Oczywiście to tylko prosty przykład, możliwości...
Makro przygotowane w Excelu 2003 (ale powinno działać): Sub Makro1() For a = 3 To 8 'te arkusze bierze pod uwagę Sheets(a).Select If Range("J1") > 0 Then ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End If Next End Sub
Zacznij od: http://obrazki.elektroda.pl/2291354500_1... Wpisz adres dowolnej komórki. Np A1 W makro If Range("A1")=True Then
Natomiast mam pytanie. Ponieważ gdy chce drukować ten dokument zawsze dostaję informacje że marginesy są błędnie ustawione i czy chce kontynuować wydruk Podmień makro do drukowania i zobacz. [syntax=vbscript]Sub PrintToSpecificPrinter() Dim PrinterName As String PrinterName = "STL-TE100" ' Save the current active printer Dim currentPrinter As String...
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...
Arkusz Google Makro Napisałem makro dot. drukowania arkusza Google. Makro sprawdziłem poprzez debugowanie i jest ok. Niestety makro drukarki nie uruchamia i brak druku. W czym może tkwić problem?
Może i Makrem byłoby łatwiej ale.....poległem. No to masz z instrukcją "if" :) (dodane do twojego kodu) [syntax=vbscript]Private Sub CommandButton4_Click() On Error Resume Next 'po błędzie kontynuuje dalej Application.ScreenUpdating = False DatExample = Date Dim s As String s = "C:\Users\jasuc\OneDrive\Tamex Żwirkop\Kopia Dane Tamex\PDF\" y = 2 With...
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.
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...
Witam, Potrzebuje Makro które będzie automatycznie drukować mi wybrane strony wybranego arkusza po czym będzie zaznaczać następną komórkę w wybranej kolumnie i będzie drukować te same strony aż następna z kolei komórka w kolumnie będzie pusta. Da się to zrobić poprzez makro?
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...
Probowalem dziala, jezeli chce uzyc to makro na innym komputerze to drukuje wszystko na zwyklym papierze (ilosc kopi sie zgadza ), poprawiam makro i niedziala u mnie :(
[syntax=vbscript]Sub Etykiety() Set a = Sheets("Arkusz1") Set b = Sheets("Arkusz2") For x = 2 To a.Cells(Rows.Count, "A").End(xlUp).Row b.Cells(2, 3) = a.Cells(x, 1) b.Cells(4, 3) = a.Cells(x, 2) b.Cells(6, 3) = a.Cells(x, 3) b.Range("A1:C8").PrintOut Next End Sub[/syntax]
Witam, potrzebuję napisać makro w Excelu, które będzie drukowało etykietę towarową po zeskanowaniu kodu kreskowego. Na etykiecie ma się znajdować, nazwa towaru, cena, nr katalogowy ewentualnie kod kreskowy. Wszystkie dane mają być pobierane z komórek znajdujących się w arkuszu kalkulacyjnym. Drukarka etykiet to Dymo label writer 450.
Dzięki wszystkim ale już sobie poradziłem, skorzystałem z nagrywania makr :) i później zapisałem to do "przycisku" i teraz otwierając dokument który ma stron np. 40 a ja ustawie się na stronie 35 i uruchomię makro to drukuje mi tylko stronę na której aktualnie jestem czyli 35 Pozdrawiam Jarek
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...
Nie musisz mieć pojęcia o kodowaniu w VBA do niektórych rzeczy. Jest coś takiego, jak rejestrator makr. Naciśnij nagrywanie, naciśnij przycisk drukowania, zakończ nagrywanie. I Rejestrator utworzy dla Ciebie makro, które będzie dokładnie to robić. https://support.microsoft.com/pl-pl/offi...
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.
Witam. Szukam makra które umowżliwiało by drukowanie plików word pokoleji. Zaznaczam np 100 plików word i chciałbym by drukowało ponumerze zapisanego pliku.
Proponuję nagrać makro.
Witam. Codziennie muszę drukować stały, określony zakres komórek w jednym arkuszu. czy jest możliwość aby po kliknięciu przycisku - makro zaznaczało taki obszar, wybrało jedną z trzech drukarek sieciowych (niekoniecznie tę ustawioną jako domyślna) i...... wydrukowało?
Dokładnie o to mi chodziło. To jeszcze przy okazji jakbym mógł prosić o pomoc z makro do drukowania konkretnego obszaru oraz z przypisaniem makro do konkretnej komórki (np A1). Do tej pory makro przypisywałem do przycisków.
Witam, Mam problem,chciałbym sobie ułatwić życie w pracy, ale jestem totalnym laikiem w tworzeniu makro. Opiszę problem: Mam szablon pliku excell w którym wpisuje dane do okreslonego zlecenia które później za pomocą makra (nie moja robota) lądują w tym pliku posortowane na 10 różnych arkuszach. Problem pojawią się kiedy kazdy arkusz z osobna drukuje...
Dziękuję bardzo wszystkim co nie omieszkali zainteresować się tematem. Potrzebuję usprawnić uruchomianie dwóch makr ,pierwsze makro pobiera dane z pliku tymczasowego i go zamyka. Drugie makro tylko uruchamia drukowanie. Oba makra są podpięte pod kształt i uruchomiane ręcznie. Obecne makra są OK tylko chciał bym aby po kliknięciu w pierwsze makro i wykonaniu...
Widzę, że wątek wisi od... zimy ;) Makro przy wydruku, czy zapisie wymaga zdarzenia. Tu się w OO sprawa komplikuje. O wiele łatwiej będzie napisać makro drukowania dla przycisku i w nim umieścić numerację...
Witam, potrzebuję zrobić wydruk w pdf z pliku z załącznika z zakresu kolumn L-Q,kryterium ma być data z kolumny Q. Dobrze jak mógłbym dodać szablon drukowania czyli np logo firmy i stopkę. Wydruk mógłby robić się tak jak zrobiłem przyciski przyjęcie i wydanie, czyli klikam "WD druk" pojawia się okienko wpisuję datę i "drukuj". Z góry dziękuję za pomoc...
takie coś wymysliłem że jeśli ktoś sobie założy filtry to potem skopiuje CRM do innego nowo powstałego arkusza i wtedy bedzie wklejac... ale jeszcze pętle bym potrzebował bo ja zrobilem sobie na A2 A3 A4 tylko tak zeby zboaczyc czy bd chodzic [syntax=vb]Sub drukuj() ' ' drukuj Makro ' ' Klawisz skrótu: Ctrl+Shift+Z ' Sheets("Dane").Select Range("B2:B370").Select...
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...
Kasiu mam takie makro, może ktoś ci pomoże i je przerobi. [syntax=text]Sub drukuj() Dim x As Long, LastRow As Long AllArkusz = Array("SP1:SP50") LastRow = Worksheets("MENU").Cells(Rows.Count, "D").End(xlUp).Row For i = LastRow To 1 Step -1 If Worksheets("MENU").Range("D" & i).Value = "TAK" Then With Worksheets("SPIS" & i - 5) .PrintOut End With Else...
Witam. Proszę o pomoc w napisaniu makra które będzie drukowało informacje zawarte w komórce A1 na drukarce zebra zainstalowanej w sieci na innym komputerze (drukarka drukuje etykietę z nazwą klienta zawartą w komórce A1) po naciśnięciu przycisku "drukuj nazwę klienta" a drugie makro drukuje cały arkusz zawierające pozostałe dane na drukarce domyślnej...
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.
PPM tak się nie da. Drukuje nie w kolejności. Dodano po 1 Tym makrem które podesłałem o sprawdzenie, robiłem w WORD 2007 i edytowałem scieżke makra, potem zapisz, potem klikałem zaznacz PPM obszar wydruku plików word w folderze i mi drukowało makro w kolejnosci. W 2010 WORD makro nie drukuje kolejno. Ktoś ma jakiś pomysł?
Sprawdź w Ustawieniach strony , czy zaptaszkowane "Drukuj wszystko na jednej stronie"
Nagraj makro jak robisz to czego oczekujesz od makra.
Gdyby faktycznie miało sens drukowanie (czy zapisywanie w pdf) jednej kolumny arkusza z kilkadziesiąt czy kilkaset wierszami :D - to wówczas lepiej wykorzystać domyślne ustawienia Excela do ustalenia długości jednej strony (zapewni to lepszą czytelność wydruku niż Twoje 70 wierszy na stronie). Przy takich założeniach :idea: wystarczy wykorzystać kod...
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...
Dzieki postaram ale nie wiem czy poradzę sobie. Dodano po 2 Udało się. Makro drukuje bieżąca strone: Sub Makro1() Dim CurPg As Integer CurPg = Selection.Information(wdActiveEndPageNum... With Dialogs(wdDialogFilePrint) .Range = wdPrintRangeOfPages .Pages = CurPg .Execute End With ' End Sub Zamykam temat
Prosze o pomoc, bo wyskakuje mi blad, ze if jest zablokowany. [syntax=vbscript]Sub Printing() Target = Sheets("Centrum").Range("G7").Value If Target = "All" Then For Each s In Sheets(Array("GREEN", "BLUE", "YELLOW", "GREY", "BLACK")) s.Visible = True s.PageSetup.PrintGridlines = True s.PrintOut Copies:=1, Collate:=True s.Visible = False Next End If...
Próbowałeś nagrać makro?
Witam. Mam makro, które w zależności od wartości komórki "F6 >0" drukuje tylko te karty. Niestety tylko jednostronnie, a chciałbym aby to był wydruk dwustronny. Gdy wybiorę karty ręcznie i dam "drukuj aktywne arkusze" drukuje mi dwustronnie (opcja włączona w ustawieniach drukarki na stałe). W arkuszu są 74 karty. Proszę o pomoc, co jest nie tak?. To...
Dość chaotyczny ten opis :) Uporządkujmy... 1. Chcesz przekonwertować, po prostu, dane z "Arkusz1" do "spis"? Tak/Nie (niepotrzebne skreślić) 2. Jak odbywa się praca z tym plikiem? a) czy przybywa danych w "Arkusz1" na bieżąco (są dopisywane, zastępowane, w inny sposób) b1) czy "spis" jest arkuszem jednorazowym. Uruchamiasz makro, drukujesz/zapisujesz...
W załączonym pliku napisałem makro do drukowania etykiet, spełniające założenia. Trzeba dokończyć ostateczną formę wydruku, nie stanowi to większego problemu.
Witam. Owszem jest to do zrobienia...mało z tego całkiem prosto :D... Zacząć nalezy od makra, które tworzy nowy arkusz...nastepnie wklejane są dane i numer...nastepnie wydruk arkusza o numerze [ilosc arkuszy]...nastepnie zamkniecie arkusza o tym samym numerze... a wszystko w pętli aż do natrafienia na pusty wiersz - bez danych
Dziękuję bardzo :) Ja wymyśliłem troszkę bardziej pracochłonne rozwiązanie, oparte na funkcjach logicznych i kodzie : [syntax=actionscript] Sub Druk_1() ' ' Druk_1 Makro ' Worksheets("drukuj").PrintOut From:=1, To:=Range("V8").Value, Copies:=1, Collate _ :=True, IgnorePrintAreas:=False End Sub[/syntax] Twój kod działa wyśmienicie. Dziękuję jeszcze raz
Raczej exel z przyciskiem drukuj, tzn makro do Excela. Tutaj już mam listy. Wogole dzięki za odpowiedz😊
Posiadam makro umożliwiające drukowanie wiadomości bez nagłówków w MS Outlook 2000. Wszystko działa OK. Chciałbym w tym makrze narzucic drukowanie do określonej drukarki (innej niż domyślna). Czy jest taka możliwość? Sub PrintWithoutHeaders() Dim oMail For Each oMail In Application.ActiveExplorer.Selection oMail.Copy ' Usuń nagłówek DO oMail.To = ""...
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...
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
Serdeczne dzięki w podobny sposób próbowałem, ale mam pytania: Niżej podaję tekst makra, które w podany wyżej sposób zarejestrowałem, ale nie wiem co mam zmienić żeby makro drukowało na dowolnej drukarce (domyślnej na innym PC), tak zarejestrowane drukuje tylko na "Marek HP DeskJet 1220C Printer". Czy można jakoś wyłączyć drukowanie przycisków, chodzi...
Proszę krok po kroczku 1. "Baza danych" musi mieć identyczną budowę (jeśli chodzi o kolumny) jak arkusz spisowy (zwłaszcza pod względem komórek scalonych :!: ) :arrow: najlepiej zrobić do wydruku kopię arkusza "Arkusz danych (2)"; 2. Ze wzoru arkusza spisowego robisz zrzut stopki wydruku 932190 3. W "Arkuszu danych (2)" wyfiltrowujesz tylko dane z...
Hej Mam problem z napisaniem makra dla arkuszy google zaimportowałem stary arkusz Excela do arkuszy i przekonwertowałem makra ale nie działa mi makro drukujące wyznaczony zakres bo naciśnięciu przycisku. Czy miał ktoś podobny problem i wie jak to rozwiązać? Próbowałem szukać w google rozwiązań i nie znalazłem nic sensownego może ktoś pomoże
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....
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.
Dlaczego w ogóle te dane kopiujesz do Worda? Nie jest tak, że po skopiowaniu drukujesz etykiety na palety? Co to znaczy 'nadpisywać numery'? W załączniku plik xlsm - podwójne kliknięcie w kolumnę 'Dostawa'.
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.
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.
Arkusz kalkulacyjny zawiera makra. Sprawdź, może w nich jest przyczyna. Makro może wiele. :cry:
Cześć, Sprawdziłem makro, działa rewelacyjnie. Pomysł z drukowaniem super. Prościej i łatwiej :) Teraz nauka (porównanie) i analiza Twojego kodu vs mój, mam się na czym uczyć :) Dziękuję za pomoc i pozdrawiam.
Poszukuje u forumowiczów pomocy. W załączniku znajduje się plik. Do niego potrzebowała bym makra. W arkuszu"BAZA" w komórce U3 makro wstawia liczbę 1, następnie drukuję ten arkusz(od komórki A1 do komórki F51), drukowanie odbywa się na domyślną drukarkę i drukowanie dwustronne, następnie makro zmienia liczbę 1 w komórce U3 na liczbę 2 i znów drukuje...
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"...
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...
Po pół godzinie wczytywania się załapałem (chyba) o co chodzi. Po pierwsze czy aby na pewno nie będzie interesowało cię za co klient zapłacił? Bo czyszczenie danych i przygotowywanie do kolejnego "wpisu" zlikwiduje szczegóły (składowe) danej wpłaty. Druga rzecz związana z brakiem sumowania. Może jest błędna formuła (nie uwzględnia wszystkich komórek)...
Koledzy i koleżanki mam prośbę do was odnośnie vba w wordzie 2013. Mam makro które drukuje(wg. ustawień drukarki). Potrzebował bym makra które po kliknięciu drukuje i po po wydruku zamyka worda 2013. Oto mój kod odnośnie drukowania: Dodano po 2 Mam takie makro które ma zamykać okienko bez zapisywania danych. Mam problem z tym makrem bo strasznie długo...
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.
Hej, Próbowałem nagrać makro ale po pierwsze trwa to bardzo długo a po drugie nie drukuje tylko przenosi do panelu wydruku. Wiktor
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....
Dziękuję za podpowiedz ja mam u siebie takie macro: [syntax=vbscript]Sub Drukowanie() ' ' Drukowanie Makro ' Sheets("WNIOSEK O WYPŁATĘ").Select Range("A1:BS45").Select Selection.PrintOut Copies:=1, Collate:=True Sheets("FORMULARZ").Select Sheets("Polecenie").Select Range("A1:AX68").Select Selection.PrintOut Copies:=1, Collate:=True Sheets("FORMULARZ").Select...
Prawdą jest, że powinno się program wykonać w Accessie. Można jednakże dużo wykonać w Excelu i prezentuję mój pomysł na rozwiązanie problemu.W dołączonym pliku zamieściłem przykładowy kod do drukowania etykiet. Na stronie "Wydruk" jest przycisk uruchamiający makro. Wielkość wydruku należy ustawić w zależności od drukarki. Ustawienie obszaru wydruku...
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...
Prot jesteś mistrzem wszystko działa czy zrobił byś mi makro/przycisk które drukował by pojedynczy arkusz? P.s - Mam jeszcze pytanko bo widzę że twoja wiedza o Excelu jest wielka czy można zrobić tak aby w arkuszu "Magazyn główny" stany nie wchodziły na minus? https://obrazki.elektroda.pl/5866923700_...
Proszę o foto wykonanych płytek, najlepiej makro.
dokument PDF dla każdej wybranej wartości Myślałem, że filtr wybierz recznie i Drukuj. To chcesz że makro samo wybiera wszystkie filtry?
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ć...
Borykam się z problemem założenia pętli. W załączonym pliku nie ma żadnej pętli, z którą byłby problem. Chciałbym założyć makro, które będzie mi drukować wskazane indeksy... Co stoi na przeszkodzie?
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...
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. Dalej rozwijam mój projekt :) Mam nadzieję na wsparcie w tym temacie. Tym razem chciałbym aby po zeskanowaniu określonego kodu kreskowego było uruchamiane makro. https://obrazki.elektroda.pl/8151866500_... Makro ma zapisać i drukować zeskanowane informacje z kodu kreskowego. W przestrzeni wolnej między wierszami mam zamiar zapisać...
Witam chciałbym określić zakres drukowania oraz miejsca gdzie zaczyna i kończy się strona przy w zależności od zmiennej. Po nagraniu makra pokazuje mi się następująca formuła [syntax=text]ActiveSheet.PageSetup.Print... = "$A$1:$G$65" Set ActiveSheet.HPageBreaks(1).Location = Range("A13") [/syntax] czym zastąpić "$A$1:$G$65" oraz Range("A13") żeby można...
Jestem zielony w vba word. Mam WORD 2013. Mam kod, który drukuje dokumenty worda po kolei. Tak było rok temu, wszystko było ok, ale dziś w ogóle nie można wydrukować. 0001 012356 Marek Koniarek do 1000 056895689 Michał Dworek . Pliki word są podzielone na setki. Makro zawsze drukowało pokolei od 0001 do 0100. Teraz wogóle nie chce. Gdzie jest problem....
Zrób sobie kopię pliku, w makro linię ".PrintOut" zamień na ".Printpreview" i odpal makro...
Numer aukcji nic nam nie powie. Możesz wrzucić dokładne, ostre fotki makro, tak aby widoczne były elementy i ich opisy. Obie strony płytki, może coś się uda... Na tej płytce drukowanej nie ma jakiegoś nadruku (wytrawionego, jak ścieżki) z serią i wersją (tzw. rewizją) modułu?
Możesz wrzucić dobrej jakości fotkę makro z tą płytką drukowaną? Najlepiej obie strony.
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...
Zapomniałem już o tym temacie, w każdym razie, napiszę rozwiązanie, bo elektroda ma dobre indeksowanie w google i ludzie mogą trafić na nie. Problemem jest Office 2010. Ma on bug w postaci braku obustronnego drukowania (duplex printing bug - sprawdźcie na forum M$ i innych). Rozwiązaniem jest zaimplementowanie do pliku z szablonem (worda, excela i każdego...
Na arkuszu "Nowa Hala Cyl." przypisać jedną komórkę dla indeksu, np. O1 Na arkuszu "Etykieta" w komorkach odwolania do arkuszu "Nowa Hala Cyl." np. dla C29 =INDEKS('Nowa Hala Cyl.'!H:H; 'Nowa Hala Cyl.'!O1) W kodzie arkusza 'Nowa Hala Cyl.' wpisz kod Dodano po 27 Edit Umieść kursor w wierszu, który chcesz wydrukować i kliknij przycisk
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...
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)....
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.
makro przycisku drukuj excel makro drukuj makro drukuj obszar wydruku
monter elektronik nokia trybie offline bester regulacja prądu
telewizor samsung restartuje telewizor samsung restartuje
Hikvision DS-KH6320-WTE1/EU brak komunikatu otwarcia drzwi Zbyt bogata mieszanka paliwa w Peugeot 206 1.4 benzyna - przyczyny i naprawa