Korespondencja seryjna w Excelu bez użycia programu Microsoft Word. 

Dziękuję za komentarz :)

Dziękuję za komentarz i miłe słowa :)

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

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

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: ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE-ohSXydSfU7M.html Pozdrawiam

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. ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE-W8HPXlk7twk.html Pozdrawiam