Příspěvky uživatele

No kde to šlo jsem použil svůj zadávací kalendář, který ukládá excel formát a do UF v české notaci. Jenže mi to natahuje i formuláře vypisované ručně - tedy editované ručně a tady je zakopaný pes. Jede mi to na síti, takže při každém požadavku je to znovu překlopit ručně. Veškerá elegance je někde daleko.

Dobrý den, potýkám se s problémem u EXCEL2010 s datumy. Uložím datum do listu a již s ním nemohu dál pracovat. Jedná se o datum formátu DD.MM.YYYY. V americké konfiguraci není problém. Když dám celý sloupek - formát dat - číslo tak se většina datumů nezmění. Ale když na něj kliknu, jako pro editaci a opustím buňku, tak se překlopí na číslo. Všechny pokusy o automatické překlopení (např Xcell=xcell) selhaly. Nenapadá Vás jak to převést? V EXCEL 07 je to bez problémů. Dík za každou radu. Jirka

napadlo mě ještě jedno řešení a ono funguje. Na list ukládám opět s formátováním - tentokrát na číslo

Range("work!F6") = Format(TextBox7.Value, "0") ' zacatek

snad to někomu pomůže

zdravím,

ve formuláři mám textbox na zadání datumu. Při překopírování hodnoty na list je však obsah jiného formátu než datum (test:
If IsDate(TextBox7.text) Then MsgBox "datum" Else MsgBox "není datum"

Range("work!F6") = TextBox7.Value ' zacatek

If IsDate("work!F6") Then MsgBox "datum" Else MsgBox "není datum"

S číslem v buňce nelze pracovat.
Má sice stejný vzhled, ale nelze převést na číslo.
např. 07.02.2014
Když však ručně smažu tečky mezi čísly a ručně je opět napíšu je vše OK.

Můžete prosím poradit jak přenést datum do listu ve formátu datumu nebo čísla?
děkuji moc.

dobrý den,
prosím nemáte někdo zkušenost nebo neumíte poradit?

Mám soubor1. Ten je přejmenován náhodným názvem. Z něho otevírám druhý soubor. Ten má se po otevření také přejmenuje na náhodné jméno. A spustí se userform. Já potřebuji dostat do otevíraného souboru alespoň jméno původního, abych si mohl stáhnout konfigurační data.
Spustit userform z prvního souboru se mi nepodařilo. Zkoušel jsem mezisoubor pevného jména. Jenže je to na síti a druhý uživatel již měl problém. Code zatím neposílám, nevím jestli by to nebylo matoucí. Děkuji moc za každou pomoc a přeji hezký den.

Děkuj imoc. Než jsem si stačil přečíst poslední příspěvek, přišel jsem na to. Jen POZOR. Zopakoval jsem 2x dotaz se stejným IČEm a zablokovalo mi to přístup.
nakonec ta rutina vypadá takto:

Sub ares()
'vybere stránku
Sheets("ares").Activate
'vymaže záznam, pokud tam je
Range("Tabulka5[#All]").Select
Selection.ClearContents
' v A10 má požadované IČO. POZOR!!! pokud se bude opakovat, zablokuje se přístup.
ActiveWorkbook.XmlImport URL:= _
"http://wwwinfo.mfcr.cz/cgi-bin/ares/darv_std.cgi?ico=" & Range("A10"), ImportMap:= _
Nothing, Overwrite:=True, Destination:=Range("$A$1")
End Sub

Vymazání staré tabulky je nutné, jinak 1004 - jiná struktura odpovědi

Nakonec to nebylo tak těžké, ale bez Vás bych to hledal dlouho. Moc děkuji a hezký den přeji.

aha. Takže má představa, že když mám IČO, které vepíšu do input boxu, stisknu tlačítko a dostanu po chvíli do buněk informace z ARESu byla mylná?
Zatím mi to otevře IE se souborem, ten ručně uložím na disk a pak ručně načtu přes XML. Jde to nějak zautomatizovat? Stačilo by mi dostat to automaticky na list. I tak děkuji za pomoc. Hezký den.

Dobrý den,
dovoluji si opět požádat o pomoc. Do právě psaného modulu potřebuji načíst data ze stránek ares registr. Když jsem zadal z VBA dotaz

http://wwwinfo.mfcr.cz/cgi-bin/ares/darv_std.cgi?ico=27074358"
tak mi to vrací spoustu všeho možného, ale hlavně v IE okně. Co mám udělat, abych to automaticky dostal do listu? S tím vybráním dat si asi poradím. Moc děkuji a přeji hezký den.

unáhlil jsem se. omlouvám se. nevšiml jsem si ŽE SESTAVENÍ DOTAZU JE VZORCEM V LISTU, NE VE vba. zKUSÍM TO PŘEPSAT DO vba A MĚLO BY TO FUNGOVAT. mOC DĚKUJI.

Dík moc. Je to téměř ono. Ale s tímhle bych neotravoval. Já mám několik tisíc adres a potřebuji, aby to nebylo vázáno na odkaz ve sl.B.
třeba pro mapy lze poslat:
http://www.mapy.cz/#x=18.291370&y=49.834056&z=14
(toto umím sestavit a najít informace)
Ale mapy.cz chtejí:
http://www.mapy.cz/#x=18.291370&y=49.834056&z=14&t=s&q=stodoln%C3%AD%201%20Ostrava&qp=10.870857_48.463271_17.257553_51.076028_6
a tady jsou parametry, kterú nevím kde hledat. Ale určitě to jde nějak zadat.

dobrý den,
nemáte prosím někdo nápad, jak zobrazit objekt pomocí VBA na mapě? (mapy, atlas, google - prostě jakémkoliv serveru? Mám adresu a město, mohu mít i souřadnice. Na seznamu dokážu pomocí souřadnic a zoomu, ale nezobrazí mi KDE je objekt.
Děkuji moc za jakoukoliv pomoc.

Zdravím,
prosím o pomoc - jak lze programově z VBA (excel2007) spustit jiný program a poté zavřít program ze kterého byl druhý spuštěn? Zkoušel jsem before close, ale dost to havaruje. Zavírání prvního z druhého programu je dost komplikované - lze spustit z několika jiných programů. Děkuji za pomoc.

díky moc, je to skvělé. Ne že bych všemu porozuměl, ale toto mi asi bude stačit. MOOOc děkuji.

dobrý den,
Zkouším udělat editační tabulku pro rozmístění lidí na jednotlivé akce v jednom týdnu. |||Líbilo by se mi, kdyby jsem dokázal kliknutím myši na buňku spustit makro. Tím bych jedním kliknutím vyjmul do "schránky" a dalším kliknutím uložil do jiné buňky. S makrem bych mít problém nemusel, ale lze jej spustit myší? Zkoušel jsem a hledal, zatím marně. Děkuji za jakoukoliv pomoc.

díky moc. Zkusil jsem to napřímo a funguje.

Range("list!C4").Value = Fix(CDate(Range("list!C4").Value)) + CDate("08:00")

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje