我有一个代码来debugging我试图导出Excel中的数据。 它适用于较小的数据,但是当数据大小增加到几千时,我得到“内存exception”。 我的应用程序正在IIS 6.0上运行。 任何build议? PS:当进程占用超过1.2 GB的内存时,进程通常会失败(查看任务pipe理器) Protected Overrides Sub Render(ByVal writer As System.Web.UI.HtmlTextWriter) If (IsExportToCSV) Then Response.Clear() Response.ContentType = "application/vnd.ms-excel" Response.ContentType = "a" 'Remove the charset from the Content-Type header. Response.Charset = "" 'Turn off the view state. Page.EnableViewState = False Dim tw As System.IO.StringWriter tw = New System.IO.StringWriter Dim hw As HtmlTextWriter = […]
我试图从Excel工作簿中永久删除一个工作表,但是它不能按预期工作, CType(oWB1.Sheets("ABC"), Excel.Worksheet).Delete() 这里有什么问题?
我需要使用ASP.NET将数据从Excel导入到Sql Server。 我怎样才能做到这一点?
我有我的数据库在VB2010中,我想推动从该数据库2表到MS Excel 2010.我遇到http://support.microsoft.com/kb/301982,但即使按照以下步骤后我得到一个错误:types“Excel.Application”未定义。 Imports Microsoft.Office.Core Imports Microsoft.Office.Interop.Excel Imports System.Data Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click Dim oXL As Excel.Application Dim oWB As Excel.Workbook Dim oSheet As Excel.Worksheet Dim oRng As Excel.Range '' etc… End Sub End Class
我的问题可能看起来相当微不足道,但是尽pipe我进行了大量的研究,我还没有find答案。 .NET中有一种方法可以知道文件名是否是Excel电子表格? 我对特定的扩展名(.xls,.xlsx等)不感兴趣,我只想知道该文件是否是一个优秀的通用电子表格。
我很新的VB脚本,所以我可能错过了很简单的东西。 我有一个Excel电子表格,其中有两个不同的工作表上的两个表,并试图join结果作为文本反馈到不同的表。 我正在使用下面的示例VB导致下标超出范围错误。 Sub ColCars_with_table() Dim myTableCars As ListObject Dim myTableColours As ListObject Dim carAlias As Variant Dim colourAlias As Variant Dim x As Long Dim y As Long Set myTableCars = Sheets("Cars").ListObjects("CarTable") Set myTableColours = Sheets("Colours").ListObjects("ColourTable") carAlias = myTableCars.ListColumns(1).DataBodyRange colourAlias = myTableColours.ListColumns(1).DataBodyRange For x = LBound(carAlias) To UBound(carAlias) For y = LBound(colourAlias) To UBound(colourAlias) […]
有没有办法使用vlookup或索引和Excel中的匹配函数排除在VB.NET中的表数组中查找值的整个行? 例如:我有一个表格数组 101 2 200 500 102 5 200 450 103 3 200 750 101 2 200 450 103 5 200 500 查找值:103(A3) 表格数组:A1:D5 栏目:4(500) 例如,我正在查找表格数组中的103(即A3单元格值)。 我想要D5单元格的值。 但是我得到的D3单元格的价值(即行本身):第五行750而不是500。 所以我想在search时排除该行的查找值。 可能吗? 请指导我 我有很多行在Excel工作表中的数据。 所以我直接使用vlookup for循环。 这是我的代码: 对于ii作为整数= 0到i20 – 1 bmatint(ii, 0) = "=VLOOKUP( " & "B" & ii + 2 & " ,B2:R15000,1,FALSE)" bmatint(ii, 1) […]
我将一个Excel电子表格中的一些自由文本值上传到我的VB.NET项目中,并将值保存在SQL服务器数据库中。 但是一些特殊字符(如_x000D_已保存到数据库中(它们在Excel电子表格中不可见)。 在将它们保存到数据库之前,如何将其转换为原始值? 我想使用Replace("_x000D_", vbcrlf)函数replace它们,但是我不确定是否会有其他特殊字符(以及它们在VB.Net中的等价值)?
我在图表中设置XValue问题。 我有一个多列(dynamic计数),所以我生成Range文本: B8:E8;B10:E10;B12:E12;B14:E14;B16:E16 然后我把它设置到图表上: ExcelSheet.ActiveSheet.ChartObjects(1).chart.SetSourceData(Source:=ExcelSheet.Range(graf)) 但是我有XValues像'1 2 3 4' 我想设置(生成)像XValues For i As Integer = 1 To 5 With ExcelSheet.ActiveSheet.ChartObjects(1).chart.SeriesCollection(i) .Name = names(i – 1) .XValues = CStr(2010 + i) End With Next 但只有第一个XValue设置。 你知道如何解决这个问题吗?
我已经编写了将数据导出到xlsx文件的代码。 但我不明白如何显示窗口提示下载该客户端的xlsx文件。 这是我的代码: Private Sub DataTableToExcel(ByVal tbl As DataTable) Dim Excel As Object = CreateObject("Excel.Application") Dim strFilename As String Dim intCol, intRow As Integer Dim strPath As String = "C:\" If Excel Is Nothing Then MsgBox("It appears that Excel is not installed on this machine. This operation requires MS Excel to be installed on this […]