Macro to Italicize a specific row of every worksheet

---

Macro to Italicize the third row of every worksheet

---

Sub Italicize()
Dim A As Worksheet, B As Worksheet
Set B = ActiveSheet
For Each A In ThisWorkbook.Worksheets
A.Activate
Rows(3).Font.Italic = True
Next
B.Activate
End Sub

---

How to use codes shared here?