我在MySQL很新,所以请容忍我.
我有一个excel表,它查询MySQL database...here是查询的一部分(从VBA宏运行):
...
sql_query = "SELECT SQL_CACHE g.Id, g.Client, g.text_parsing FROM `global`.`tbl_cots` AS g WHERE g.Client LIKE '" & strClient & "%' GROUP BY g.Id;"
With rsPubs
.ActiveConnection =
上下文
我有一些VBA代码,允许我将整个Excel表插入postgresql数据库中。
代码的思想如下( Excel表的第一行包含列名,与postgresql表的列名相同):对于每一行,我从VBA执行一个PostgreSQL插入查询:
[code to connect to the postgresql database using the ADODB driver]
For r = 2 to row_max
query = transform_row_into_list(r,1,col_max)
connexion.execute(query)
Next r
函
我已经开始学习VBA编程,并考虑创建一个小应用程序,用于将学生详细信息插入到Excel工作表中。在一个名为"Main“的Excel表中,我创建了一个用于接受用户输入的表单,而在另一个名为"Database”的表中,每当用户单击按钮时,我都会尝试插入一行记录。
我能够成功地在数据库工作表中插入一行数据,即第一行数据,但我的问题是-一旦用户输入记录并再次单击按钮,我想转到工作表中的下一行。第三次类似,以此类推。
我的代码是:
Private Sub CommandButton1_Click()
Dim i As String
Dim j As String
Dim k As Str
我已经创建了一个Excel工作表,它执行一些查找,以格式化需要插入到另一个表中的数据。此Excel工作簿需要提供给一些用户,这些用户可以自由添加一些新行,然后需要能够点击“插入到数据库”按钮,并转换记录并将其作为新记录插入到SQL表中。我使用的是Excel 2010和SQL Server 2008。我有一个到数据库的连接,因为我正在使用它来拉回一些数据,以便验证添加的新行,但我不确定如何将数据插入回去。
我是通过在数据库中创建类型从Excel上传到数据库,然后将所有数据插入到另一个表中。
例如:
CREATE TYPE [dbo].[temp_tbl_vendor] AS TABLE([VendorCode] [varchar](10) NULL,
[BillDt] [varchar](12) NULL )
create proc myproc_bulkinsert
(@venid int, @temptable temp_tbl_vendor readonly)
as
begin
insert into mynewtab select *from temp_tbl_vendor
end
我试图使用VBA和Excel从Oracle数据库中的不同表中读取数据。通常,在阅读表时,我运行的内容如下:
Dim rs As Object
Set rs = CreateObject("ADODB.Recordset")
Dim query As String: query = "SELECT * FROM OBJ_NAME"
rs.Open query, con
但是,这并不适用于所有表。使用,我通常在开头运行:
exec session#.open_session();
之后我就能读到任何桌子了。在开始时是否也有一种使用ADODB.Recordset运行此
我创建了许多使用存储过程的电子表格。我有一个自定义的VBA代码,当我尝试从SQL获取数据时,它工作得很好。然而,今天我想执行参数化的存储过程,它插入和更新数据库表上的数据。当我运行宏时,没有显示错误,但是在数据库上没有插入/更新操作。我不知道为什么。我在我的工作簿(myConn)中建立了SQL连接,每次我需要连接SQL时都会这样做,所以它肯定是正确的。这是我的标准VBA代码: Sub SaveData()
Dim myValue As Double
myValue = Sheets("XYZ").Range("valueToSave")
我有一个excel文件,包含150列和特定的列标题。在我的数据库中,有一个表'ExcelImport‘和列ExcelHead (包含与excel列标题同名的列标题数据)。
create table ExcelImport( id int primary key,ExcelHead varchar(max))
insert into ExcelImport values(1,'Role'),(2,'Manager')
此表将根据另一条规则获取数据。我需要从ExcelImport表中的excel中获取唯一的列数据,然后插入到另一个临时表中。在这个示例中,我
我有一个基于Excel的应用程序,它收集一些用户输入,并根据用户输入进行一些计算。应用程序本身不存储任何用户输入或计算;目前,每当用户运行应用程序时,它都会将数据发送到Access数据库,并将一行插入到链接到Sharepoint列表的Access表xlTable中。相关代码为:
sub sendToSharepoint(userName as string, folderPath as string, calculatedValue as long)
dim db as DAO.database
dim insertStr as string
'open connection to
我有SQLEXPRESS连接的详细信息。我希望使用VBA方式连接数据库,并将数据从Server表items导出到当前Excel工作簿和指定工作表中的新工作表。
我尝试过从excel“外部数据”导入数据,这使我在将其添加到excel工作簿时得到了完整的表。
如何将外部表中的1或2列添加到Excel中?
更新:我现在的代码是
Sub SQL_Connection()
Dim con As ADODB.Connection
Dim rs As ADODB.Recordset
Dim query As String
Set con = New ADODB.Connection
Set rs = Ne
我希望你做得很好
我有一张纸,里面有项目组的成员。它包含两行:第一行用于ID,第二行用于名称
激活工作表时,将使用ID和名称从数据库中加载团队成员。
当我想在团队中添加一个新成员时,这个过程就是:
手动写入要添加的成员的id,在第一行中,该工作表根据在步骤1中键入的id从另一个工作表加载名称。
对于步骤2,有两种方法:
要么在第二行中写入公式,用于固定数量的单元格,后者根据第一行的id从另一个工作表中提取名称。使用如下的vba代码处理第一行的更改事件:
private sub Worksheet_change(ByVal target as Range)
if Not App
我不熟悉VBA和Excel脚本,但我正在尝试使用它连接到我创建的SQL Server。我已经从一个用户表单构建了一个通用查询,并成功地创建了一个SELECT语句来填充我的工作表。
但是,当我尝试在数据库中更新此信息时,我没有成功。代码没有抛出错误,但是我在数据库中找不到我的更改。这是我的尝试:
Private Sub dbUpdate(Query)
Dim conn As ADODB.Connection
Dim recset As ADODB.Recordset
Dim cmd As ADODB.Command
Dim strConn As String
'Create the
我在Heroku托管MySQL数据库。我用'MySQL for Excel‘外接程序从Excel创建了一个连接,但是我想用VBA代码从Excel建立一个连接。
我得到了
拒绝用户“用户”访问数据库“数据库”的访问
我的VBA代码,但我认为错误的原因是其他地方(特权,数据库设置等).)。
Dim con As ADODB.Connection
Set con = New ADODB.Connection
Dim strConn As String
strConn = "Driver={MySQL ODBC 8.0 Unicode Driver};SERVER=serverN