Hi,


I have the macro named SOLVER, when I call this macro with the sub routine
MIX, the Compile error occurred with massage "Expect variable or procedure,
not project"



Both macros are given below,

What can be possible mistake,






Sub SOLVER()
Dim StoppedFeederColor As Long
Dim RunningFeederColor As Long
StoppedFeederColor = RGB(150, 150, 150)
RunningFeederColor = RGB(0, 0, 0)
With ThisWorkbook.Worksheets("5 Comp Mix")
Display_off

.Select
SolverOk SetCell:="$t$37", MaxMinVal:=2, ValueOf:="0",
ByChange:="$k$63:$k$67"
solverSolve UserFinish = False
SolverFinish


End With
ThisWorkbook.Worksheets("MainBackground").Select
Display_on


With ThisWorkbook.DialogSheets("MainDlg")
For i = 1 To 5
For j = 1 To 5
If ThisWorkbook.Worksheets("5 Comp Mix").Range("TonsFeed") _
.Cells(i).Value < AlmostZero
Then
.TextBoxes((i - 1) * 5 + j).Font.Color =
StoppedFeederColor
Else
.TextBoxes((i - 1) * 5 + j).Font.Color =
RunningFeederColor
End If
Next j
Next i
End With

End Sub