Příspěvky uživatele

Zkuste tedy aktualizovat - popřípadě IT oddělení, pokud vy nemůžete.
http://www.mrexcel.com/forum/excel-questions/438888-intermittent-run-time-error-75-loading-form.html

Problem caused by corrupt software updates.
Reapplied Office Service Pack and all is working.

Je možné, že je to chyba. Máte na té verzi instalované aktualizace?

Těžko říct bez přílohy. Při 6000x SVYHLEDAT ty 3 minuty ani nepřekvapí.

Umím si představit různá řešení. Např KT nebo SQL.

A i to co máte se dá přežít, pokud to pouštíte 2x denně ;)

Teď ze sebe možná udělám troubu, ale nemám tušení, co znamená serverová verze excelu 2007

Nicméně takovéto situace nastávají. Jediné řešení je podle mého názoru krokovat kód spuštění toho formuláře a najít řádek, který způsobuje pád. Když najdete příčinu, budete schopen provést opravu.

Bude stovka?
Přijímám sázky ;))

@xlnc
díky za opravu a doplnění ;)

No jeden by si myslel, že NOW sa bude správať rovnako v liste aj v kóde.

Řekl bych že se jedná o dvě různé funkce a ta VBA bude "hloupější", protože je starší (VB6).

@marjankaj

Nikdo neví všechno. Já zase nevěděl, že fce listu má i desetiny. Mohlo mi to dojít, když je TEXT (HODNOTA.NA.TEXT) dokáže zobrazit a Format ne.

NOW ani není součástí WorksheetFunction, ale lze použít v Evaluate. Takže lze napsat Dim nTime As Single
nTime = Evaluate("=NOW()")
Debug.Print WorksheetFunction.Text(nTime, "m:ss.00")
Ono to v excelu bude možná takto i bezpečnější, protože Timer počítá sekundy od půlnoci a pokud bude kód spuštěn např. v 23:59:59 a ukončen v 0:00:01, může dojít k chybe (nStart > nEnd). Takto je to ošetřeno.

Sub Cas()
Dim nStart As Single
nStart = Timer
MsgBox 1'tady se jako něco dělá - klikněte OK za jak dlouho budete chtít
Dim nEnd As Single
nEnd = Timer

Dim nTime As Single
nTime = nEnd - nStart

Debug.Print WorksheetFunction.Text(nTime / 60 / 60 / 24, "mm:ss.00")
End Sub

Now nemá setiny, takže je třeba použít Timer.
Asi nejlépeWorksheetFunction.Text(Timer / 60 / 60 / 24, "mm:ss.00")nebo lzeFormat(Now, "nn:ss,") & Format(Timer * 100 Mod 100, "00")

@xlnc
S tím SAPem je to tak půl na půl. Pokud vím, viděl jsem výstupy XLS, které ve skutečnosti byly CSV.

Ano, to je pravda. Některé výstupy jsou generovány s koncovkou xls a při tom je to textový soubor oddělený tabulátory. Dvojklikem otevřeno a po odkliknutí informace o nesprávném formátu vše krásně načteno do excelu. Pracoval jsem s tím téměř denně. Vše ovšem podmíněno uživatelským nastavením správného formátu. Jinak lze vyřešit správným importem textu (lze uložit jako txt).
Takže na SAPu vlastně nemuseli řešit vytváření xls souborů - obešli to takto.

Novější verze SAP již mají pěknou podporu excelu (import i export) - toto tam však zůstává a nedivím se.

@xlnc
kouká, že ses rozjel.
Jediná metoda, u které si můžu navolit oddělovače je TextToColumns. Ta ale vyžaduje, aby hodnoty byly textové, jinak dělá paseku. Takže když vezmu ta tvoje tři čísla, tak musím převést na text 153,68, které mám v buňce jako číslo.
Testoval jsem jen na těch tvých třech číslech a převod na text možná jde udělat inteligentněji, teď mně ale nic lepšího nenapadá (a kvůli Join funguje jen pro jeden sloupec).
With Selection
.Value = Application.Transpose(Split("'" & Join(Application.Transpose(.Value), ";'"), ";"))
.TextToColumns Destination:=.Cells, DecimalSeparator:=",", ThousandsSeparator:="."
End With 'Selection

nemluvě o tom, že výstupy ze SAPu jsou pořád stejně idiotské
Teď prosím TomBa, aby si to nebral osobně.
Nepracuji a nikdy jsem nepracoval pro SAP, pouze jsem v něm 14 let pracoval. A chyba není na straně SAP, tedy za klávesnicí, ale před ní.
Takže souhlasím - jsou idiotské. Ale proto, že uživatel prostě práskne export a nepohraje si s nastavením. Je to úplně stejné, jako import textu v excelu.
Ve většině výkazů SAP si uživatel může nastavit oddělovače a i to blbé mínus za číslem přesunout dopředu.
Já se naopak vše snažil nastavit v SAP a v excel už jsem měl pouze relevantní data ve správném tvaru.
Svého času jsem dokonce dokázal tahat data i ze sestav, kteréto neumožňovaly - už si nevzpomínám, ale dělal jsem to nějak přes tisk - sestava zůstala někde uložená a odtamtud to šlo.

SAP už také nemám, ale toto byla vždy první věc, kterou jsem měnil.
Pamatuji si, že je to nahoře mezi ikonami, hledejte uživatelská nastavení.

Když máte SAP máte i podporu - pokud nenajdete, ptejte se tam.

@repty
mohli bychom o tom diskutovat. A ano, může nastat případ, kdy je definován zadávací formulář. V tom případě jeden formulář a okamžité přenesení dat do databáze.

Pokud máte předepsaný formulář např. pro měření, několik stovek měření, těžko to vměstnáte na jeden list. Nebo vměstnáte, ale přehlednost bude vniveč.
Těžko soudit bez přílohy, ale v extrému na jeden list vměstnám přes milion záznamů a přehlednost si udržím. A hlavně budu schopen data analyzovat a pracovat s nimi rovnou bez vymýšlení slučování. Samozřejmě jsem schopen si kterýkoliv záznam zase vytáhnout do "přehledné" podoby.

Jak chcete udržet přehlednost ve stovkách listů, to si neumím představit. A ani nemusím, nedělám s tím já, ale vy.

Mno já nevím, to je jak kolovrátek. Všichni chtějí z několika listů slučovat data do jednoho ("databáze"). Proč je tak těžké pochopit, že jednodušší a bezúdržbový postup je ten opačný?

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje