Bardzo dziękuję za filmik i plik. Małe modyfikacje i już drugi miesiąc stosuję Twoje rozwiązanie. To przekonało mnie, że warto subskrybować Twój kanał 👍
Super pomocny plik & filmik ! Na starcie już w 2 miejscach będę mógł sobie usprawnić robotę !🙂 Pytanie mam: Czy jest gdzieś filmik z pokazaną akcją wyboru, które pozycje wydrukować ?
Coś cudownego - ułatwia bardzo pracę. Wiele można się nauczyć. Ale mam pytanie. Czy jeżeli dane mam w kilku arkuszach czy można wybrać najpierw arkusz a dopiero później pracownika i wygenerować raport? Jeżeli tak to jak mogę to połączyć? próbowałem kilku kombinacji ale nie wyszło. Czy trzeba jednak mieć dane w jednym arkuszu?
Dziękuję za komentarz. Odpowiadając na pytanie to tak można wybrać w pierwszej kolejności arkusz, z którego mają zostać pobrane dane do korespondencji. Można do tego użyć VBA lub zrobić wszystko w Excelu za pomocą np. formantów (przyciski opcji) oraz zmodyfikować kod tak, aby w zależności od wybranego arkusza pobierał prawidłowe dane. Przydatna tu będzie funkcja ADR.POŚR(). Należy jednak pamiętać, że musimy utworzyć dynamiczny adres do bazy danych, do nazw arkuszy jak i do list rozwijanych z danymi. Wszystkie przypadki obsługujemy funkcją JEŻELI() lub WARUNKI() ( Excel >= 2016) zwracając te dane do osobnych komórek a później modyfikujemy istniejące funkcje WYSZUKAJ.PIONOWO - dodając wspomnianą funkcję ADR.POŚR(), która odwołuje się do tych właśnie komórek (z funkcji jeżeli lub warunki). Pozdrawiam
Genialne. Zrobiłem wszystko 1:1, niestety co jakiś czas wyskakuje mi błąd. Run-time error.1004. Nie zapisano dokumentu - prawdopodobnie jest on otwarty, lub przy zapisywaniu napotkano błąd. Po naciśnieciu DEBUG i F5 akcja wykonuje sie dalej prawidłowo. Proszę o pomoc. Błąd wskazuje w lini Arkusz5.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=sciezka & nazwaPliku & ".pdf"
i jeszcze jedno- jak w nazwie pliku zawrzeć, dzisiejszą datę? Jeżeli w Excelu tworzę komórkę z funkcją =DZIŚ() i staram się na nią powołać np "Arkusz6.Range("A3").Value", to wyskakuje błąd
Ja to zrobiłem w ten sposób, że do komórki D1 w Arkuszu3 wstawiłem funkcję =Dziś() a następnie w fragmencie kodu makro, odpowiedzialnym za nadawanie nazwy plikowi PDF, wpisałem: "nazwaPliku = Arkusz3.Range("A2").Value & " " & Arkusz3.Range("D1").Value @@kamilbuchalski8696
Dziękuję za komentarz, zapraszam do zapoznania się z filmem na moim kanale, w którym opowiadam jak wysyłać maile za pomocą programu Outlook bezpośrednio z Excela. Link poniżej: ruclips.net/video/ohSXydSfU7M/видео.html Pozdrawiam
Super bardzo mi się podoba. Chciałem dopytać czy można w prosty sposób zrobić zmianę w kodzie aby automatyczne do maila dodawał się podpis zdefiniowany w outlook. Czy jest możliwość aby do kodu vba za pomocą userForm dorobić interfejs graficzny spod którego użytkownik wskazywał był arkus xls z adresami mail i sam decydowałby z której kolumny program ma pobrać adres mail z której imię i nazwisko, skąd ma pobrać treść maila
Świetne rozwiązanie problemu. A co jeśli w docelowym folderze, do którego przesyłamy wygenerowane PDF-y już jest taki sam plik, o takiej samej nazwie? Czy w danym makrze nie powinniśmy uwzględnić tego faktu?
Dziękuję za komentarz. Odpowiadając na pytanie, muszę stwierdzić, że to "zależy". Jeżeli chcemy, aby plik się nadpisywał to nic nie musimy więcej robić ponieważ jest to działanie domyślne podczas eksportu pliku do PDF-a. Jeżeli natomiast zależy nam, aby sprawdzić czy dany plik istnienie (ponieważ w takim przypadku musimy utworzyć kopię pliku) to wtedy musimy ten fakt uwzględnić w kodzie. Utworzyłbym w tym celu zmienną typu FSO - FileSystemObject i za pomocą metody FileExists sprawdzał czy plik istnieje. Oczywiście istnieje przynajmniej kilka metod na sprawdzenie czy plik istnieje ale ta metoda moim zdaniem jest wygodna ponieważ korzystając z wcześniej dodanej biblioteki (Tools -> References... -> wyszukujemy i zaznaczamy Microsoft Scripting Runtime) będziemy mogli korzystać z podpowiedzi VB czyli IntelliSense. Na koniec dodam, że jest to ciekawe wyzwanie jeżeli nie pracowaliśmy wcześniej z obsługą plików. Chętnie dowiem się czy udało się wdrożyć takie rozwiązanie? Filmy zawierające podobne rozwiązania są dostępne na moim kanale. Powodzenia
Jest mozliwy export danych do plikow word (nie korzystajac z korespondencji seryjnej w wordzie), tylko na podstawie szablonu excel? Szukalem na internecie, ale albo jest do pdf, albo korzystajac z worda i wbudowanej korespondencji....
Tak jest możliwy export danych do plików DOCX (Word) bez tworzenia korespondencji. Należy w tym celu odwołać się do zmiennych, które utworzą nową instancję aplikacji Word a następnie kolejna zmienna utworzy dokument. Zmienna ta będzie jednocześnie odpowiedzialna za wklejanie danych z Excela do Worda jako tabela (obiekt/mechanizm) programu Word. Ps. Planuje w najbliższym czasie nagrać taki filmik :) Pozdrawiam
Cześć, zapraszam do najnowszego filmu na moim kanale dotyczącego kopiowania danych z Excela do Worda. ruclips.net/video/W8HPXlk7twk/видео.html Pozdrawiam
Bardzo dziękuję za filmik i plik. Małe modyfikacje i już drugi miesiąc stosuję Twoje rozwiązanie.
To przekonało mnie, że warto subskrybować Twój kanał 👍
Super rozwiązanie .👍
Mam tylko jedno pytanie. Jak wygenerowane wszystkie strony umieścić w jednym PDF tak by nie tworzyć osobnych plików.
Super użytek😊😊
Dziękuję za komentarz :)
Super pomocny plik & filmik ! Na starcie już w 2 miejscach będę mógł sobie usprawnić robotę !🙂 Pytanie mam: Czy jest gdzieś filmik z pokazaną akcją wyboru, które pozycje wydrukować ?
Coś cudownego - ułatwia bardzo pracę. Wiele można się nauczyć.
Ale mam pytanie. Czy jeżeli dane mam w kilku arkuszach czy można wybrać najpierw arkusz a dopiero później pracownika i wygenerować raport? Jeżeli tak to jak mogę to połączyć? próbowałem kilku kombinacji ale nie wyszło. Czy trzeba jednak mieć dane w jednym arkuszu?
Dziękuję za komentarz. Odpowiadając na pytanie to tak można wybrać w pierwszej kolejności arkusz, z którego mają zostać pobrane dane do korespondencji. Można do tego użyć VBA lub zrobić wszystko w Excelu za pomocą np. formantów (przyciski opcji) oraz zmodyfikować kod tak, aby w zależności od wybranego arkusza pobierał prawidłowe dane. Przydatna tu będzie funkcja ADR.POŚR(). Należy jednak pamiętać, że musimy utworzyć dynamiczny adres do bazy danych, do nazw arkuszy jak i do list rozwijanych z danymi. Wszystkie przypadki obsługujemy funkcją JEŻELI() lub WARUNKI() ( Excel >= 2016) zwracając te dane do osobnych komórek a później modyfikujemy istniejące funkcje WYSZUKAJ.PIONOWO - dodając wspomnianą funkcję ADR.POŚR(), która odwołuje się do tych właśnie komórek (z funkcji jeżeli lub warunki). Pozdrawiam
Genialne. Zrobiłem wszystko 1:1, niestety co jakiś czas wyskakuje mi błąd. Run-time error.1004. Nie zapisano dokumentu - prawdopodobnie jest on otwarty, lub przy zapisywaniu napotkano błąd. Po naciśnieciu DEBUG i F5 akcja wykonuje sie dalej prawidłowo. Proszę o pomoc. Błąd wskazuje w lini Arkusz5.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=sciezka & nazwaPliku & ".pdf"
Super przydatne!
Jak zrobić, żeby pliki zapisywały się bezpośrednio w folderze na SharePoint?
i jeszcze jedno- jak w nazwie pliku zawrzeć, dzisiejszą datę? Jeżeli w Excelu tworzę komórkę z funkcją =DZIŚ() i staram się na nią powołać np "Arkusz6.Range("A3").Value", to wyskakuje błąd
Ja to zrobiłem w ten sposób, że do komórki D1 w Arkuszu3 wstawiłem funkcję =Dziś() a następnie w fragmencie kodu makro, odpowiedzialnym za nadawanie nazwy plikowi PDF, wpisałem: "nazwaPliku = Arkusz3.Range("A2").Value & " " & Arkusz3.Range("D1").Value @@kamilbuchalski8696
Super temat, ale czy jest dodatkowe rozwiązanie by ten PDF od razu wysłał się do pracownika?
Dziękuję za komentarz, zapraszam do zapoznania się z filmem na moim kanale, w którym opowiadam jak wysyłać maile za pomocą programu Outlook bezpośrednio z Excela. Link poniżej:
ruclips.net/video/ohSXydSfU7M/видео.html
Pozdrawiam
Super bardzo mi się podoba. Chciałem dopytać czy można w prosty sposób zrobić zmianę w kodzie aby automatyczne do maila dodawał się podpis zdefiniowany w outlook. Czy jest możliwość aby do kodu vba za pomocą userForm dorobić interfejs graficzny spod którego użytkownik wskazywał był arkus xls z adresami mail i sam decydowałby z której kolumny program ma pobrać adres mail z której imię i nazwisko, skąd ma pobrać treść maila
Znakomita robota 🙏👍
Dziękuję za komentarz i miłe słowa :)
Świetne rozwiązanie problemu. A co jeśli w docelowym folderze, do którego przesyłamy wygenerowane PDF-y już jest taki sam plik, o takiej samej nazwie? Czy w danym makrze nie powinniśmy uwzględnić tego faktu?
Dziękuję za komentarz. Odpowiadając na pytanie, muszę stwierdzić, że to "zależy". Jeżeli chcemy, aby plik się nadpisywał to nic nie musimy więcej robić ponieważ jest to działanie domyślne podczas eksportu pliku do PDF-a. Jeżeli natomiast zależy nam, aby sprawdzić czy dany plik istnienie (ponieważ w takim przypadku musimy utworzyć kopię pliku) to wtedy musimy ten fakt uwzględnić w kodzie. Utworzyłbym w tym celu zmienną typu FSO - FileSystemObject i za pomocą metody FileExists sprawdzał czy plik istnieje. Oczywiście istnieje przynajmniej kilka metod na sprawdzenie czy plik istnieje ale ta metoda moim zdaniem jest wygodna ponieważ korzystając z wcześniej dodanej biblioteki (Tools -> References... -> wyszukujemy i zaznaczamy Microsoft Scripting Runtime) będziemy mogli korzystać z podpowiedzi VB czyli IntelliSense.
Na koniec dodam, że jest to ciekawe wyzwanie jeżeli nie pracowaliśmy wcześniej z obsługą plików. Chętnie dowiem się czy udało się wdrożyć takie rozwiązanie? Filmy zawierające podobne rozwiązania są dostępne na moim kanale. Powodzenia
niestety u mnie wyszukuje jakieś głupoty
Kwoty zawsze wyrównuje się do prawej, a nie do środka.
Jest mozliwy export danych do plikow word (nie korzystajac z korespondencji seryjnej w wordzie), tylko na podstawie szablonu excel? Szukalem na internecie, ale albo jest do pdf, albo korzystajac z worda i wbudowanej korespondencji....
Tak jest możliwy export danych do plików DOCX (Word) bez tworzenia korespondencji. Należy w tym celu odwołać się do zmiennych, które utworzą nową instancję aplikacji Word a następnie kolejna zmienna utworzy dokument. Zmienna ta będzie jednocześnie odpowiedzialna za wklejanie danych z Excela do Worda jako tabela (obiekt/mechanizm) programu Word.
Ps. Planuje w najbliższym czasie nagrać taki filmik :)
Pozdrawiam
Cześć, zapraszam do najnowszego filmu na moim kanale dotyczącego kopiowania danych z Excela do Worda.
ruclips.net/video/W8HPXlk7twk/видео.html
Pozdrawiam