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
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...
Nagraj makro jak robisz to czego oczekujesz od makra.
dzienniki zmian SDK 2.0 i SDK 1.3.7 mają tę samą funkcjonalność. (646/143) 1. Dodano przepływ sterowania daemon_thread. 2. Domyślnie metoda connect jest blokująca. Aby użyć metody nieblokującej, włącz makro NO_BLOCK w rda59xx_daemon.c. 2017-02-11 V1.3.6(534) 1. Naprawiono błąd w pwm i dodano funkcje kontrolne dla pwl0 i pwl1. Zobacz przypadek testowy:...
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...
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.
Proponuję nagrać makro.
Drogi kolego. Próbujesz wyważyć drzwi, które są już otwarte. Czy zdajesz sobie sprawę, kiedy został wydany AcrobatReader 4 ? Po co kombinować, skoro wystarczy wybrać jeden z oferowanych za darmo programów do tworzenia plików PDF ? Nie rozumiem, dlaczego upadłeś się na zastosowanie jakiegoś bardzo starego marka, skoro nie jest to zupełnie konieczne....
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 :crazyeyes: Załącz przykładowy plik z opisem: wyboru strony, wyboru arkusza i wyboru kolumny, oraz co to znaczy "te same strony" :cunning:
? 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.
Sprawdź w Ustawieniach strony , czy zaptaszkowane "Drukuj wszystko na jednej stronie"
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.
Rozwiązałem swój problem w nast. sposób: Sub drukowanieprawidlowe() ' ' drukowanieprawidlowe Makro ' ' Dim i As Integer i = InputBox("Numer wiersza") Workbooks.Open Filename:="C:\Users\Dominik\Desktop\Zesz... Application.Left = 1 Application.Top = 1 Application.Width = 720 Application.Height = 780 Windows("Zeszyt1.xlsm").Activate Cells(i, 1).Select...
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 = ""...
Żeby nie rozpisywać się za bardzo powiem, że dla początkujących niezastąpiony jest rejestrator makr. Wystarczy wybrać z menu rejestrowanie, wykonać wszystkie czynności zgodnie z opisem i zapisać. Potem takie zapisane makro można (metodą prób i błędów) dostosować do własnych potrzeb.
Mało szczegółów, to i kod taki sobie. ;) Super, bardzo mi pomogłeś. Udało mi się ogarnąć makro z drukowaniem. Dziękuje :) Chciałbym jeszcze dodać do kodu aby drukowanie było możliwe tylko przy wpisanym numerze, jeśli komórka będzie pusta lub błędnie wpisana to może wyświetlać jakąś informację.
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...
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...
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...
Czesc, witam Potrzebuje pomocy. W zakladce "Centrum" w punkcie G7 mam do wyboru liste rozwijana, ktora zawiera nazwy zakladek: GREEN BLUE YELLOW GREY BLACK All Drukowanie samo w sobie, gdy wybieram dana zakladke i klikam makro - dziala. Strona sie drukuje. Potrzebuje dograc jeszcze opcje, w ktorej gdy wybiore "All" to wydrukuja sie wszystkie zakladki....
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...
(at)PRL Przepraszam za złe wytłumaczenie mojego problemu. Postaram wytłumaczyć jaśniej: 1. W arkuszu "MENU" w komórce F5 makro wstawia na przykład liczbę 1 2.W arkuszu"AAA" i "BBB" muszą zaciągnąć się funkcje 3.Drukowanie arkusza "AAA" do domyślna drukarkę 4. Makro sprawdza czy w arkuszu "MENU" w komórce G13-jest rożna od pustej: 4.1 jeżeli komórka...
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...
Jeśli można uprościć to fajna sprawa, faktycznie nie pomyślałem o tym aby filtrować i od razu drukować. Nie wpadłem na ten pomysł :). ad.1 ) arkusze mają być czyste bez filtra, widocznie puściłem inne makro z filtrem ad.2) publikacja pdfa po zapisie, była włączona do testu, domyślnie ma być wyłączona
Cześć, od razu chcę poinformować, że jestem totalnie zielony 😉 tworzę plik w którym w Arkusz1 mam wzór raportu w którym w odpowiednich polach zmieniają się dane na podstawie wybranego dnia, a następnie drukowany do PDF. W Arkusz2 mam bazę danych na podstawie której wypełniany jest raport w Arkusz1. Każdy dzień w bazie to osobna kolumna. Takich raportów...
Raczej exel z przyciskiem drukuj, tzn makro do Excela. Tutaj już mam listy. Wogole dzięki za odpowiedz😊
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.
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
Ma ktos moze pomysł jak to obejsc :?: makrem ?? Co to znaczy "obejść makrem" :?: Bez żadnego "obchodzenia" trzeba zaprojektować (lub nagrać) makro filtrujące dane wg wszystkich kryteriów (tzn. sekcji) i eksportujące wyfiltrowane dane do PDF :idea: Jeśli nie zamieszczasz przykładowego pliku to trudno zaproponować Ci konkretny kod :cry: Ale za pomocą...
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. Proszę o pomoc. Potrzebne mi jest makro w Excelu, które będzie uruchamiać się po zmianie zawartości komórki, czyli jak ktoś coś wpisze i zatwierdzi enterem to ma się uruchomić makro. Samo makro ma działać w następujący sposób, że po zmianie zawartości w A1/Arkusz1, zostanie uruchomione drukowanie tej komórki, a jednocześnie jej zawartość zostanie...
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
Dzięki, za zainteresowanie. Mas rację, lepsze będzie zwykle pole, ale mi głownie chodzi i te drukowanie w pętli. Jak je dobrze napisać.
Tu makro z mojej fakturki (Calc). Dostosuj do własnych potrzeb. [syntax=vbscript]Dim arkFakt As Object 'Dim arkOpc As Object Sub Drukuj oDoc = ThisComponent Dim mPrintopts1(1) As New com.sun.star.beans.PropertyValue arkFakt= Thiscomponent.Sheets.GetByName("Faktura"... 'arkFakt.GetcellByPosition(5,5).string = "oryginał" mPrintopts1(0).Name="Pages" mPrintopts1(0).Value="1"...
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...
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...
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 Makro wysyła na drukarkę te arkusze dla których jest słowo "TAK", drukowanie ma być dwustronne. W tamtym roku drukowało się dwustronnie. W preferencjach drukarki jest ustawione wydruk dwustronny, a nie drukuje dwustronnie tylko jedno stronie. Gdzie jest błąd, powód takiej zmiany? [syntax=vbnet] Sub drukuj() For x = 6 To Cells(Rows.Count, 3).End(xlUp).Row...
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....
W jaki sposób ustawienia strony mogą tak zniekształcić wydruk? 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 Makro w pliku autora wymusza drukowanie całego obszaru wydruku (z dwiema dużymi grafikami :cry: ) na jednej stronie - Excel próbuje to zrealizować...
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
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
Nie wiem czy dobrze zrozumiałem myśl użytkownika "krzys.kas" Znawcy vba pewnie mnie wyśmieją za kod poniżej: Dodano po 1 Coś ala Nie mam drukarki. Jutro sprawdzę twój kod. Jestem przekonany że będzie działał. :D Dodano po 7 Zapomniałem podać że wartość TAK będzie zmienna. Nie jest wartością stała-przypisaną do arkusza. W jednym przypadku będzie 6 arkuszy...
Baaaardzo teoretycznie .... rdzeń Acrobata jest dostępny jako komponent (może COM+), hipotetycznie jest możliwe napisanie własnego programu (opakowania) który zleca drukowanie . Dla wordów najbardziej naturalne by było makro wewnętrzne dla Worda (ale to nie ma nic wspólnego z Delphi) Po drugie jest generalny standard jak aplikacja integruje się z File...
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...
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
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.
Chodziło chyba o to, że w .PageSetup.PrintArea podaje się zakres komórek do wydruku, a u Ciebie są tam jakieś ścieżki podane... W każdym razie spróbuj może dla odmiany drukowania z linii komend i starego, dobrego .vbs ;) Choć zdaje się, że VBA też to zrozumie jak wstawisz ten kod do makra... 1. utwórz plik z rozszerzeniem .vbs i wklej mu poniższy kod,...
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)...
U mnie działa bez zarzutów - sprawdź w swoim źródle danych, czy aby po ostatnim wierszu nie masz jakiś pustych (usuń je). Ewentualnie zawsze możesz skorygować RecordCount o 1. Jeśli chodzi o drukowanie do PDF, to: - ściągnij i zainstaluj PDF Creator, - uruchom go, w Drukarka->Opcje->Autozapis zahacz "Używaj funkcji autozapisu", w polu Nazwa pliku...
makro drukowanie drukowanie excel makro makro drukowanie excela
monitor lusterku okolice bydgoszczy programować mikroprocesor atmega8
reset pieca buderus problemy diagbox
Nice MCA5 - migająca dioda STOP, diagnostyka Yamaha A-S1000 - Samoczynne włączanie przycisku Mute
