< návrat zpět

MS Excel


Téma: uložení do csv rss

Zaslal/a 21.8.2012 14:22

Dobrý den všem,
makrem převádím určité obsahy listu do .csv souborů.
pokud xlxm ukládám manuálně do formátu csv mám možnost volby rozdělování mezi "," a ";".
Pokud stejnou operaci udělám makrem tak se nový soubor *.csv zásadně ukládá s oddělovačem ",".
Toto je nevýhodné protože násldné operace nerospoznaji po kde se kolonka odděluje od finančních částek 150,50 a generuje se kolonka s obsahem 150 a další kolonka s obaseh 50.
pokyn v makru:
"ActiveWorkbook.SaveAs Filename:="P:\PS\PRODUKCE\st_produkce\" & Format(Now, "yy-mm-dd") & "_aktualizace_st_produkce.csv", _
FileFormat:=xlCSV, CreateBackup:=False
ActiveWindow.Close
ActiveWorkbook.Save"

Jak musí znit pokyn aby exel ukládal s ";" ?

Může mě prosím nškdo pomoct?

Děkuji předem všem kteří jsou ochtni mne poradit.

Pavel

Jméno
Kontrola
Text
  b i u s img code url hr   1 2 3 4 5 6 7 8 9 10

Strana:  1 2   další »
icon #009288
Poki
pridal jsem jednu vlastnost:
ActiveWorkbook.SaveAs Filename:="P:\PS\PRODUKCE\st_produkce\" & Format(Now, "yy-mm-dd") & "_aktualizace_st_produkce.csv", _
FileFormat:=xlCSV, CreateBackup:=False, Local:=True
citovat
#009289
avatar
Bohužel nepomohlo,
nejaké jiné nápady a zkušenosti?

I přesto SUPER a dík za vůly mne pomoct

Pavelcitovat
icon #009290
Poki
takze pouzivas anglicke office?

jaky mas OS a office?

___
Mozna by mohlo pomoci, kdyz vynechas to dalsi ulozeni:
activeworkbook.savecitovat
#009291
avatar
os máme wind. nt 2008 server
exel v pracovní části komunikuje CZ v části maker v agl. i pod F1 pomoc
Office 2007
bohužel i odnechání pokynu "activeworkbook.save" se opět csv uložilo s ","
Zasílám vystupúovýcitovat
icon #009292
Poki
spis ukaz ten soubor, kde je makro - to ktere uklada csvcitovat
#009311
avatar
V nápovede som našiel toto:

Zmena oddeľovača vo všetkých textových súboroch .csv
1.V systéme Microsoft Windows kliknite na tlačidlo Štart a potom kliknite na položku Ovládací panel.
2.Otvorte dialógové okno na zmenu miestnych a jazykových nastavení.
3.Do poľa Oddeľovač zoznamu zadajte nový oddeľovač.
4.Kliknite dvakrát na tlačidlo OK.
Poznámka Po zmene znaku oddeľovača zoznamu pre daný počítač budú všetky programy používať nový znak ako oddeľovač zoznamu. Nastavenie znaku môžete rovnakým postupom vrátiť na predvolený znak.
citovat
#009819
Lano
Zdravím,
ZNOVU otevírám tuto diskuzi, protože (alespoň pro mě) není ukončená :-) a stejný problém teď mám i já.
- podle Pokiho jsem přidal Local:=True
- podle marjanky mám nastavený oddělovač středníkem
Ale stejně mi to ukládá s čárkami.
Nebyl by ještě nějaký nápad ?
Používám Windows 7,64bit a Excel 2010 (obě české)
Díky za nápady
Příloha: rar9819_import_csv.rar (32kB, staženo 35x)
citovat
#009828
avatar
Kdyby to nekomu fakt neslo nastavit, tak se to jeste da udelat "hrubou silou", tedy bunku po bunce. Vystup muze byt *.txt nebo *.csv

Sub ExportCSVStredniky()
Dim rOblast As Range, rRadek As Range, rBunka As Range
Dim s As String

Set rOblast = ActiveSheet.UsedRange
Open ThisWorkbook.Path & "\bubu_1.csv" For Output As #1

For Each rRadek In rOblast.Rows
For Each rBunka In rRadek.Cells
If IsNumeric(rBunka.Value) And Not IsDate(rBunka.Value) Then
s = s & rBunka.Value & ";"
Else
If IsDate(rBunka.Value) Then rBunka.NumberFormat = "dd/mm/yyyy"
s = s & rBunka.Text & ";"
End If
Next
Print #1, s
s = ""
Next

Close #1

End Sub
citovat
#009841
avatar
Možná se pletu, ale koukl bych do regedit, jaká je tam nastavena volba pro Local.
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Text
Format = Delimited(;)citovat
#019800
avatar
Perfektní! Přesně tohle funguje. Vyzkoušel jsem snad už všechno možné.
Chyba v ukládání maker není přímo závislá na nastavení počítače. Testoval jsem to na pěti různých konfiguracích. Je to chyba Office 2010 o které Micro$oft taktně mlčí.citovat

Strana:  1 2   další »

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09