positie knop in formulier voet

[JEPEDEWE]

Hallo,

Ik wil de positie van een knop in de formuliervoettekst in de code bepalen via een functie:

Function Knop_administratie_Aan(frm As Form)
Dim ctl As Control
'frm.Txt_datum.SetFocus
For Each ctl In frm.Controls
With ctl
Select Case .ControlType
Case acCommandButton
If Left(.Name, 10) = "Knp_Admin_" Then
.Visible = True
.Height = 750
.up = 550
End If
End Select
End With
Next ctl
End Function

het .up-commando is waar de code zich in verslikt
kan ik dat oplossen?

Bedankt
JP

 

[OctaFish]

de Eigenschap '.up' bestaat niet, zoals je al gemerkt hebt (dankzij de IntelliSense). De eigenschap .Top daarentegen wel. Je plaatst een knop altijd m.b.v. de parameters Left en Top.