czwartek, 3 marca 2016

Przenoszenie list numerowanych z MS Word do MS Excel

Proces integracji aplikacji MS Word i MS Excel nie należy do specjalnie trudnych. Znając podstawowy model obiektowy tych aplikacji łatwo odczytać zawartość dokumentu, tabeli i przenieść je do komórek (obszarów) Excela. Pewien problem może stanowić przenoszenie list- wypunktowania i numerowania. Jednak i dla tego typu operacji znaleźć można właściwą technikę VBA, którą zaprezentowano w odpowiedzi pod poniższym linkiem:

StackOverflow: Extract Multiple Word Table contents to Excel via VBA - Table contents numbered lines

poniedziałek, 29 lutego 2016

Ostatni biznesowy dzień miesiąca (funkcja)

Dziś krótka odpowiedź na pytanie- jak pobrać datę odpowiadającą ostatniemu dniu miesiąca z pominięciem weekendu? Jeżeli ostatni dzień miesiąca wypada w sobotę lub niedzielę naszym celem będzie otrzymanie daty odpowiadającej piątkowi poprzedzającemu ten weekend. Poniżej gotowe rozwiązanie w postaci funkcji UDF. Proszę też zwrócić uwagę na ten zapis: którego celem jest zwrócenie daty ostatniego dnia miesiąca (poprzedniego).
Warto przy okazji też podkreślić, że funkcja DateSerial() jest funkcją bardzo elastyczną, która umożliwia wprowadzenie ilości miesięcy spoza przedziału 1-12 co powoduje automatyczną konwersję na odpowiedni miesiąc dokonując przejścia przez kolejne lata (mniejsze od 0- lata wcześniejsze, większe od 12- lata późniejsze). Podobnie kwestia wygląda w zakresie dni, gdzie dopuszczalne są wartości spoza przedziału 1-31, a czego przykład widać w powyższej funkcji.