利用vga窗口录入、修改数据

dtyghw

各位老师好，我的工作簿中有录入明细表和录入窗口，我想做一个录入窗口，在录入窗口中录入数据，点击“保存”按钮，把记录依次保存在“录入明细表”中，点“查询”，通过用户编号或姓名查询到相关信息，对其它内容修改后，点“修改”，把修改后正确内容覆盖旧的记录保存到表中。请问老师，这个功能能实现吗，请老师指教。谢谢

laterite

类似的窗体录入、查询例子很多啊，楼主可以参考一下，试着自己修改以符合自己的需求

https://club.excelhome.net/thread-834226-1-1.html

3190496160

Private Sub cmb_保存_Click()
rr = Array(Text_编号.Text, txt_姓名.Text, txt_地址.Text, txt_电话.Text)
For i = 0 To UBound(rr)
    If rr(i) = "" Then
        m = m + 1
    End If
Next i
If m <> "" Then MsgBox "请把信息录入完整！": End
With Sheets("录入明细表")
    r = .Cells(Rows.Count, 3).End(xlUp).Row + 1
    .Cells(r, 3).Resize(1, 4) = rr
End With
MsgBox "录入完毕！"
End Sub

3190496160

窗口录入.rar (30.51 KB, 下载次数: 24)

2024-3-14 16:13 上传

点击文件名下载附件

3190496160

只写了录入的代码其他的自己依样画葫芦即可

dtyghw

3190496160 发表于 2024-3-14 16:14
只写了录入的代码其他的自己依样画葫芦即可

谢谢老师，请问记录的顺序能不能倒过来，意思是最近录入的在上面显示。

313667354

请测试。。。。。。。。

xunanming

请参考---------------------------

tanglf188

参与一下，主要围绕ControlSource属性编写，请参考

dtyghw

tanglf188 发表于 2024-3-15 11:03
参与一下，主要围绕ControlSource属性编写，请参考

谢谢老师的指教