Tag: vb.net

迟绑定错误

所以我最近把我的当前项目中的选项严格打开,并修复了所有的选项抛出我碰到这个小错误后。 Public Sub ExportarExcel(ByVal grilla As DataGridView) Dim excelApp As Excel.Application Dim workbook As Excel.Workbook Dim sheet As Excel.Worksheet Dim i As Integer = 1 Dim j As Integer = 1 excelApp = CType(CreateObject("Excel.Application"), Excel.Application) workbook = excelApp.Workbooks.Add sheet = CType(workbook.Worksheets.Add, Excel.Worksheet) For Each col As DataGridViewColumn In grilla.Columns sheet.Cells(1, i).Borders.LineStyle = Excel.XlLineStyle.xlContinuous 'Problematic line […]

对于工作表中的每个单元通过单元循环不跳过使用EPPlus的空白

我目前有这样的代码块… For Each cell In worksheet.Cells(8, 2, lastRow, lastCol) Select Case cell.Start.Column Case Is = 2 'Do stuff End Select Next 问题是,如果一个单元格是空的,它将跳过该单元格,并且永远不会input分配给它的Case。 我怎样才能让它不跳过空白单元格?

调整模块只粘贴值,而不是公式

有人可以帮助我吗? 我运行下面的模块,它工作正常,但它粘贴单元格(公式)的内容,而不是值。 我知道这是一个特殊的粘贴价值,但不知道在哪里调整。 此外,我想在复制跨越A:K的variables表中的行,然后粘贴到标识表。 对不起,如果不清楚,不知道为什么代码显示下面的搞笑。 从子开始: Sub armine_profitTEST() Dim r As Long, endRow As Long, pasteRowIndex As Long endRow = 500 ' of course it's best to retrieve the last used row number via a function pasteRowIndex = 5 For r = 1 To endRow 'Loop through sheet1 and search for your criteria If Cells(r, […]

在文档级别自定义中引用Windows窗体中的Excel表格

