Cześć,
Dopiero zaczynam programowanie w VBA (potrzeba chwili) i od razu skok na głęboką wodę...
Aktualnie wykonałem arkusz, który tworzy projekt, nadaje mu dane w nagłówku i zapisuje go jako nowy plik:
Wszystko śmiga jak tra lala, jestem z siebie dumny... jednak przyszedł moment, że trzeba dane zestawić w tabeli, która przedstawiać będzie miesięczne wyrobienie godzin przez poszczególnych pracowników:
Wiem co chcę zrobić, jednak nie wiem jak temat ugryźć. Program musi kolejno:
- Otwierać plik w określonej lokalizacji.
to można powiedzieć, że wiem, ale mogę się mylić:
sciezka_pliku = "\\EWIDENCJA GODZIN B+R\Projekty_B+R" & "\"
nazwa_pliku = Dir(sciezka_pliku & "*.xlsm")
Do While nazwa_pliku <> ""
Set arkusz = Workbooks.Open(sciezka_pliku & nazwa_pliku)
- Wyszukiwać, w których wierszach otwartego pliku znajduje się pierwsze nazwisko z zestawienia.
- Pobierać z tych wierszy wartość i "czas" (w zależności od daty, bo musi być podział na miesiące).
- Sumować czasy i przepisywać je do konkretnego miesiąca pod danym nazwiskiem,
- Gdy spisze dane danego nazwiska ze wszystkich plików to przechodzi do drugiego nazwiska, ew. wersja druga: gdy spisze dane wszystkich nazwisk z danego pliku przechodzi do następnego pliku.
Proszę o pomoc, bo gubię się we własnych myslach.