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...
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...
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
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)...
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
? Wstawia się normalną, zwykłą tabelkę bez obramowań, a lewej/pierwszej komórce nadaje się białą barwę czcionki, w prawej/drugiej komórce pojawiać się będzie numeracja, i wszystko.
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...
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.
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".
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ś...
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...
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
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.
http://obrazki.elektroda.pl/2803855300_1... Potrzebny (bezpłatny) dodatek. I nagrane makro, w którym można podstawić string ze zmiennej. [syntax=vb]Sub Makro1() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\Adam\Desktop\plikPdf.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False,...
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]
... 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 ... I mamy koledze opracować algorytm i napisać funkcję generującą kod kreskowy...
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...
Znalazłem odpowiedź więc dzielę się z innymi: Oczywiście zakres "$A$7:$H$31" jest przykładowy i należy go wyedytować w zależności od naszych potrzeb. Sub Druk() With ActiveSheet .PageSetup.PrintArea = "$A$7:$H$31" Application.Dialogs(xlDialogPrinterSetup... .PrintOut .PageSetup.PrintArea = "" End With End Sub
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...
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...
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.
[syntax=vbscript]Do While .Cells(x, 20) <> 0[/syntax] podmień na: [syntax=vbscript]Do While Not IsError(.Cells(x, 20))[/syntax]
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...
Nagraj makro jak robisz to czego oczekujesz od makra.
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?
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...
[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]
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
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
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...
Musisz przygotować (nawet choćby nagrać) 2 makra: drukujące arkusz AAA i arkusz BBB tak jak chcesz. Możesz to uruchamiać klawiszami jak napisałem, albo jakkolwiek umiesz. Na końcu pierwszego makra dodajesz coś takiego: If Sheets("AAA").Range("G13") <> "" Then Call MakroBBB i drukowanie drugiego arkusza się uruchomi samo.
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...
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 :(
Witam. Niestety rozwiązania podane przez kolegę nie spełniają mojego założenia. Wszystkie makra drukują wszystkie strony. Też myślałem nad takimi rozwiązaniami.
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...
Proponuję nagrać makro.
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...
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.
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...
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...
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.
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.
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ę...
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.
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...
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.
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ł?
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.
Sprawdź w Ustawieniach strony , czy zaptaszkowane "Drukuj wszystko na jednej stronie"
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...
Próbowałeś nagrać makro?
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....
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.
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 = ""...
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)...
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.
Cześć Wszystkim! Tworzę swojego pierwszego makra w excelu i napisałem prostą procedurę (druk wybranej komórki na A4) Do tego chciałbym zastosować ją do każdej komórki z danej kolumny o ile w komórce jest cyfra lub inny ciąg znaków. Przykładowo mam 1000 numerów w kolumnie F i chciałbym zastosować moją procedurę automatycznego druku każdego z nich tak...
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...
Witam Jeden ze sposobów: z menu "narzędzia" wybierz "makro" następnie "zarejestruj nowe makro", wyświetli się okienko i poprosi o nazwę wpisz nazwę -drukuj- i kliknij "OK" kiedy rozpocznie się rejestrowania makra wykonaj takie ruchy jak byś chciał wydrukować bieżący slajd, czyli kliknij menu "plik" potem "drukuj" w opcjach zaznacz drukuj bieżącą stronę...
Arkusz kalkulacyjny zawiera makra. Sprawdź, może w nich jest przyczyna. Makro może wiele. :cry:
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
To pobieranie danych za pomocą formuł a wydruk za pomocą makra.
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....
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...
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
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'.
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.
Mam makro drukujące dane z arkusza. Chciałbym jednak mieć możliwość wyboru zakresu wydruku, tj. zamiast ustawionego na stałe zakresu .PageSetup.PrintArea = "$a$1:$R$100" móc np. pobrać z określonej komórki liczbę stron. Sub Wydruk_listy() With ActiveSheet .PageSetup.PrintArea = "$a$1:$R$100" If Not (Application.Dialogs(xlDialogPrinterSetu... Then...
:) 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...
Raczej exel z przyciskiem drukuj, tzn makro do Excela. Tutaj już mam listy. Wogole dzięki za odpowiedz😊
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...
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...
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...
A ja to robię tak. Załączam skoroszyt z czterema arkuszami 1-wartość w złotówkach wyrażona słownie (tylko funkcje arkusza) 2-Sprawdzenie poprawności NIP i REGON (j.w.) 3-Pod wyciąganą listą (która się nie drukuje) jest wartość 4-VBA nie nauczyłem się, używam makr (guzik drukowanie)
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.
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...
Zawsze używam takiego makra: AutoScriptWriter.exe
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...
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
Witam Odblokuj ten arkusz jako "widzialny" przygotuj ten arkusz (nie używając tego makra) wejdź w drukuj i podgląd wydruku i zobacz jak to wygląda czy wszystko jest na stronie
Mam bazę klientów, z których po dwukrotnym kliknięciu dokonuję wyboru konkretnych potrzebnych klientów. Następnie po uruchomieniu makra (ZAPISZ I DRUKUJ) chciałabym aby drukował się dokument, który tworzy się w Arkuszu2. Chciałabym także, aby dokument z arkusza2 zapisywał się do pdfa. I tu pojawia się problem. Działa wszystko poza zapisem pdf. Załączam...
W tamtym roku dwustronnie się drukowało W tym makrze nie ma się co 'zepsuć' jeżeli cały czas drukowało ok to raczej szukał bym błędu jednak po stronie drukarki. A jak dasz wydruk manualnie to drukuje dobrze?
Ja to widzę jakoś tak (zakładam, że komórka B1 to numer i jest złożony tylko z cyferek, wydruk na drukarkę domyślną bez pytania, strony od 1 do 1): [syntax=vb]Sub Makro1() Dim x As Integer x = Val(InputBox("Podaj liczbę kopii", "Liczba kopii", 1)) If x = 0 Then Exit Sub While x > 0 ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1 Range("B1").Value...
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
Witam, szukam dokładnie takiego makra udało się? Chodzi o guzik który uruchamia drukowanie podpiętego pliku,
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)....
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...
Chodzi o jakiś program bezplatny w którym będą umieszczone wszystkie makra. Otwieramy ten program i pokazuja wszystkie makra( tytu makra: edytuj dokument", czy "drukuje biezaca stronę", czy tez " obrobka decyzji" itp). Z pracy odszedl informatyk i pokasowal wiekszosc makr. Facet byl dobry bo pisal makra na 300 stron w wordzie. Z praca niechce mieć nic...
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ć...
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...
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...
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
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?
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ć...
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....
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?
drukowanie makro makro drukowanie drukowanie excel makro
naprawa czujnik paliwo aster czujnik temperatura smarowania łańcucha pilarki
latarka parkside winols pobierz
Ogrzewanie tylnej szyby nie działa w Citroen Berlingo 1.6 HDi 2013 Citroen Berlingo 1.6 HDi XTR 2013 - Ustawienia Klimatronika Dual
