REKLAMA

_DANE_.xls

Makro VBA do skanowania dokumentów w Wordzie i eksportu danych do Excela

Witam. Przygotowałam załączniki. W pracy mam WORD i EXEL 2007, mam mieć WORD i EXEL 2010. Przepraszam jeśli popełnie jakiś błąd. Chodzi mi o makro, które skanuje dokumenty. Powiedzmy mam dokument "wezwanie do braków formalnych1" makro skanuje(rozpoznaje) znak sprawy " 0111-2233-0111-00000001/15" datę "13-07-2015 " i rozpoznaje co to za dokument "Wezwanie dla braków formalnych". Po ze skanowaniu tego dokumentu i uzyskaniu danych, przenosi te dane do exela o nazwie "_DANE_" (zeszyt i akrusz mają taka sama nazwę). W "_DANE_" wyszkuje Znak sprawy "0111-2233-0111-00000001/15" i tytuł kolumny "wezwanie do braków formalnych" wstawia ze skanowane dane, czyli nr dokumentu "0111-00000011113/15" i datę "13-07-2015" w odpowiednie miesce. Znaków spraw może być maksymalnie na dokumentach: "wezwanie do braków formalnych" i dokumencie "Wezwanie do wyjaśnień" maksymalnie 5. Rzadko tak jest. Przeważnie bywa tylko 3. Decyzje zawsze mają jeden znak sprawy i jeden nr dokumentu, czyli prościej. Zakładając że mamy na dokumentach typu: "wezwanie do braków formalnych" i dokumencie "Wezwanie do wyjaśnień" liczbę znaków 2( np 0111-2233-0111-00000002/15 i 0111-22334-0111-00000001/15) numer dokumentu jest taki sam dla każdej z tych sprawy taki sam, makro umieszcza nr dokumentu w komórkach dla tych spraw i dla tego typu dokumentu w zeszycie exela"_DANE_". oczywiście po odnalezieniu tych znaków spraw i nazwy dokumentu.


Pobierz plik - link do postu

" Znak Sprawy A " , " Znak Sprawy B " , " Znak sprawy C " , " Znak sprawy D " , " Znak sprawy E " , " Wezwanie do braków formalnych dla sprawy A " ,, " Wezwanie dla braków formalnych dla sprawy B " ,, " Wezwanie dla braków formalnych dla sprawy C " ,, " Wezwanie do braków formalnych dla sprawy D " ,, " Wezwanie do braków formalnych dla sprawy E " ,, " Wezwanie do wyja?nienia dla sprawy A " ,, " Wezwanie do wyja?nienia dla sprawy B " ,, " Wezwanie do wyja?nienia dla sprawy C " ,, " Wezwanie do wyja?nienia dla sprawy D " ,, " Wezwanie do wyja?nienia dla sprawy E " ,, " Decyzja dla sprawy A " ,, " Decyzja dla sprawy B " ,, " Decyzja dla sprawy C " ,, " Decyzja dla sprawy D " ,, " Decyzja dla sprawy E " ,,,
,,,,, " Nr dok " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " Nr dok " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " , " nr dokumentu " , " Data " ,,
" 0111-2233-0111-00000001/15 " ,,,,, " 0111-00000011113/15 " , " 13-07-2015 " ,,,,,,,,,,,,,,,,,,, " 0111-00000011111/15 " , " 13-10-2015 "
" 0111-2233-0111-00000002/15 " , " 0111-22334-0111-00000001/15 " ,, " 0111-22337-0111-00000001/15 " , " 0111-22338-0111-00000002/15 " , " 0111-00000011114/15 " , " 14-07-2015 " , " 0111-00000011114/15 " , " 14-07-2015 " ,,,,,,, " 0111-00000011116/15 " , " 13-10-2015 " ,,,,,,,,, " 0111-00000011112/15 " , " 14-10-2015 "
" 0111-2233-0111-00000003/15 " , " 0111-22334-0111-00000002/15 " ,,,,,,,,,,,,,, " 0111-00000011115/15 " , " 13-10-2015 " , " 0111-00000011115/15 " , " 13-10-2015 " ,,,,,,,,, " 0111-00000011112/15 " , " 13-10-2015 "
" 0111-2233-0111-00000004/15 " , " 0111-22334-0111-00000003/15 " ,, " 0111-22337-0111-00000002/15 "
" 0111-2233-0111-00000005/15 " , " 0111-22334-0111-00000004/15 "
" 0111-2233-0111-00000006/15 " , " 0111-22334-0111-00000005/15 " , " 0111-22335-0111-00000001/15 "
" 0111-2233-0111-00000007/15 " ,,, " 0111-22337-0111-00000003/15 "
" 0111-2233-0111-00000008/15 " ,, " 0111-22335-0111-00000002/15 "
" 0111-2233-0111-00000009/15 " ,,,, " 0111-22338-0111-00000002/15 "
" 0111-2233-0111-00000010/15 " ,, " 0111-22335-0111-00000003/15 "
" 0111-2233-0111-00000001 " , " /15 " , " 0111-2233-0111-00000001/15 "
" 0111-2233-0111-00000002 " ,, " 0111-2233-0111-00000002/15 "
" 0111-2233-0111-00000003 " ,, " 0111-2233-0111-00000003/15 "
" 0111-2233-0111-00000004 " ,, " 0111-2233-0111-00000004/15 "
" 0111-2233-0111-00000005 " ,, " 0111-2233-0111-00000005/15 "
" 0111-2233-0111-00000006 " ,, " 0111-2233-0111-00000006/15 "
" 0111-2233-0111-00000007 " ,, " 0111-2233-0111-00000007/15 "
" 0111-2233-0111-00000008 " ,, " 0111-2233-0111-00000008/15 "
" 0111-2233-0111-00000009 " ,, " 0111-2233-0111-00000009/15 "
" 0111-2233-0111-00000010 " ,, " 0111-2233-0111-00000010/15 "
,,,,