Domanda preliminare visual basic

Ciao,

come scrivere una macro in modo che, dopo la sua esecuzione, la cella selezionata sia la stessa iniziale prima dell'esecuzione stessa?

Ad esempio, supponendo che io sia in A5 avrei bisogno che, dopo l'avvio di questa macro, la cella selezionata sia di nuovo A5.
Se invece la cella selezionata prima dell'avvio fosse B10, allora B10 e così via

Range("A1:B10,D1:E10").Select
With Selection.Font
.Color = 00000
.TintAndShade = 0
End With
End Sub

AGGIORNAMENTO
Come faccio ad impostare l'aggiornamento automatico dell'intervallo?
Adesso sarebbe:
"A1:B10,D1:E10"
Però, se si aggiungesse ad esempio una riga in alto, dovrebbe diventare:
"A2:B11,D2:E11"

E' semplice, si scrive la macro così come la scriverebbe un essere umano e non il registratore di macro, cioè senza usare select

Un saluto a Zer0kelvin
Ha ragione basta non usarlo. In altri casi si rileva le coordinate e poi alla fine riposizionarsi...

Zer0kelvin, 10/07/2018 21.07:

---

E' semplice, si scrive la macro così come la scriverebbe un essere umano e non il registratore di macro, cioè senza usare select

With Range("A1:B10,D1:E10").Font
  .Color = 00000
  .TintAndShade = 0
End With

---

Grazie mille! Ammetto infatti che ho usato il registratore perché con VB sono altro che principiante, grazie!! =)

raffaele1953, 11/07/2018 00.24:

---

Un saluto a Zer0kelvin
Ha ragione basta non usarlo. In altri casi si rileva le coordinate e poi alla fine riposizionarsi...

vb

Sub aaaa()
Dim C As Long, R As Long
R = Selection.Row
C = Selection.Column
'tuo codice
'tuo codice
Cells(R, C).Activate
End Sub

---

Grazie mille! =) =)