5 Excel Macros to Improve Your AdWords Worflow

Macros provide a great way to automate common operations when working with AdWords in Excel. Below are 5 macros that I use on an almost daily basis.

Broad Match to +Broad +Match +Modified

Sub makeBmm()
'Keyboard Shortcut: option+cmd+b
    For Each cell In Selection
cell.Value = WorksheetFunction.Trim(cell.Value)
    For Each cell In Selection
cell.Value = "+" & cell.Value
    For Each cell In Selection
cell.Value = Replace(cell.Value, " ", " +")
End Sub

Text to Columns

Sub splitColumns()
'Keyboard Shortcut: option+cmd+s

Dim separator As Variant
separator = InputBox("Split by:")
Selection.TextToColumns , DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, Other:=True, OtherChar _
End Sub

Paste Values

Sub pasteValues()
'Keyboard Shortcut: option+cmd+v
Selection.PasteSpecial Paste:=xlValues
End Sub

BMM → Exact → BMM

Sub bmmExact()
'Keyboard Shortcut: Option+Cmd+e

For Each cell In Selection
If InStr(cell.Value, "BMM") Then
cell.Value = Replace(cell.Value, "BMM", "Exact")
cell.Value = Replace(cell.Value, "Exact", "BMM")
End If
End Sub

Delete Irrelevant Columns

Sub delColumns()
'Keyboard Shortcut: Option+Cmd+d
    Dim currentColumn As Integer
Dim columnHeaders As String
    For currentColumn = ActiveSheet.UsedRange.Columns.Count To 1 Step -1
        columnHeaders = ActiveSheet.UsedRange.Cells(1, currentColumn).Value
        'Check which columns to keep/delete
Select Case columnHeaders
'Do nothing
            Case "Campaign", "Ad Group", "Keyword", "Criterion Type"

Case Else
'Delete column
        End Select
End Sub

About the author

Lars C. L. Larsen is an Online Marketing Specialist & Partner at AdNudging.com. You can connect with him on LinkedIn.

One clap, two clap, three clap, forty?

By clapping more or less, you can signal to us which stories really stand out.