» Poradna » Programy

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

Odpovědět  |  Zobrazit bez stromu  |  Upozornit redakci  |  nových odpovědí: 7/7
 |   |   |  [88.146.161.---]

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

 |   |   |  [83.208.78.---]

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
 |   |   |  [88.146.161.---]

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
 |   |   |  [83.208.78.---]

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
 |   |   |  [88.146.161.---]

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
 |   |   |  [83.240.1.---]

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
 |   |   |  [83.240.1.---]

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
 |   |   |  [83.208.78.---]

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


Dnes je Black Friday: Přehled slev na elektroniku a počítače

Dnes je Black Friday: Přehled slev na elektroniku a počítače

** Začala slevová mánie zvaná Black Friday ** Pozor, ne všechny slevy jsou opravdu výhodné ** Průběžně sledujeme slevové akce v počítačových e-shopech

22.  11.  2017 | David Polesný | 37

Google Mapy mají nový design. Líbí se vám víc než předchozí? Tady je srovnání

Google Mapy mají nový design. Líbí se vám víc než předchozí? Tady je srovnání

** Nový design Google Map přijde na počítače i mobilní telefony. ** Zaměřuje se na zvýraznění konkrétních míst, mapové podklady jsou mnohdy upozaděné. ** Lépe pracuje s chráněnými oblastmi a parky.

20.  11.  2017 | Vladislav Kluska | 30

Microsoftu se invaze na Android daří, jeho launcher aktivně používá přes milion lidí

Microsoftu se invaze na Android daří, jeho launcher aktivně používá přes milion lidí

** Microsoft se zabydluje na platformě Android ** Nedávno představený launcher už používá milion uživatelů ** Je to stále jen zanedbatelný zlomek uživatelů Androidu, ale slibný růst

22.  11.  2017 | Vladislav Kluska | 35

Co je to láska? Milujeme se pouze kvůli chemickým látkám, nebo je v tom něco víc?

Co je to láska? Milujeme se pouze kvůli chemickým látkám, nebo je v tom něco víc?

** Co je to vlastně láska? Dá se vysvětlit vědecky? ** Výzkum ukázal, že zamilovaní jedinci mají mj. zvýšenou hladinu fenyletylaminu a množství testosteronu ** Je ale rozdíl mezi zamilovaností a láskou

21.  11.  2017 | Vojtěch Malý | 23