MAKRO - ulozeni souboru

Od: Datum: 23.09.12 14:10 odpovědí: 2 změna: 24.09.12 16:37

Dobrý den,

nahrál jsem si makro, které preformatuje soubor csv do sloupcu:

Sub Makro1()
'
' Makro1 Makro
'
' Klávesová zkratka: Ctrl+a
'
Columns("A:A").ColumnWidth = 52
Range("A4:A164").Select
Selection.Replace What:=",", Replacement:=";", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.TextToColumns Destination:=Range("A4"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=True, Comma:=False, Space:=False, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _
Array(7, 1), Array(8, 1), Array(9, 1), Array(10, 1)), TrailingMinusNumbers:=True
End Sub
rád bych k tomuto makru pridal, aby se soubor automaticky ulozil jako aplikace pro excel? je to mozne?

avatar
Upozornění
Tato otázka je 4 roky bez odpovědi a proto byla uzavřena.
Máte-li podobnou otázku, a nenašli jste vhodnou odpověď, založte novou otázku.
Seznam odpovědí:
 
moment čekejte prosím, probíhá přenos dat...
Zobrazení struktury odpovědí v otázce
Skrytí struktury odpovědí v otázce
Zobrazení struktury odpovědí v otázce

 

Odpovědi na otázku:
Datum: 24.09.12 12:39
 
avatar

Základní příkaz pro uložení aktivního sešitu vypadá takto

ActiveWorkbook.Save

Zkuste ho dát na konec, před End Sub.

Jestli vám automatické ukládání nebude fungovat, pak přidáme.

A naučte se editovat makra vytvořená záznamníkem. Sám vidíte, že to co jste zaznamenal, je nerozluštitelný horror. Zvláště ty všechny hodnoty, co vám vaše makro nastavuje na False, tam vůbec nemusí být.

doplněno 25.09.12 12:01:

mohl byste prosím trošku líp vysvětlit, co vlastně od vašeho makra očekáváte? Proč importujete zrovna do formátu csv? Já se tedy přiznávám, že jsem za deset let práce s Excelem a makry formát csv ještě nepoužil. A neznám ani nikoho dalšího. Teď mám pár dalších dotazů.

Máte v naimportované tabulce vzorce?

Jestli máte vzorce, chcete, aby tam zůstaly nebo mají být nahrazené hodnotami?

Pod jakým jménem a v jakém formátu se má soubor ukládat a odkud se to jméno a formát vezme? Chcete ho zadat ručně?

Do jakého adresáře se mají tabulky ukládat a odkud se adresa načte? Bude adresa konstantní nebo ne? (pozor, VBA nemá DirList box, to je ta součástka windows, která slouží k prohlížení a ukládání do adresářů)

 
Od: kimnator*
Datum: 24.09.12 16:37
 

Velice dekuji za reakci, bohuzel to nefunguje. Ja se prave v kodu vba nevyznam, proto takovy cirkus, omlouvam se.

 

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

 
Copyright © 2004-2016 Poradna Poradte.cz. Všechna práva na poradně Poradte.cz vyhrazena.