Checking Solver Add in Conditions using VBA

[gennylk]

Hi there,
I need to check some conditions applied to a sheet using Solver Addin. I recorded the action when adding them :

SolverOk SetCell:="$B$13", MaxMinVal:=1, ValueOf:=0, ByChange:="$B$11:$D$11", _
Engine:=1, EngineDesc:="GRG Nonlinear"
SolverAdd CellRef:="$B$11", Relation:=4, FormulaText:="integer"
SolverAdd CellRef:="$C$11", Relation:=4, FormulaText:="integer"
SolverAdd CellRef:="$D$11", Relation:=4, FormulaText:="integer"
SolverOk SetCell:="$B$13", MaxMinVal:=1, ValueOf:=0, ByChange:="$B$11:$D$11", _
Engine:=1, EngineDesc:="GRG Nonlinear"

How can I write a macro to check whether the conditions for $B$11, $C$11, $D$11 (Only Integer Solutions accepted) are added using solver? This is part of a larger process, where I check multiple files to see whether the solver addin has been correctly defined in the worksheets. I am openning the target file using VBA Macro and award marks (say 1 each) if the file has the conditions properly assigned. Note that the cells are fixed.

Thank you in advance.
Genny