• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: adresace buněk v makru

Zaslal/a Tomas 8.1.2011 21:20

Bádám na makrem: myší si vyberu jednu či více buněk ve sloupci. A makro mně určitým způsobem do vybraných buněk spočítá výsledek z hodnot ležících vždy ve dvou sousedících buňkách zleva (na každém řádku jako je vybraná cílová bunka).
Nevím si ale rady, jakým způsobem adresovat buňky vedle výběru.

Pokud vím přesně tak to jde takhle, ale pokaždé to je jinak může jich být více pod sebou
Range("c3").Value = (((Range("a3").Value / 1.2) - Range("b3").Value) / (Range("a3").Value / 1.2)) * 100

Prosím o nasměrování kudy se dál ubírat. Děkuji

Zaslat odpověď >

---

SkyVessel(8.1.2011 23:21)#003704

našel jsem v knize jak vybrat řádek vedle:
...
Dim DalsiRadek As Long
Do
DalsiRadek - Cells(Row.Count. 1).End(xlUp).Row + 1
...
Loop

Myslím si že to z toho půjde odvodit tedy jestli je to ono...
Jinak
http://www.ebookforum.cz/viewtopic.php?f=33&t=13374&p=107629&hilit=excel+2007#p107629
- ten z rapidu by měl jet... tam jsem to našel na 316 straně...citovat

RomanNTA(9.1.2011 20:34)#003708

Pokud je to v makru pak vyzkoušej

ActiveCell.Value = 1
ActiveCell.Offset(1,0).Value = 2
ActiveCell.Offset(0,1).Value = 3
ActiveCell.Offset(0,2).Value = 4
ActiveCell.Offset(0,3).Value = ActiveCell.Offset(0,3).Address

atd.
R.citovat

krapl(10.1.2011 8:29)#003709

ZKUS TOTO:

For Each bun In Selection
bun.Value = (((bun.Offset(0, -2).Value / 1.2) - bun.Offset(0, -1).Value) / (bun.Offset(0, -2).Value / 1.2)) * 100
Next bun
citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse