Insert new column when "average" found in row 3

This code inserts a new column to the left of Column CV

Sub Macro1()
    Columns("CV:CV").Select
    Selection.Insert Shift:=xlToRight
End Sub

I am looking for assistance with this code. I am wanted to modify it so it will scan Row 3 for the contents “Average”. When those contents are found in a column in Row 3, the code will insert a new column to the left of that column. In other words whatever column in Row 3 that contains the contents “Average” a new column will be inserted to the left of that column. Can you help?