Příspěvky uživatele
< návrat zpět
dal som to len na tie dva riadky v jednom stlpci
a preslo to beza problemou
.... fakt netusim v com mate problem
v tom pokusnom file nieje ziaden hyperlink
whoode napsal/a:
aplikoval jsem váš kod na muj sobour a nefunguje :-(
Odkazy jsou presne tak
\\hzsmsk.cz\data\org\financni\SMLOUVY\skenovane_smlouvy\2014\soubor.pdf
nebo skenovane_smlouvy\2013\soubor.pdf
a prepise sa vam ta cesta??
alebo prepisana cesta nefunguje?
skuste editovat hyperlink a tam sa pozrite aku tam mate cestu
... podla mna bud mate zle napisanu staru castu (ktora sa musi zhodovat s aOldName) alebo nova cesta nieje spravne napisana
... popripade predpripravte nejaky testovaci subor a poslite ho ... takto mozem len hadat v com je problem
A databaza tychto udajou kde sa ma nachadzat? V exceli, accesse, xml, txt, sql alebo v niecom inom??
- ten range si mozte zmenit
- skusal som to v testovacom subore a mne to prebehlo bez problemou aj ked sa za cestou nachadzaju dalsie adresare + file
1. by som pouzil podmienene formatovanie
2. skuste dat =SUM(D11;F11;I11;J8;M10;O7:O8;L18) .... takto sa vyhnete doplnaniu +
dajte prilohu toto musi fungovat
tak potom takto:
jmeno = Range("P1") & "\" & Range("O1") & Format(Now, "yyyy mm dd HH MM") & ".xls"
toto:
if array(x) then
je to iste ako keby ste napisali
if array(x) = true then
... je to takovi slacker mode skracovania zapisu
tak isto IF v jednom riadku je skratene inac sa to zapisuje takto:If PODMENIENKA then
SPLNIL PODMIENKU
else
NESPLNIL PODMIENKU
end if
Edit: nejak som tu vasu otazku nedocital :)))
ked tam chcete dat exit for do skrateneho IF zapisu tak to spravite takto:
if array(x) then aValue = TRUE: exit for else aValue = FALSE
lebo pri cisle cislo ulice je chyba:
Cells(i, 6) = aXML("//D:SI/D:CA") 'číslo
ma tam byt:
Cells(i, 6) = aXML("//D:SI/D:CD") 'čísla
lepsie tu mapovacku uvidite rovno na stranke ako je to tu:
http://wwwinfo.mfcr.cz/cgi-bin/ares/darv_or.cgi?ico=49970666
a podla toho si vyberte ake udaje odtial chcete vidiet
s for cyklom:
for x = lbound(array) to ubound(array)
if array(x) then aValue = TRUE else aValue = FALSE
next
Jar to iste aj mna napadlo ale ked clovek sa posnazi aj do takého dokumentu sa dostane :)
no uz ma nic nenapada
pri xml 6v ma byt MSXML2
a malo by to fungovat
urobte este fotku referencii
Bilek napsal/a:
ten první: xmlDoc As MSXML2.DOMDocument
skuste odvsetky MSXML2 prepisat na MSXML
Uživatelské menu
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.
RSS nejnovější články