Another option would be to set a form level variable...
On the form (General) (Declarations)..
Dim blnScaleProcessing as boolean
In Form_Load...
blnScaleProcessing = False
In cmdProcessScale_Click..
If blnScaleProcessing then
msgbox "Error"
else
blnScaleProcessing = True
Call ProcessScale
blnScaleProcessing = False
End If
QED
Randall J Weers
Membership Vice President
Pacific NorthWest Access Developers Group
http://www.pnwadg.org