Try this one:
ArgumentA = Range("A1").value
RetVal = Shell("""C:\pathforprogram.exe""" & ArgumentA & " /argument2 /savefile=C:\textfile.txt", 1)
also I suggest you to fully qualify your Range
object:
ArgumentA = ThisWorkbook.Worksheets("Sheet1").Range("A1").Value