Mikä tässä mättää? Valittaa On-termeistä jo kirjoittaessa "Compile error: Expected: expression". Jos vaihdan vaikka True/Falseksi, Access sanoo ajettaessa "Object doesn't support this method or property".
Private Sub Tilauslista_DblClick(Cancel As Integer)
On Error GoTo Tilauslista_DblClick_Err
DoCmd.RunMacro "mcrListavalinta.Tilaukset", , ""
If (Tilaukset!Merkitty = Off) Then
Forms!Isotooppiprojekti!Merkitty = On
End If
If (Tilaukset!Merkitty = On) Then
Forms!Isotooppiprojekti!Merkitty = Off
End If
DoCmd.Requery ""
End SubNo olisko oikea syntaksi kuitenkin:
Forms!Isotooppiprojekti.Merkitty.Value = True 'tai False
En pysty varmuudella päättelemään mikä "Tilaukset" on, mutta olisiko hivenen näppärämpi ja selkeämpi syntaksi :
Private Sub Tilauslista_DblClick(Cancel As Integer)
On Error GoTo Tilauslista_DblClick_Err
DoCmd.RunMacro "mcrListavalinta.Tilaukset", , ""
Forms!Isotooppiprojekti.Merkitty.Value = Not Tilaukset!Merkitty
End Sub"Tilaukset" on siis tietokannan taulu. Kiitos koodipätkästä, piti vielä hieman muokata sitä ja sitten toimi.
Aihe on jo aika vanha, joten et voi enää vastata siihen.