G
Guest
Hi,
Having some trouble with inserting formula.
Sub formula()
Columns("H:H").Select
Selection.Insert Shift:=xlToRight
Range("I1").Select
Selection.Copy
Range("H1").Select
ActiveSheet.Paste
'Range("H2").Select
' Application.CutCopyMode = False
' this is the formula but I get a compile error message end of statement
'activecell.FormulaR1C1 = "=J2&" "&K2"
' I need to put a space between J2 and K2, otherwise the strings
aren't seperated with a space
End Sub
How can I solve this? Or should I
Having some trouble with inserting formula.
Sub formula()
Columns("H:H").Select
Selection.Insert Shift:=xlToRight
Range("I1").Select
Selection.Copy
Range("H1").Select
ActiveSheet.Paste
'Range("H2").Select
' Application.CutCopyMode = False
' this is the formula but I get a compile error message end of statement
'activecell.FormulaR1C1 = "=J2&" "&K2"
' I need to put a space between J2 and K2, otherwise the strings
aren't seperated with a space
End Sub
How can I solve this? Or should I