bottone in foglio dati access
Riduci
Di più
- Messaggi: 135
- Ringraziamenti ricevuti 0
3 Anni 7 Mesi fa #675
da fabioM1
fabioM1 ha creato la discussione bottone in foglio dati access
post preso da :
accessextra.blogspot.com/2006/01/tip-com...-datasheet-form.html
TIP: Command Button on a Datasheet Form
Access 2000 or Later
A simple technique for placing a psuedo-command button on a Datasheet:
1. Create a query for the form's RecordSource
2. Add a calculated column/field to the query, for example:
Edit: IIf([Status]<>"Closed","Edit","")
Drag the field on to the form as a TextBox
3. Set the TextBox's Is Hyperlink property to Yes
4. Add a procedure to the TextBox's OnClick Event, for example:
Private Sub Edit_Click()
With CodeContextObject
DoCmd.RunCommand acCmdSaveRecord
If (Not IsNull(.IssueID) And .Status <> "Closed") Then
DoCmd.OpenForm "EditIssues", acNormal, "", "[IssueID]=" & .IssueID, , acNormal
End If
End With
End Sub
The Datasheet will look like this:
accessextra.blogspot.com/2006/01/tip-com...-datasheet-form.html
TIP: Command Button on a Datasheet Form
Access 2000 or Later
A simple technique for placing a psuedo-command button on a Datasheet:
1. Create a query for the form's RecordSource
2. Add a calculated column/field to the query, for example:
Edit: IIf([Status]<>"Closed","Edit","")
Drag the field on to the form as a TextBox
3. Set the TextBox's Is Hyperlink property to Yes
4. Add a procedure to the TextBox's OnClick Event, for example:
Private Sub Edit_Click()
With CodeContextObject
DoCmd.RunCommand acCmdSaveRecord
If (Not IsNull(.IssueID) And .Status <> "Closed") Then
DoCmd.OpenForm "EditIssues", acNormal, "", "[IssueID]=" & .IssueID, , acNormal
End If
End With
End Sub
The Datasheet will look like this:
Si prega Accedi a partecipare alla conversazione.
Tempo creazione pagina: 0.191 secondi
- Sei qui:
-
Home
-
Forum
-
MsAccess 2010 - Sharepoint 2010
- bottone in foglio dati access