如果您每天需要将Excel中的数据上传到MySQL数据库中，您可以尝试自动化这个过程，以便省时省力。以下是一些步骤和代码，帮助您实现这个目标：
1. 在Excel中创建您要上传到数据库的表格，确保表头与MySQL表格的列名匹配。
2. 在Excel中打开Visual Basic Editor（VBE），并在VBE中创建一个新的宏。
3. 在VBE中，使用以下代码连接您的MySQL数据库：
Sub ConnectToMySQL()Dim conn As New ADODB.Connectionconn.ConnectionString = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;Database=mydatabase;User=myusername;Password=mypassword;Option=3;"conn.OpenEnd Sub
请注意，上述代码中的连接字符串将根据您的MySQL服务器的设置而有所不同。请修改连接字符串以匹配您的设置。
4. 编写另一个宏来将Excel表格中的数据上传到MySQL表格中。使用以下代码：
Sub UploadToMySQL()Dim conn As New ADODB.ConnectionDim rs As New ADODB.RecordsetDim strSQL As StringDim i As Integer' 连接到MySQL数据库conn.ConnectionString = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;Database=mydatabase;User=myusername;Password=mypassword;Option=3;"conn.Open' 设置SQL语句strSQL = "INSERT INTO mytable (column1, column2, column3) VALUES "' 获取Excel数据并添加到SQL语句中For i = 2 To Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).RowstrSQL = strSQL & "(" & Cells(i, 1) & ", '" & Cells(i, 2) & "', " & Cells(i, 3) & "), "Next i' 删除SQL语句末尾的逗号strSQL = Left(strSQL, Len(strSQL) - 2)' 执行SQL语句conn.Execute strSQL' 关闭连接conn.CloseEnd Sub
请注意，上述代码中的表名和列名将根据您的MySQL表格而有所不同。请修改代码以匹配您的表格。
5. 在Excel中的宏设计器中，选择“工作簿”和“保存事件”。使用以下代码，以便在保存Excel文件时自动运行上传宏：
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)Call UploadToMySQLEnd Sub
请注意，上述代码中的宏名称将根据您在第4步中创建的宏而有所不同。请修改代码以匹配您的宏名称。
现在，每次您保存Excel文件时，宏将自动运行，并将数据上传到MySQL数据库中。
