how can I select a cell next to a cell in a row?

[dschmitt]

the code below shows how one can select a cell below a certain range in one column.

My question is:
How would the equivalent code look like if I want to select the cell next to a cell in a row?

 r = Range("A" & Rows.Count).End(xlUp).Row
    Range("A" & r + 1).Select