How to include variable inside " "

[NimWit]

If i wanna include a variable inside the space for text, how should i do it?

[duane]

=concatenate("do it like this",a1,"or this",a2)

where a1 and a2 can be variables (cell with values or cells with formulas)

[NimWit]

Sub Macro1()
'
' Macro2 Macro
' Macro recorded 1/13/2005 by Scanner
'

'
Dim i, j, no
i = 1
j = 4

Do

Range("A1:C96").Select
Range("C96").Activate
Selection.Copy
Sheets.Add
ActiveSheet.Paste
ActiveWindow.LargeScroll Down:=2
Range("B1:C96").Select
Range("C96").Activate
Application.CutCopyMode = False
Charts.Add
ActiveChart.ChartType = xlLine
ActiveChart.SetSourceData Source:=Sheets("Sheet& j &").Range("B1:C96"), PlotBy _
:=xlColumns
ActiveChart.Location Where:=xlLocationAsNewSheet
With ActiveChart
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
Sheets("Sheet1").Select
Rows("1:96").Select
Range("A96").Activate
Selection.Delete Shift:=xlUp

i = i + 1
j = j + 1
Loop Until (i = 5)
End Sub


For this part ----> ActiveChart.SetSourceData Source:=Sheets("Sheet& j &").
original is ActiveChart.SetSourceData Source:=Sheets("Sheet1").

i need it to go like .... ("Sheet1"), ("Sheet2"), ("Sheet3") .....