Hi

you could try adding the cells refs to a string then use that as your
saveas name.

Option Explicit
Dim fName As String

Private Sub CommandButton1_Click()
fName = [j3] & [u3]
ActiveWorkbook.SaveAs Filename:=fName
End Sub

hope this is of some help

S