Dobrý den,
mám problém s přenesením formátu pouze některých buněk přes makro. Ve slouzce jsou soubory, ktere se po spusteni makra naskladaji pod sebe do tabulky. Všechny čísla jsou odděleny desetinnou carkou, Kdyz spustim makro, tak se nektere bunky napr. F27 prenesou s teckou a excel to bere jako ze hodnota je 1000, pritom v originalnim souboru je hodnota 3,... Vlozil jsem nakonec makra toto:
Columns("A:J").Select
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Bohuzel, to nepomaha. Myslel jsem, ze muze byt chyba v OS, protoze mam nemecky OS. Na jinych verzich win se neprenese tecka, ale automaticky je tam cislo vyjadreno v 1000. Nevite, kde by mohla byt chyba?. dekuji
odkaz na slozku: ulozto.cz/...
2x
Chyba bude v místním nastavení (lokalizace). Ona i většina těch ostatních desetinných čísel je uložena jako text.
Zkuste 1. v Nástroje -> Možnosti -> Mezinárodní zrušit zaškrtnutí používání systémových oddělovačů, následně zadáte napevno tečku nebo čárku, jak potřebujete.
Nebo 2. tohle vaše nahrazení provést před zkopírováním dat, tedy před Selection.Copy, a upravit Windows(subor).Close na Windows(subor).Close True
Nebo 3. ActiveSheet.Paste změnit na ActiveSheet.PasteSpecial Paste:=xlPasteValues
Neneseme odpovědnost za správnost informací a za škodu vzniklou jejich využitím. Jednotlivé odpovědi vyjadřují názory jejich autorů a nemusí se shodovat s názorem provozovatele poradny Poradte.cz.
Používáním poradny vyjadřujete souhlas s personifikovanou reklamou, která pomáhá financovat tento server, děkujeme.