MS Excel

Zdravím vývojáře. Pročítal jsem diskuzi a rady, ale podobný problém jsem nenašel. Mám vytvořen systém maker pro kolegu do malé firmy. Vše běží na staré verzi Excelu 2010, ovšem při spuštění prográmku v Excelu 2013 je problém s datovým převodem. CDate vyhazuje chybu. hodnota = CDate(textbox1.text) - hodí chyba 13. Hodnota je deklarována jako datum. Do textboxu zadáno např."26.1.2014". Nechápu, proč na starší verzi Excelu vše běží bez problémů a tady v EXCELu 2013 při krokování programu error na tomto řádku. Narazil někdo na něco podobného ? Jsem amatér, jistě mi dokáže někdo poradit. Díky

Uzamčeno - nelze přidávat nové příspěvky.

Palooo(3.2.2014 8:35)#017652

skuste checknut ci tu bunku detekuje 2013tka ako date

cez:
if isDate(textbox1.text) then 'TRUE else 'FALSE end if

druha moznost je zmente textbox na dateTimerPicker alebo MaskEdBoxcitovat

Opičák(3.2.2014 12:17)#017653

mrkni zde, zda to nepomůže:
http://stackoverflow.com/questions/14953304/run-time-error-13-in-my-vba-excel-codecitovat

Cowley(14.2.2014 11:31)#017876

Takže pánové díky za rady, ale vypadá to, že problém je ne v Excelu, ale OS - Kombinae WIN8 a OFFICE2013... stále řeším a nic.citovat

stanher(14.2.2014 21:13)#017883

Ano mate pravdu, je ot v kombinaci Win8 a Office 2013.
já jsem to vyřešil takto:
načteni do proměnné
Dim DatumNarozeni As Date
DatumNarozeni = Replace(txtDatumNar, ".", "/")
a zpětně načteni z buňky do tetxboxu takto::
txtDatumUrazu = Format(.Cells(lnRow, 21), "dd.mm.yyyy")citovat

Cowley(17.2.2014 6:31)#017892

Díky za radu, zkusím a dám sem výsledek vědětcitovat

Cowley(20.2.2014 9:04)#017915

Díky za radu, nepomohlo, musel jsem tam udělat modifikaci kodu, protože to mám trochu jinak postaveno, ale i tak pořád stejný problém. WIN8 je problém ! Při kombinaci WIN7 a Off2013 vše běží. Zkusím se obrátit na technickou podporu Microsoftu s dotazem.citovat

Téma: Problém VBA Excel 2013 - datumová konverze

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje