I am using a spreadsheet which contains headings in row 5.
What I am looking for is a macro which will go through row 5 and when it finds the words "Total" then it will select that column.
Sub SelectTotalcolumn() Dim r As Range, cell As Range
Set r = .Range(.Cells(1, 5), .Cells(5, .Columns.Count).End(xlToLeft))
End With For Each cell In r
If InStr(1, cell, "total", vbTextCompare) > 0 Then cell.EntireColumn.Select Exit For End If
there are more efficient ways, but based on what you have described it seemed fairly robust. It assumes that only one cell in row 5 contains the substring "total"
Anyway, it was tested on the activesheet and it worked for me.