» Poradna » Programy

EXCEL makro pro zápis do aktuální buňky?

 |   | 

Prosím o radu/pomoc , potřeboval bych vytvořit makro , které by po jeho spustění
vypsalo předem definovaný text na aktuálním místě kde je zrovna kursor???
předem děkuji.

Odpovědi na otázku

 |   | 

pokud je text ulozen v makru, pak takto:
Dim TextStr$
Sub VlozText()
TextStr = ".....text....."
ActiveCell.Value = TextStr
End Sub

volani makra nastav v nastroje>makro>makra

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

Vytvořil jsem si Makro1 a do něj vložil co je zde výše popsáno , pak přiřadol Makro1 k tlačítku a nic... jaximi to nefunguje??? sekne se mi to hned na Dim???
Co s tím ???
Dík.

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

otevri Excel, spust si editor VBE (levy Alt + F11), vloz modul, do modulu vloz:

Sub VlozText()
Dim TextStr$
TextStr = ".....text....." ' zde je text ke vlozeni
ActiveCell.Value = TextStr
End Sub


vrat se do sesitu exelu, nastroje>makro>makra (nebo Alt+F8), vyber makro 'VlozText' , dale moznosti a zvol klavesu, napr.: Ctrl [+Shift]+ V

pokud mas na mysli pouziti ovladaciho prvku 'CommandButton' z 'Ovladacich prvku', pak vyber zobrazit>panely nastroju>ovladaci prvky, vyber ovladaci prvek 'prikazove tlacitko' (CommandButton), v horni casti panelu 'ovladaci prvky' vyber 'zobrazit kod', zobrazi se kod pro prikazove tlacitko a vloz mezi jiz vlozene

Private Sub CommandButton1_Click()

End Sub

tento kod

Dim TextStr$
TextStr = ".....text....." ' zde je text ke vlozeni
ActiveCell.Value = TextStr

takze budes mit:

Private Sub CommandButton1_Click()
Dim TextStr$
TextStr = ".....text....."
ActiveCell.Value = TextStr
End Sub

vrat se do sesitu a klik na tlacitko 'CommandButton1' (muzes prejmenovat) vlozi text do vybrane bunky

prijemne svatky vanocni

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

Děkuji mooc za vyčerpávající popis ........... již funguje.
Taky přeji pěkné svátky

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

To v cem je napsan ten kod je Visual Basic? Jde tam pouzit i neco jineho, myslim jiny jazyk?
Dekuju

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

To v cem je napsan ten kod je Visual Basic? Jde tam pouzit i neco jineho, myslim jiny jazyk?
Dekuju

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

cituji z http://www.officir.ic.cz/chipex05/01/excel_vba_uvo... :
"VBA (Visual Basic for Applications, česky Visual Basic pro aplikace) je programovacím jazykem, jehož základy jsou společné hned několika aplikacím balíku MS Office...., bude vcelku snadné připravit si vlastní pomůcky například ve Wordu, Outlooku či PowerPointu.... VBA přitom není jediným jazykem, ve kterém můžete programovat své nadstavby aplikací MS Office. Vedle něj se nabízí ještě VBScript (Visual Basic Script) a případně JavaScript...."

Souhlasím  |  Nesouhlasím  |  Odpovědět

Související témata: Buňky, Zápis, Makro




Určitě si přečtěte

Jak horko bude ve vašem městě, až vám bude 80 let? Podívejte se, jak se projeví klimatické změny!

Jak horko bude ve vašem městě, až vám bude 80 let? Podívejte se, jak se projeví klimatické změny!

** Srpen byl třetí nejteplejší za posledních více než sto let ** Bude to ale daleko horší, jak ukazuje aplikace NYT ** V Praze vzroste počet horkých dní na čtyřnásobek

Karel Kilián | 21

ELONOVINKY: Druhá strana popularity – servisy Tesly jsou přeplněné a nestíhají

ELONOVINKY: Druhá strana popularity – servisy Tesly jsou přeplněné a nestíhají

** Automobilka Tesla neustále zvyšuje prodeje svých vozů ** S kvapně rostoucím počtem nových majitelů Tesel ale stoupá i počet zákazníků servisů ** Servisy Tesly nestíhají, firma proto řeší další akutní problém

Petr Melechin, Karel Dlabač | 72

Přichází revoluce v oblasti deodorantů!

Přichází revoluce v oblasti deodorantů!

** Britští vědci odhalili uzlový bod procesů, kterými vzniká nejpronikavější složka lidského tělesného pachu ** Nové generaci deodorantů by mohl dodat na síle cílený zásah do života malé skupinky kožních bakterií ** Podle některých vědců by to ale znamenalo zpřetrhat pouta mezi člověkem a mikrobem

Jaroslav Petr | 33

V doupěti hackerů na brněnské FIT: Ukázali nám útoky na Bluetooth i vlastní chytré krabičky

V doupěti hackerů na brněnské FIT: Ukázali nám útoky na Bluetooth i vlastní chytré krabičky

** Internet je plný malwaru, to už dnes ví každý ** Víte ale, že lze útočit třeba i na Bluetooth? ** Navštívil jsem hackery z brněnského FITu

Jakub Čížek | 1


Jízdní řády Bileto
Aktuální číslo časopisu Computer

Megatest: 13 grafických karet

Srovnání 7 dokovacích stanic s USB-C

Jak na perfektní noční fotografie

Kvalitní zdroje informací pro sebevzdělávání