excel-get-column-index

Excel - Get Column Index

This macro gets certain column index.

Excel

  • 2281
  • 405
  • 0
  • 0
Add to collection
© 2021VBAmacros.net

1 Open MS Excel.

2 Create a blank workbook.


3 Go to Developer's tab > click on "Visual Basic" button or hit Alt + F11.


4 Go to Insert tab > click on "Module" or hit M.


5 Copy the VBA code from below.

6 Paste the code in the newly created module.


7 Go to Run tab > click on "Run Sub/UserForm" or hit F5.


8 That's it!


Advertisement

Code
'==========================================
' Get Column Index
'==========================================
Sub getColumnIndex()
    ' Set variables
    Dim strMessage As String
    Dim c As Range
    ' Set message
    strMessage = "Column(s): "
    ' Loop in used range
    For Each c In ActiveSheet.UsedRange
        ' Check each cell value
        If c = "Index" Then
            ' Append to message
            strMessage = strMessage & c.Column & ", "
        End If
    Next c
    ' Return a message
    MsgBox strMessage & " have Index in them."
End Sub
Advertisement


Comments
Sort by:
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.
Advertisement
  • Created
    27-May-2020
  • Last updated
    27-May-2020
Advertisement
VBAmacros.net VBAmacros.net
Code was successfully copied!
VBAmacros.net VBAmacros.net
Please sign in!
VBAmacros.net VBAmacros.net
You've already voted!