Error Messages with DoCmd.MoveSize and ColumnWidth code

Question

I am having problems with the following code:

DoCmd.OpenForm "frmShowAllocNos", acFormDS, "qryAllocNosNewSR24"

'Define the location of the top left hand corner of the table

DoCmd.MoveSize 8000, 100, ,

'PROBLEM Expected expression

It will accept DoCmd.MoveSize 8000, 100, "", "" but it gives the error 'The expression you entered is the wrong data type for one of the arguments'

I also tried:

Forms!frmShowAllocNos.MoveSize 5000, 100, ,

'PROBLEM Application-defined or object-defined error

The code then includes

Forms!frmShowAllocNos!Title.ColumnWidth = -2

'This line appears to be OK but

Forms!frmShowAllocNos!NounPrefix.ColumnWidth = -2

'PROBLEM Object does not support this property or method

Forms!frmShowAllocNos!NounSuffix.ColumnWidth = -2

'PROBLEM Object does not support this property or method

Forms!frmShowAllocNos!AreaNumber.ColumnWidth = -2

'PROBLEM Object does not support this property or method

Perhaps I could use AutoResize to set the column widths to suit the longest data in each field  

Regards

Barry GC

I have been interrupted during the preparation of this post but I feel that the problem is correctly reflected above.

Answer 1

Try

DoCmd.MoveSize 8000, 100