premetto che non conosco molto le macro excel

ho creato un foglio in cui con un comando-freccia-avanti, sposto il contenuto di una cella in una cella vicina. Questo per sei posizioni (un campo di pallavolo).

Sub Rotazione()
Dim strValoreTemp As String
strValoreTemp = Foglio2.Cells(3, 3)
Foglio2.Cells(3, 3) = Foglio2.Cells(7, 3)
Foglio2.Cells(7, 3) = Foglio2.Cells(7, 6)
Foglio2.Cells(7, 6) = Foglio2.Cells(7, 9)
Foglio2.Cells(7, 9) = Foglio2.Cells(3, 9)
Foglio2.Cells(3, 9) = Foglio2.Cells(3, 6)
Foglio2.Cells(3, 6) = strValoreTemp
End Sub

Ora vorrei che con lo stesso comando, si spostasse anche una cella diversa che è collegata alla prima (seconda, ecc.) con la propria formattazione (ad esempio il bordo) oltre che il contennuto.

Non riesco a trovare alcuna soluzione.

Magari sarà banale ma ripeto che sono alle prime armi.

grazie a chi vorrà aiutarmi
fezucca