< návrat zpět

MS Excel


Téma: excel -> text rss

Zaslal/a 14.4.2012 13:37

zdarvim :) , potřeboval bych pomoct, vytvořil sem si v exelu algoritmus kódu, a potřeboval bych ten výslednej kód (v jedné bunce) uložit do textového souboru ale když dám "uložit jako" tak mně to uloží i ty ostatní bunky a to já nechci, prosím pomožte 1

Zaslat odpověď >

Strana:  1 2   další »
#008033
avatar
nastav sa na tú bunku, alebo vyznač celý text.
CTRL+C
Otvor si WORD alebo Notepad a
CTRL+Vcitovat
#008056
avatar
no tak to mně taky došlo :D , jenže já potřebuju automaticky např. když ten excel otevřucitovat
#008058
avatar
No takto by to išlo
Sub Makro1()
Dim f, subor As String
f = FreeFile
subor = "text.tex"
Open subor For Output As f
data = Range("A1").Value
Print #f, data
Close #f
End Sub

Ale neviem načo takto vymýšľať, keď v editore VBA je možnosť exportu. 4citovat
#008103
avatar
díki moc ;) ,ta funkce exportu mně ale vyhodí celou tabulkucitovat
#008107
avatar
Ten kód máš predsa v module makier. A ak dáš exportovať modul, tak ti to vyexportuje čistý kód do súboru *.bas

ALT+F11
nastav sa do makra
File > exportcitovat
#008109
avatar
marjankaj: vies on anonymous NIKDE nepise ze sa jedna o VBA kod, ma skratka len nejaku postupnost vzorcov v jednej bunke a tu chce niekam exportovat

vies ak v tom clovek nevie plavat tak nevie ze nepouziva "pofi" slovnik a moze nastat problem (pozri tu: http://wall.cz/index.php?m=topic&id=8010#post-8083 - dobre ne?, preto im ja pisem ze chcem subor , a niektory furt niccitovat
#008110
avatar
@misocko:
Jasné, bez súboru môžem iba tipovať, o čo ide.
Ale aspoň mu dám aj iné možnosti. Možno sa mu to hodí niekde inde.
Niekedy je ťažké vydolovať súbor, a niekedy ani ten veľa neobjasní. 4citovat
#008371
avatar
http://leteckaposta.cz/280175452 tady je ten sešit počítám s tim že se nikdy k mej wifi nedostanete :D a pokud jo tak si udělám novej heslo je 4321 a v 03 vám to nepujde , no co potřebuju : P34 kdyby to šlo tak v VBA udělat program kterej mně bude vypisovat po stistknutí tlačítka tuhle bunku do txtcitovat
#008372
avatar
No 5,
chceš tedy exportovat hodnotu buňky nebo vzorec co je v buňce?
Odpověď už tady máš! (Kód od marjankaj...) Navol tam:
subor = ThisWorkbook.Path & "\text.txt"Pro vzorec toto:
Data = Range("P34").FormulaPro hodnotu toto:
Data = Range("P34").ValueOk? 10
P.citovat
#008373
avatar
jj skusim si s tim nějak pohrát ale jelikož sem ve vba moc neprogramoval spíš v c++ tak se musim podívat jak ses to dělá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

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21