Hi All
Sub concatenate()
Dim a As String: a = "L:\OWL\Work"
Dim b As String: b = "\jobs"
Dim c As String
Dim d As String
c = Cells(0, 3).Value
d = a & c & b
Worksheets("sheet 2").Cells(1, 5).Value = d
End Sub
Sub concatenate()
Dim a As String: a = "L:\OWL\Work"
Dim b As String: b = "\jobs"
Dim c As String
Dim d As String
c = Cells(0, 3).Value
d = a & c & b
Worksheets("sheet 2").Cells(1, 5).Value = d
End Sub