excel中数据 通过ADODB显示记录到相应的Text和MSHFexGrid中，通过Text修改Excel中数据
保存覆盖当前位置
        rs1.Fields("日期") = DTPicker1(0).Value
        rs1.Fields("用户（地点）") = Text1(1).Text
        rs1.Fields("设备名称") = Text1(2).Text
        rs1.Fields("数量") = Text1(3).Text
        rs1.Fields("单位") = Text1(4).Text
        rs1.Fields("进度/问题") = Text1(5).Text
        rs1.Fields("技术") = Combo1(0).Text
        rs1.Fields("销售") = Combo1(1).Text
        rs1.Fields("备注（处理意见）") = Text1(6).Text
        
        rs1.Update
        Set MSHFlexGrid1.DataSource = rs1
保存的位置是EXCEL中第一行 如何保存到当前位置呢？求助各位大大

vb能用ado操作excel吗？请教如何连接的？用什么jet？

工程引用 Microsoft.Excel 11.0 Obeject Libary 勾选
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=false;Data Source=1.xls;Extended Properties='Excel 8.0;HDR=Yes'"
cn.open
rs.Open "select * from [sheet1$]", cn, adOpenKeyset, adLockOptimistic
通过ADO 操作EXCEL

谢了，以后试试。
excel应该没有字段名吧，应该只有列号，都是rst.fields(1)、rst.fields(2)、rst.fields(3)来表示的吧。

用比较笨的方法 勉强存储上了 现在纠结查询功能
百度说录制Excel宏简单 谁能说说EXCEL 宏是怎么录制的

在“工具”－“宏”－“录制新宏”

貌似不用这样吧，VB可以直接操作EXCEL的，前题是引用EXCEL的驱动，然后查的数据所在的行，用.cells调入的text中，修改之后再写回去就行了

"用比较笨的方法 勉强存储上了"是什么意思,能说具体点吗?