Tag: vb.net

使用oled或odbc连接,插入,更新,删除数据和excel文件

我已经尝试了一切,但我无法插入,更新和删除Excel文件。 我可以连接Excel表格。 连接似乎也被打开。 这是我的连接string: Dim sConnectionString As String Const kunal = "C:\" sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & kunal & _ "login.xls;Extended Properties=Excel 8.0;" Dim con As New OleDbConnection(sConnectionString) con.Open() 'MsgBox("hi") msgbox来了。 所以连接是好的,但现在我只想添加到Excel表的细节,但出现了错误。 这是我的代码插入: Dim cmd As OleDbCommand cmd = New OleDbCommand("insert into [Sheet1$] (FirstName,LastName) values('admin','kunal')", con) cmd.ExecuteNonQuery() con.Close() 这是我在页面加载时得到的错误。 Microsoft Jet数据库引擎找不到对象'Sheet1 $'。 […]

使用oledb导出excel文件的Asp.net返回空的excel文件

我正在使用asp.net oledb将信息导出到excel文件。 当导出的信息变得太大时,我遇到了问题,在这个例子中,我给出了下面的代码,生成的excel文件变成了一个空的电子表格。 如果我将循环更改为1123插入行。 生成的Excel文件很好,显示了1125行和4列。 无论有多less行,Windows窗体中的testing程序也正常工作。 代码已被简化,sql插入命令中的“information …”代表1803个字符。 ExcelObjConn = "Provider=Microsoft.Ace.OLEDB.12.0;" & _ "Data Source=" & fileName & ";Extended Properties=Excel 12.0 XML" ExcelConnection = New System.Data.OleDb.OleDbConnection(ExcelObjConn) ExcelConnection.Open() Try SqlCommand = "CREATE TABLE ABC ([row1] text, [row2] text, [row3] text, [row4] text)" ExcelCommand = New OleDb.OleDbCommand(SqlCommand, ExcelConnection) ExcelCommand.ExecuteNonQuery() ExcelCommand.Dispose() For i As Integer = 0 To […]

当从excel导入数据到vb.net文件打开的问题

当从excel导入数据到VB.NET桌面应用程序,我有“文件打开”错误。 Excel文件在远程PC上。 Excel文件必须打开,我必须随时到达。 我该如何处理这个问题?

有没有办法在vb.net的Excel单元格中添加多个超链接?

我有一个Excel表格,其中一列由逗号分开的超链接组成。 但是,我无法看到在Excel单元格中插入多个超链接的方法。 有这样的工作吗?

用VB导出到Excel并更新文件

这是我必须将数据导出到Excel的代码。 Dim oExcel As Object Dim oBook As Object Dim oSheet As Object oExcel = CreateObject("Excel.Application") oBook = oExcel.Workbooks.Add oSheet = oBook.Worksheets(1) oSheet.Range("A1").Value = "ID" oSheet.Range("B1").Value = " Nome" oSheet.Range("A1:B1").Font.Bold = True oSheet.Range("A2").Value = CStr(Request("ID")) oSheet.Range("B2").Value = "John" oBook.SaveAs("C:\Book1.xlsx") oExcel.Quit() 我可以创build并保存excel文件,但是我无法更新内容。 我该怎么做? 谢谢。

VB.net/Excel-“向后”选项卡索引每个带有文本框的迭代

我有一个3个文本框和1个button的表单。 textbox1具有选项卡索引0,它的文本= 1 textbox2具有选项卡索引1,它的文本= 2 textbox3的标签索引2,它的文本= 3 我想迭代通过文本框,并将其值放入单元格,以便… 范围(“A1”)。value = txtbox1.text(即:A1 =“1”)range(“A2”).value = txtbox2.text(即:A2 =“2”)范围(“A3”)。 = txtbox3.text(即:A3 =“3”) 但是我得到的是… 范围(“A1”)。value = txtbox1.text(即:A1 =“3”)range(“A2”)。value = txtbox2.text(即:A2 =“2”)范围(“A3”)。 = txtbox3.text(即:A3 =“1”) 我试图反转文本框的标签索引,但它不会改变“向后迭代”。 有什么我可以做的改变这一点,使循环运行从最低的标签索引到最高? 谢谢! 公共class级表格1 Private Sub Button1_Click_1(ByVal发件人为System.Object,ByVal e为System.EventArgs)处理Button1.Click Dim objExcel As New Microsoft.Office.Interop.Excel.Application 'Declaring the object. objExcel.Visible = True 'Setting Excel to visible. Dim cntrl As […]

在电子表格中读取date和从DataSet中读取date

我的应用程序使用错误排列的Excel电子表格作为数据源。 我说的devise很糟糕,因为除了finddate和时间的列外,没有每行的唯一标识符。 长话短说,我的应用程序使用每行的date和时间作为标识符来检索行中其他列的信息。 这个想法是,用户将从ListBox中select一个date/时间,应用程序将循环访问DataSet,并在右侧列中查找date/时间,并在该行中显示其余的信息。 我的问题是ListBox控件没有被填充,我不明白为什么… 以下是电子表格中的示例行:(每个字符表示一个单元格边框) Team – FNB | O | 2010/02/18 08:59:24 | 5034 | Frederico Turnbridge | 27839963586 | SA – MOBILE – (ZA) | | 69 | O_NORMAL | | 00:01:06 |R 2.83 这是我的代码: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim j As Integer = […]

如何使用vb.net检测Excel 2003的打印预览窗口?

我需要能够testing如果当前视图是Excel 2003中的打印预览。 有没有在Excel对象模型中简单地访问此属性? (像Word对象模型中的application.printpreview …)。 任何意见将不只是欢迎, 谢谢 朱利安 PS:长话短说,我正在开发一个带有键盘快捷方式的vsto插件,用于我的自定义函数,并且在打印预览时需要禁用此快捷方式。

Excel UDF'不是一个有效的插件'的错误

我正在尝试使用VS 2010创build一个自定义的vb.net Excel 2007函数(UDF),并且已经到了这个阶段(借鉴Eric Carter的例子,在http://blogs.msdn.com/b/eric_carter/archive/2004 /12/01/273127.aspx ): Namespace AutomationAddin <Guid("1aeeb1b5-e099-4f7f-aeb0-3e9f19b64f62")> <ClassInterface(ClassInterfaceType.AutoDual)> <ComVisible(True)> Public Class MyFunctions Public MyFunctions() Public Function MultiplyNTimes(ByVal number1 As Double, ByVal number2 As Double, ByVal timesToMultiply As Double) As Double Dim result As Double = number1 For i As Integer = 0 To timesToMultiply – 1 result = result * number2 Next […]

使用vb.net作为string从单元格中提取Excel公式

这可能有多难…或者我想。 我想要做的是提取值,颜色,注释和任何给定的工作表中的单元格的公式。 最终目标是将某人曾用作数据库的电子表格转换为Access表格。 worksheet.Cells(row,column).Value '提取值WORKS worksheet.Cells(row,column).Font.ColorIndex '提取颜色索引WORKS worksheet.Cells(row,column).Comment.Text '提取注释WORKS worksheet.Cells(row,column).Formula '提取公式不起作用 .Formula的返回值与.Value相同。 这不是我所需要的。 我正在寻找公式的文本表示(以提取公式中embedded的费率信息)。