我想我会尝试学习VB.net,并从一些VSTO(VS2012)开始。 我正在尝试使用单独的Windows窗体在其中进行Excel文档自定义(.show on load)。 我可以在加载文档时打开表单。 我发现了很多如何在MSDN上的文档中放置Windows窗体控件的例子(并想出如何做到这一点),但是我在从Windows窗体引用部分Excel文档时遇到了问题。 所以例如在窗体上的主要控制我试图把这个子添加到一个button: Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Try Dim baba As Sheet1 baba.Cells(1, 2).Value = "Llaslmasd" Catch ex As Exception MsgBox(ex.Message) End Try End Sub 我也试过: Dim baba As New Sheet1 和 Dim baba As WorkSheet baba = Sheet1 如果参考表不是共享成员,或者如果我将它分享,那么引用该表的正确方法是什么?我该怎么做? 如果我以编程方式尝试插入来自其他(非合并的工作簿,因此更改图表索引? 对不起,如果我的英文不对,或者我的问题的格式不好,我仍然会通过例子。

改变编码的方式,以便MS Excel不需要安装在asp.net服务器上

我已经开始使用asp.net开发一个网站。 我需要从Excel中获取一些数据以显示给客户端。 我在somee.com上托pipe我的网站,以便我可以免费托pipe它。 但是在somee.com的服务器上没有安装Excel。 我已经为我的网站写了一些代码来显示来自excel的数据。 Dim xlApp As New Microsoft.Office.Interop.Excel.Application() Dim xlWorkbook As Microsoft.Office.Interop.Excel.Workbook = xlApp.Workbooks.Open(FileUploadPath & sender.text) Dim xlWorksheet As Microsoft.Office.Interop.Excel._Worksheet = xlWorkbook.Sheets(SheetName) Dim xlRange As Microsoft.Office.Interop.Excel.Range = xlWorksheet.UsedRange Dim rowCount As Integer = xlRange.Rows.Count Dim colCount As Integer = xlRange.Columns.Count Dim tbl As New DataTable() For i As Integer = 1 To rowCount […]

在asp.net中停止对excel中的sheetname进行sorting

我从excel中获取工作表名称,并创build其文本是工作表名称的button。 但每次创buildbutton时,都按字母顺序sorting。 我不想把它们分类。 这是我的代码: Dim objConn As OleDbConnection = Nothing Dim dt As System.Data.DataTable = Nothing Try Dim connString As String = "" If Extension = "xls" Or Extension = ".xls" Then connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & FileUploadPath & sender.text & ";Extended Properties=" + Convert.ToChar(34).ToString() + "Excel 8.0;HDR=No;IMEX=1" + Convert.ToChar(34).ToString() + "" ElseIf Extension = […]

如何使用VB.NET检查Excel工作表名称中的特定文本? (这个代码有什么错误?)

我想实现以下, 我有一个包含不同名称的工作表的Excel文件。 一些表被命名为A1,A2,B1,B2,C1,C2等 如果工作表名称包含“A”,则将A3:A70导出到另一个名为“range.xlsx”的工作簿 如果工作表名称包含“B”,则将范围B3:B70导出到“range.xlsx” 如果工作表名称包含“C”,则将范围C3:C70导出到“range.xlsx” 任何帮助将非常感激。 这是我试过的: 创build了一个表格名单,并通过这个列表循环做我想做的事情。 谢谢

使用C#保护excel中的列

我试图写入Excel表格中的一些数据,并在写入必要的数据后,我想通过使它们不可编辑来防止单元格编辑。 在这个操作之后,一些数据将会在页面用户的不受保护的单元格上被更新,然后我将使用它们并读取它们来执行一些处理活动。 有人可以帮我一个具体的,如何locking在Excel中编辑一列? 你如何写C#到一个受保护的列? 你如何阅读从受保护的列使用C#? 简单的参考例子将大大帮助我。 PS:如果你对VB.NET更加熟悉,甚至参考如何做到这一点将是有益的。

Excel Interop – 将过滤的工作表复制到不同的Excel实例

假设我有以下Excel Interop对象声明: Dim ExcelToKeepHidden As New Microsoft.Office.Interop.Excel.Application Dim SheetToCopy As Microsoft.Office.Interop.Excel.Workbook … Dim ExcelToShow As New Microsoft.Office.Interop.Excel.Application 基本上,我在后台保存了一个隐藏的Excel实例(其中包含了SheetToCopy – 我将所有基本工作从用户的注意点开始),然后我有一个显示Excel表单的button,当用户点击它时,应该把我的SheetToCopy对象,并将其复制到ExcelToShow应用程序。 换句话说,原始的SheetToCopy保留在ExcelToKeepHidden应用程序中以进行进一步的操作,但ExcelToShow将在用户单击该button时显示该表的副本。 所以,我的挑战是我不能只使用SheetToCopy.Copy()方法,因为新的工作表是在一个完全不同的Excel实例中。 另外,由于我正在操作的操作,我不能复制一个单元格的范围,因为我已经应用了filter,所以pastefunction不允许我保持格式化等。 基本上,我看到的唯一的解决办法是在同一个Excel应用程序中将工作表复制到一个新的工作簿中 ,然后closures它,然后在第二个Excel应用程序中重新打开它,但是我想知道是否有更好的方法来实现这个? 有什么想法吗?? (VB或C#代码非常好) 谢谢!!!!)

允许用户更改表单名称,VSTO

这与我的问题类似,但我的解决方法dosn't没有帮助这些实例和原因是更多的定义。 我有一个工作簿级别定制,将从保留复制的工作表的名称的文件夹添加工作表。这工作正常,并不会导致任何问题,除非用户重命名工作表。 如果用户重命名工作表,保存工作簿,然后回到它,然后尝试执行引用工作簿或工作表,他们得到错误的任何操作: Microsoft.VisualStudio.Tools.Applications.Runtime.ControlNotFoundException: This document might not function as expected because the following control is missing: Sheet5. Data that relies on this control will not be automatically displayed or updated, and other custom functionality will not be available. Contact your administrator or the author of this document for further assistance. —> System.Runtime.InteropServices.COMException: Programmatic access […]