Combine Text and Integers to single cell?

[Kriskros07]

Hi,

The following bit of VBA (.Formula line specifically) only works for numerical cell content. When trying to concatenate a text field with a numerical one and output results to a single cell its not happy. Any ideas of how to do this. Is there a .Text type statement i could use perhaps instead?

With Range(Cells(1, g + 1), Cells(LR, g + 1))
.Formula = "=" & Cells(1, g - 2) & Cells(LR, g)
.Value = .Value
End With

Any help greatly appreciated as usual )

 

[Andrew Poulsom]

How about?

.Formula = "=" & Cells(1, g - 2).Value & "&" & Cells(LR, g).Value

or simply:

.Value = Cells(1, g - 2).Value & Cells(LR, g).Value