アクセスボタンVBAコードを更新する

-4

アクセスフォームのコンボボックスの選択に基づいてデータを更新したいと思います。私は、更新ボタンVBAコードを探しています。これで私を助けてください。アクセスボタンVBAコードを更新する

2017-05-18 srinivas

追加情報が必要です。「データ」とは何ですか？ –

1番目のコンボボックスから許可番号を選択し、2番目のコンボボックスからステータスを更新する必要があります（クローズド、オープン、拡張） – srinivas

あなたの[更新]ボタンのClickイベントに置き、これを実際の名前で「あなた...」を交換してください。

Private Sub YourUpdateButtonName_Click() 
    Dim sql_ As String 
     sql_= "UPDATE YourTablename " & _ 
       "SET [Status]='" & Me.YourStatusControlName.Value & "' " & _ 
       "WHERE [Permit Number]='" & Me.YourPermitNumberControlName.Value & "'" 
    CurrentDb.Execute sql_, dbFailOnError 
End Sub

出典

2017-05-18 13:42:36

返信いただきありがとうございます。私はあなたの提案したコードを置いた。値は更新されません。エラーを投げることさえありません。 – srinivas

プライベートサブCommand9_Click（）文字列 SQL_ = "UPDATEのdbo_access_control_permit" ＆_ "[permit_status] = SET 'を" ＆Me.Combo3.Value＆ "'" ＆_として薄暗いSQL_ "[permit_no] = '" ＆Me.Combo0.Value＆ "'" CurrentDb.Execute sql_、dbFailOnError End Sub – srinivas

SQLコマンドが正しい。イベントが発生していることを確認するには、ボタンのOn Clickイベントで '[Event Procedure]'が必要です。コンボコントロールの名前も確認してください。 –

アクセスボタンVBAコードを更新する

答えて

関連する問題