FAQ  Regulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj  Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ Strona Główna » Główna kategoria forum » Mam problem z makrem » Ewidencja faktur Idź do strony:  «   1 2 3 Poprzedni temat «» Następny temat ID tematu: 178 Ewidencja faktur Autor Wiadomość Trebor  Excel Expert Pomógł: 1752 razy Posty: 4680 Wysłany: 10-01-2007, 15:47    Sprawa przynajmniej dla mnie nie jest prosta. Poczytaj tu: http://www.vbamania.estre...cz&id_watek=748 Niezupełnie na temat, ale może się przyda. Pozdrawiam _________________ Trebbor@wp.pl ID posta: 1222 Tajan Pomógł: 5501 razy Posty: 11968 Wysłany: 10-01-2007, 18:36    triple_6 napisał/a: jak wyglądałby zapis kopiowanego obszary do pliku graficznego np, JPG ? Spróbuj tak: Kod: Sub KopiujJakoObraz() nazwa = ActiveSheet.Name Range("B2:N108").CopyPicture xlScreen, xlBitmap With Sheets.Add     .PasteSpecial     With Selection       With ActiveSheet.ChartObjects.Add(1, 1, .Width + 8, .Height + 8).Chart            .Paste            'zapis w folderze skoroszytu            .Export ThisWorkbook.Path & "\" & nazwa & ".gif", "GIF"            'zapis w określonym folderze            '.Export "c:\folder\" & nazwa & ".gif", "GIF"       End With     End With     Application.DisplayAlerts = False     .Delete     Application.DisplayAlerts = True End With End Sub Zapisuje jako plik GIF, ale można również jako JPG (o ile na komputerze są odpowiednie filtry, a z tym bywa różnie ). U mnie plik GIF jest wyraźnie mniejszy od JPG. ID posta: 1227 Krzysiek  Sympatyk Excela Pomógł: 3 razy Posty: 275 Wysłany: 10-01-2007, 20:42    Jestem znów w tym wątku. Po próbach zrezygnowałem z tworzenia obrazu przykładowej faktury z Wordzie ze względu na "martwotę" czyli braku możliwości formatowania. Ale oświeciło mnie: czy można taką kolejną utworzoną przykładową fakturę - czyli arkusz pliku faktura.xls zapisać w Excelu jako całkiem nowy plik a nie jak kolejny arkusz tego pliku?-pytanie kieruję do ekspertów. Poza tym zapytanie? Nie wiem jak załączać pliki w postach, nie widzę żadnych przycisków do tego służących! ____________________ Pozdrawiam ID posta: 1231 Tajan Pomógł: 5501 razy Posty: 11968 Wysłany: 10-01-2007, 21:08    Krzysiek, tworzenie nowego skoroszytu z fakturą można zrobić np. takim makrem: Kod: ActiveSheet.Move     ActiveSheet.UsedRange.Formula = ActiveSheet.UsedRange.Value     With ActiveWorkbook        .SaveAs "g:\dane\" & ActiveSheet.Name & ".xls"        '.Close ' - jeżeli chcesz natychmiast zamknąć     End With Powyzszy kod można dopisać np. na końcu procedury CmdZatwierdz. Odnosnie wstawiania załączników, to pewnie korzystasz z okna "Szybka odpowiedź". Natomiast, aby było możliwe wstawianie załączników kliknij na "Odpowiedz" na końcu wątku, lub "Cytuj" nad każdym postem. Na końcu tak otwartej strony odpowiedzi masz przycisk do wyboru załącznika i nastepny, do jego dodania. ID posta: 1233 Krzysiek  Sympatyk Excela Pomógł: 3 razy Posty: 275 Wysłany: 11-01-2007, 08:50    Uogólnię problem. Mam plik np. Krzysiek.xls z, dajmy na to, z trzema arkuszami: Arkusz1, Arkusz2, Arkusz3. W Arkuszu2 wykonywane są obliczenia. Po zaktualizowaniu danych i wykonaniu obliczeń w Arkuszu2, chcę ten Arkusz2 chcę zapisać jako oddzielny plik o nazwie np. Odbiór.xls. O taki problem chodzi. Zawsze korzystałem z okna "Szybka odpowiedź" (teraz też). Nie wchodziłem do okna "Odpowiedz" i dlatego nie widziałem przycisków wyboru załączników. ________________ Pozdrowienia. ID posta: 1248 triple_6  Starszy Forumowicz Posty: 49 Wysłany: 11-01-2007, 10:14    Tajan napisał/a: Krzysiek, tworzenie nowego skoroszytu z fakturą można zrobić np. takim makrem: Kod: ActiveSheet.Move     ActiveSheet.UsedRange.Formula = ActiveSheet.UsedRange.Value     With ActiveWorkbook        .SaveAs "g:\dane\" & ActiveSheet.Name & ".xls"        '.Close ' - jeżeli chcesz natychmiast zamknąć     End With Powyzszy kod można dopisać np. na końcu procedury CmdZatwierdz. Odnosnie wstawiania załączników, to pewnie korzystasz z okna "Szybka odpowiedź". Natomiast, aby było możliwe wstawianie załączników kliknij na "Odpowiedz" na końcu wątku, lub "Cytuj" nad każdym postem. Na końcu tak otwartej strony odpowiedzi masz przycisk do wyboru załącznika i nastepny, do jego dodania. Witam ponownie. sprawdzając ten kod zauważyłem że usuwa on arkusz przy zapisie do oddzielnego. co więc zrobić aby tak nie było? siedzę przy tym od wczoraj i nic mi nie wychodzi. pomocy !!! ID posta: 1251 Trebor  Excel Expert Pomógł: 1752 razy Posty: 4680 Wysłany: 11-01-2007, 10:20    W miejsce Move wpisz Copy _________________ Trebbor@wp.pl ID posta: 1252 triple_6  Starszy Forumowicz Posty: 49 Wysłany: 11-01-2007, 10:24    Dzięki. Teraz mi głupio Dzięki jeszcze raz ID posta: 1254 Tajan Pomógł: 5501 razy Posty: 11968 Wysłany: 11-01-2007, 23:35    Dorzucę jeszcze jedną uwagę do tego wątku. Uważam, że niepotrzebne jest archiwizowanie faktur jako arkusze czy oddzielne pliki. Skoro już tworzymy baze danych zapisując w niej dane faktur, to zawsze, w razie potrzeby, możemy fakturę odtworzyć, pobierając jej dane i zapisując do odpowiednich pól szablonu. ID posta: 1295 triple_6  Starszy Forumowicz Posty: 49 Wysłany: 11-01-2007, 23:39    zgadza się, ale to już bardziej aby troszkę posprawdzać różne makra. Jestem w tym laikiem i zawsze przyda się trochę praktyki ID posta: 1296 Wyświetl posty z ostatnich: Wszystkie Posty15 Minut30 Minut1 Godziny2 Godzin6 Godzin12 Godzin1 Dzień2 Dni3 Dni4 Dni5 Dni6 Dni7 Dni2 Tygodnie1 Miesiąc3 Miesiące6 Miesięcy1 Rok Najpierw StarszeNajpierw Nowsze  Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ Strona Główna » Główna kategoria forum » Mam problem z makrem » Ewidencja faktur Idź do strony:  «   1 2 3 Nie możesz pisać nowych tematów Nie możesz odpowiadać w tematach Nie możesz zmieniać swoich postów Nie możesz usuwać swoich postów Nie możesz głosować w ankietach Nie możesz załączać plików na tym forum Możesz ściągać załączniki na tym forum Dodaj temat do Ulubionych Wersja do druku Skocz do: Wybierz forumExcel Forum - Porady, Pomoc, Excel Help, Excel FAQ Strona Główna|--Ogłoszenia|   |--Ważne informacje|--Główna kategoria forum|   |--FAQ - Najczęściej zadawane pytania|   |--Mam problem z formułą|   |--Mam problem z makrem|   |--Tabele przestawne, Power: Pivot, Query, View, Map|   |--Mam problem z wykresem|   |--Jak to zrobić?|   |--Współpraca Excel a inne aplikacje pakietu Office|   |--Zadania z Excela|   |--Google Sheets|   |--Interfejs wstążki MS Office|   |--Konkursy, zagadki, pomysły|   |--Tematy Ogólne|--Problemy dotyczące działania forum  Powered by phpBB modified by Przemo © 2003 phpBB Group Theme xandgreen created by spleen& Programosy modified v0.3 by warna Opieka techniczna www.wip.pl Archiwum

Strona uĹźywa plikĂłw cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przegl�darce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
SprawdĹş, w jaki sposĂłb przetwarzamy dane osobowe