Makra v Excelu

From: Martin Zeidler (zm@wo.cz)
Date: 11. 04. 2002, 17:29 CEST


Dnes jsem se pustil poprve do maker a potreboval bych poradit s jednou veci.
Mam tady tabulku, kde je v jedne bunce vzdy zapsane jmeno a prijmeni.
Potrebuji to rozdelit tak, aby bylo jmeno v jedne a prijmeni ve druhe. Je to
jenom priklad, nepotrebuji konkretni reseni, ale radu. Pokud jsem pochopil
spravne, makro zaznamena sled udalosti  a dokaze je zopakovat. Nepouzivam
tedy mys, ale pouze klavesnici. Chtel jsem udelat toto:

- skoc do aktivni bunky (F2)
- skoc na zacatek textu (HOME)
- oznac prvni slovo (SHIFT+CTRL+SIPKA DOPRAVA)
- vrat se o jeden znak (SHIFT + SIPKA DOLEVA)
- zkopiruj to do schranky (CTRL+INSERT)
- smaz to (DELETE)
- smaz jeden znak napravo (DELETE)
- skoc o bunku napravo (TAB)
- zkopiruj ze schranky (SHIFT + INSERT)
- skoc o bunku nalevo (SIPKA DOLEVA)
- skoc o bunku dolu (SIPKA DOLU)

Udela to tenhle zapis ve VB, ktery mi ale nevyhovuje:


Sub Makro1()
'
' Makro1 Makro
' Makro zaznamenané 11.4.2002, Martin Zeidler
'
' Klávesová zkratka: Ctrl+a
'
    ActiveCell.FormulaR1C1 = "Zeidler"
    ActiveCell.Offset(0, 1).Range("A1").Select
    ActiveSheet.Paste
    ActiveCell.Offset(1, -1).Range("A1").Select
End Sub


Ja to potrebuji vseobecne, tedy opakovat stisky klaves presne za sebou a ne
to shrnout do jednoducheho:
ActiveCell.FormulaR1C1 = "Zeidler"


Jde to nejak?

Martin Zeidler
---------------------
mailto:kopec@wo.cz
http://kopec.yo.cz



This archive was generated by hypermail 2.1.2 : 11. 04. 2002, 18:01 CEST