cell format macro

[danushka]

dear friends i need to change my sheet column "H" format.so that i have recorded macro & I have small problem..my sheet data starting from cell H3 & H1 & H2 cells are merge.i want change column "H" cell format as a "TEXT"..pls give me idea about rage..thanks in advance..

 

[StuLux]

Please paste a copy of the code you have recorded so we can see what it is doing.

 

[JackDanIce]

Try:

Sub MyMacrosNotWorking ()
 
With Columns("H:H")
  .NumberFormat = "@"
End With
 
End Sub

 

[danushka]

Please paste a copy of the code you have recorded so we can see what it is doing.

Sub textformat()
 Columns("H:H").Select
    Range("H3").Activate
    Selection.NumberFormat = "@"
End Sub

 

[JackDanIce]

You macro only applies the text formating to cell H3, see my code, it applies it to the whole of column H

 

[danushka]

Try:

Sub MyMacrosNotWorking ()
 
With Columns("H:H")
  .NumberFormat = "@"
End With
 
End Sub

your macro is working..only the thing is after running this macro, another column formats also change to the TEXT.because column "H" first two cells marge with another column cells..

 

[JackDanIce]

It would help if you gave more detail in your postings, funny enough, I am not sitting where you are so can't see your worksheet. Specifically what cells are merged? H1:I1?

 

[danushka]

It would help if you gave more detail in your postings, funny enough, I am not sitting where you are so can't see your worksheet. Specifically what cells are merged? H1:I1?

column "E1 to H2" cells are merged..

 

[JackDanIce]

Try:

Sub MyMacrosNotWorking ()
 
With Range("H3:H" & Rows.Count)
  .NumberFormat = "@"
End With
 
End Sub

 

[danushka]

Try:

Sub MyMacrosNotWorking ()
 
With Range("H3:H" & Rows.Count)
  .NumberFormat = "@"
End With
 
End Sub

thanks a lot it's work very well.thanks again..