Как обозначить ячейку на одну правее от активной ячейки?

[ru3000]

Помогите реализовать следующую часть кода:

name1 = [активная ячейка]
name2 = [ячейка на одну правее от активной ячейки]
name3 = [ячейка на две левее от активной ячейки]

Спасибо.

[Serge_Bliznykov]

ну, например так:

  Dim Name1 As String, Name2 As String, Name3 As String
  Name1 = ActiveCell
  MsgBox " Name1 = " & Name1
  Name2 = Cells(ActiveCell.Row, ActiveCell.Column + 1)
  MsgBox " Name2 = " & Name2
  Name3 = Cells(ActiveCell.Row, ActiveCell.Column + 2)
  MsgBox " Name3 = " & Name3

[ru3000]

Класс! Спасибо!

[SAS888]

Можно проще:

MsgBox ActiveCell.Address
MsgBox ActiveCell.Next.Address
MsgBox ActiveCell.Next.Next.Address

[dsapa]

А я пользуюсь третьим вариантом - Offset
Симпатичная фенька