Excel Macro to find perticular column nameClosed

Question

Hello,
 
Ii have excel having column names in row#1.

I want to write excel macro that will look for column name anything that had 'ID' or 'AMT' in it,and should format whole column (except 1st row which has name) in 0000-000-00 for ID and $ 000,000,00.00 for AMT.

So that time consumed in formatting each column will be reduced.

I would greately appriciate if someone knows solution about it.

Thanks in advance.

Configuration: Windows 7 / Internet Explorer 8.0

venkat1926 · Answer

before tampering with data save the file somewhere else safely for retrieval if necessary 



try this macro 

Sub test()
Dim j As Integer, cfind As Range
Set cfind = ActiveSheet.UsedRange.Cells.Find(what:="ID", lookat:=xlWhole)
j = cfind.Column
Columns(j).NumberFormat = "000-000-000"
Set cfind = ActiveSheet.UsedRange.Cells.Find(what:="AMT", lookat:=xlWhole)
j = cfind.Column
Columns(j).NumberFormat = "000,000,00#.00"
End Sub

venkat1926 · Answer

try in what:= like this 

what:="*id*

and see whether you succeed. 

star sign before and after is widcard with "ID" in between.
wild cards some tiems succeed and some time fail

soniamike732 · Answer

Weldon job dear.

http://www.maxglim.com

Excel Macro to find perticular column name

3 responses

Similar discussions

Subscribe To Our Newsletter!