No, I'm just using the Base statistical package. I sending data from
Excel to SPSS. The macro in SPSS permits the user to run statistical
techniques that aren't available in Excel. It then ships the results
back to Excel. Excel then creates charts from the results.
MsgBox "Please close existing SPSS applications and click OK."
Msg = ("SPSS opens automatically provided that it's path is c:\Program
Files\SPSSGP\spsswin.exe")
Msg = Msg & vbNewLine & vbNewLine
Msg = Msg & ("If you see a 'What Would You Like To Do?' window, click
Cancel")
Msg = Msg & vbNewLine & vbNewLine
Msg = Msg & ("Once SPSS opens, open and run the syntax
'c:\AdSAM\macros\Run.sps'")
Msg = Msg & vbNewLine & vbNewLine & ("When through with SPSS, return to
Excel and click OK.")
Msg = Msg & vbNewLine & vbNewLine & ("Ideally, Excel will open SPSS and
run the SPSS syntax without you needing to open the Run.sps file")
Msg = Msg & vbNewLine & vbNewLine & ("Still working on this....")
Msg = Msg & vbNewLine & vbNewLine & "Ready to open SPSS?"
Msg = Msg & vbNewLine & vbNewLine
openspssnow = MsgBox(Msg, vbYesNo, "Opening SPSS")
If openspssnow = vbYes Then
On Error Resume Next
Program = "c:\Program Files\SPSSGP\spsswin.exe"
TaskID = Shell(Program, 1)
If Err <> 0 Then
MsgBox "Unable to start " & Program, vbCritical, "Error"
End If
End If