EXCEL - relativní adresování buněk v makru

[mmmartin]

Makrem chci formátovat buňku, která je např. o dva sloupce vpravo a tři řádky pod jakousi výchozí buňkou, na které je kurzor v okamžiku spuštění makra. Když to zapisuji jako klávesové makro, je adresa buňky určené k formátování zapsaná absolutně, tj. v podobě např. D5. Jak by měl řádek Range("D5").Select v makru vypadat, aby poloha "cílové" buňky byla odvozená z aktuální polohy výchozí buňky? Děkuji.

[navstevnik]

Upravena procedura:

Kód: Vybrat vše

Sub Makro1()
'
' Klávesová zkratka: Ctrl+q
'
  With ActiveCell.Offset(3, 2).Interior
    .Pattern = xlSolid
    .PatternColorIndex = xlAutomatic
    .Color = 255
    .TintAndShade = 0
    .PatternTintAndShade = 0
  End With
End Sub

[mmmartin]

Funguje (jak jinak taky!) Děkuju.

EIDT: Ještě jedna prosba: jak bude odkaz vypadat, když chci tímto způsobem vyznačit blok buněk - např. najednou formátovat buňky D5, D6 a D7?

Dík.

[Branscombe]

Osobně bych to napsal takhle:

Kód: Vybrat vše

Selection.Offset(3, 2).Resize(3, 1).Select

[mmmartin]

Dík! Vyzkoušeno a použito.