Tag: vb.net

导入电子表格,但遇到问题

我有一个允许用户导入电子表格的表单。 这个电子表格在列标题中通常是静态的,但现在用户希望能够包含可选列(称为Notes)。 当我尝试从电子表格读取列时,我的代码崩溃,如果它不存在。 Dim objCommand As New OleDbCommand() objCommand = ExcelConnection() 'function that opens spreadsheet and returns objCommand Dim reader As OleDbDataReader reader = objCommand.ExecuteReader() While reader.Read() Dim Employee As String = Convert.ToString(reader("User")) Dim SerialNUM As String = Convert.ToString(reader("serialno")) **Dim Notes As String = Convert.ToString(reader("notes"))** 如果电子表格包含Notes列,则一切顺利。 如果没有,崩溃。 如何检查电子表格中是否存在Notes列以避免崩溃?

Excel文件的行和列

可以编写一个代码,用NUMBERS和NOT LIKE(B2:D6)来指定电子表格的行和列, 例: excelSheet.Range("B2:D6").Interior.Color = RGB(100, 100, 255) 而不是B2和D6我想写5行和3列.. 在vb.net 2003代码中写入是可行的吗?

Microsoft Access数据库引擎 – 创build文件失败

我安装了Microsoft Access数据库引擎,以便应用程序在64位操作系统上使用OLEDB读取和更新Excel文件。 这一切仍然工作正常的32位,但是我得到一个“失败创build文件”错误在64位机器上。 我按照connectionstrings.com( http://www.connectionstrings.com/excel-2007 )使用以下连接string(VB.Net): lstrConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\temp\excelfile.xlsx;Extended Properties=""Excel 12.0;HDR=YES"";" 任何build议将不胜感激。 非常感谢!

如何强制引用在每个字段中同时保存一个Excel工作表作为一个CSV文件?

这是我的情况。 data = "" & data & "" xlsheet.Range(crange).Value = data xlfile.SaveAs(FileName:=finalfilename, FileFormat:=6) 这段代码放在数据周围,将数据放在范围内,并将一个工作表(xlsheet)的工作簿(xlfile)保存为csv文件。 如果我打开记事本中的csv文件,我发现下面这些 1.报价被删除 2.从数字中删除0 如何确保在以编程方式保存文件时存在引号? 提前致谢!

Vb.net – searchExcel文件的值

我有几个combobox的表单。 第一个combobox添加基于Excel表中每一行的项目。 Public Sub FetchExcelValues(ByVal ControlType As String, ByVal control As Object, ByVal xlApp As Object, ByVal xlWorkBook As Object, ByVal xlWorkSheet As Object, ByVal column As String, ByVal row As Integer) Dim iTeller = row Dim tekst As String Do tekst = xlWorkSheet.Cells(iTeller, column).Value If tekst <> "" Then If ControlType = "Tekstboks" Then […]

VB.NET excel同时删除多列

我试图删除我的Excel表中的多个列。 For Each lvi In ListView1.Items If lvi.Checked = True Then arrayLetters = lvi.SubItems(1).Text & ":" & lvi.SubItems(1).Text & "," & arrayLetters End If Next arrayLetters = arrayLetters.Substring(0, arrayLetters.Length – 1) Dim rg As Excel.Range = xlSheet.Columns(arrayLetters) rg.Select() rg.Delete() arrayLetters的值是“G:G,F:F” 。 由于某种原因,似乎并没有工作,一旦它到达那里删除它们! 只有这样做的原因是,它不会更新表和循环到另一个。 换句话说,如果我单独删除每一个,那么这个列移动,这个字母就不会和下一个一样。 该错误是在Dim rg As Excel.Range = xlSheet.Columns(arrayLetters)行,它说: types不匹配。 (从HRESULTexception:0x80020005(DISP_E_TYPEMISMATCH)) 任何帮助将是伟大的! 大卫 解决了 […]

如何从索引实现列自我命名?

我希望能够实例化我的Cell类,同时用“A”,“B”,“C”等命名单元实例,就像在Excel电子表格中一样。 我有我的Cell类如下所示: public class Cell { public Cell(Range nativeCell) { NativeCell = nativeCell; } public Range NativeCell { get; private set; } } 和我的Sheet类: public class Sheet { private IDictionary<string, Cell> _cells; public Sheet(Worksheet nativeSheet) { NativeSheet = nativeSheet; _cells = new Dictionary<string, Cell>(); for (int rowIndex = 1; rowIndex <= NativeSheet.Rows.Count; ++rowIndex) for (int […]

vb.net xls到csv与报价?

我有一个xls文件,或不带引号的csv,并使用vb.net需要把它变成一个csv与每个单元格引号。 如果我在MS Access中打开不带引号的xls / csv,请将每列设置为文本,然后将其导出为我需要的格式。 有更容易的方法吗? 如果没有,我怎么做在vb.net复制这个? 谢谢。

如何与excel保持连接,快速获取数据

我正在做一个交易网站,交易饲料来源于Excel表格。 我必须在gridview中显示Excel表格中的数据。 当我build立连接时,由于数据快速变化,它会失败; 表单中的每个单元格每秒更改一次值1-3次。 我正在使用间隔100的Ajax计时器。这是我的代码: Public Function RetrieveExcelData(ByVal excelSheetName As String, ByVal sheetNumber As Integer) As DataSet Dim objConn As OleDbConnection = Nothing Dim dt As System.Data.DataTable = Nothing Try ' Connection String. Dim connString As [String] = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\Users\Vishal\Desktop\TESTING COLOURfor web1.xls;Extended Properties=Excel 8.0;" ' Create connection object by using the preceding connection […]

用Gembox读取Excel文件 – Columns.Count = 0

我使用Gembox来读取Excel文件。 我正在将字段复制到一个数据表,所以我必须首先将列添加到数据表。 因此,即时通讯使用此代码:For i As Integer = 0 To objWorksheet.Columns.Count – 1 objDataTable.Columns.Add(i,GetType(ExcelCell))Next 但objWorksheet.Columns.Count是0即使在4列的数据。 有任何想法吗?