Private Sub DataGrid1_BeforeColUpdate(ByVal ColIndex As Integer, OldValue As Variant, Cancel As Integer)End SubPrivate Sub DataGrid1_BeforeUpdate(Cancel As Integer)End Sub用這兩個應該可以解決問題,具體的怎麼作,自己琢磨