Tag: vb.net

Excel工作表popup要求密码，即使它是VB.NET中的硬编码

我正在尝试从networking访问Excel文件。 这个文件是密码保护的，在程序中是硬编码的： Dim xlApp As Excel.Application Dim xlWorkBook As Excel.Workbook xlApp = New Excel.Application xlWorkBook = xlApp.Workbooks.Open("\\179.29.27.153\xyz Sample\High Risk Alert.xlsx", Password:="x1y3z2") 在testing中，它在我的电脑上工作正常。 但是，在运行时，它popup要求input密码，在客户端PC。

vb.net – excel – windows任务问题

我build立了一个将数据保存到excel的.net应用程序。 当我手动运行应用程序时，程序将数据表中的东西保存到excel中。 问题是，当我安排一个任务在我的Windows 10 PC上运行时，我得到了下面的错误。 ：System.Runtime.InteropServices.COMException（0x800A03EC）：从HRESULTexception：0x800A03EC在Microsoft.Office.Interop.Excel.WorkbookClass.SaveAs（对象文件名，对象FileFormat，对象密码，对象WriteResPassword，对象ReadOnlyRecommended，对象CreateBackup，XlSaveAsAccessMode AccessMode ，Object ConflictResolution，Object AddToMru，Object TextCodepage，Object TextVisualLayout，Object Local） Public Shared Function CreateExcel() As Microsoft.Office.Interop.Excel.ApplicationClass For retry As Integer = 1 To 5 Try clsScrape.SendMail(" Return New Microsoft.Office.Interop.Excel.ApplicationClass") Return New Microsoft.Office.Interop.Excel.ApplicationClass Exit For Catch ex As Exception If ex.HResult <> &H80080005 Then Throw ex End Try Next Return Nothing End Function […]

无法将“System .__ ComObject”types的COM对象转换为接口types“Microsoft.Office.Interop.Excel.Worksheets”

我在写一个利用Microsoft.Office.Interop.Excel程序集的类。 这是一个“一站式”DLL库的一部分，它将被用于一个Java解决scheme（限制在Java端的接口数量）。 我收到以下错误： 其他信息：无法将“System .__ ComObject”types的COM对象转换为“Microsoft.Office.Interop.Excel.Worksheets”types的接口。 此操作失败，因为IIC“{000208B1-0000-0000-C000-000000000046}”接口的COM组件上的QueryInterface调用失败，原因是出现以下错误：没有支持此接口（exception来自HRESULT：0x80004002（E_NOINTERFACE）） 。 这是由以下代码引发的： Public Class XL Public XL As Excel.Application = Nothing Public XLN As String Public WBS As Excel.Workbooks = Nothing Public WBSN() As String Public WB As Excel._Workbook = Nothing Public WBN As String Public WSS As Excel.Worksheets = Nothing Public WSSN() As String Public WS As […]

Epplusexception节省

当我尝试编辑现有的Excel文件时，我不断收到以下错误消息： 指数超出范围。 必须是非负数，小于集合的大小。“＆vbCrLf＆”参数名称：索引 码： Dim file As New FileInfo(Path) Dim objXLApp = New ExcelPackage(file) Dim objXLWs = objXLApp.Workbook.Worksheets("DiscreteAlarms") Dim aantal_Rows As Integer = objXLWs.Dimension.Rows pgb_alarm_check_File2.Maximum = aantal_Rows Dim i As Integer For i = 2 To aantal_Rows Dim Alarm_Text = objXLWs.Cells(i, 3).Value If Alarm_Text = "" Then objXLWs.Cells(i, 3).Style.Fill.BackgroundColor.SetColor(Color.Red) End If pgb_alarm_check_File2.Value = i Next […]

如果共享工作簿，VB Excel 2010 application.quit（）将使EXCEL.EXE进程保持打开状态

我有一个问题，位于共享 Excel 2010文件的networking已打开，并正在从VB.net编辑成功，但是当我closuresExcel.Application.Quit（），窗口本身closures，但一个EXCEL.EXE进程仍然打开。 作为一种解决方法，如果Process.StartTime匹配打开excel的时间，则终止进程，但这可以a）不会杀死任何以前保持打开状态的excel进程b）可以完全不同的工作簿… Dim xlp() As Process = Process.GetProcessesByName("EXCEL") For Each Process As Process In xlp If Process.StartTime >= datestart And Process.StartTime <= dateEnd Then Process.Kill() End If Next 我试图设置工作表保存，但没有帮助。 但是，如果我将excel表取消，那么当工作簿，然后窗口closures时，该进程也会正常死亡。 Dim xlApp As Excel.Application = Nothing Dim xlWorkBook As Excel.Workbook = Nothing Dim xlWorkSheet As Excel.Worksheet = Nothing xlApp = New Excel.Application xlWorkBook […]

创build多个Excel电子表格

我正试图在一个Excel文件中创build多个电子表格，并且出现以下错误： types为“应用程序类”的公共成员“工作簿” 这是我的代码： Private Sub MakeExcelWorksheets_Click(sender As Object, e As EventArgs) Handles MakeExcelWorksheets.Click Dim xlApp As Excel.Application xlApp = CreateObject("Excel.Application") Dim newWorksheet As Excel.Worksheet Try newWorksheet = CType(xlApp.Workbook.Worksheets.Add(), Excel.Worksheet) Catch ex As Exception MessageBox.Show(ex.Message) Exit Sub End Try End Sub

使用introp将其打开到vb.net后，Excel崩溃

使用introp将其打开到vb.net后，Excel崩溃 Followig是我用于从Excel导入数据的代码 Dim misValue As System.Reflection.Missing Dim tbl As New System.Data.DataTable Dim xlApp As nExcel.Application Dim xlWorkBook As nExcel.Workbook Dim xlWorkSheet As nExcel.Worksheet xlApp = New nExcel.Application Try xlWorkbook = xlApp.Workbooks.Open(sFilePath) Dim issheetext As Boolean Dim sheet As nExcel.Worksheet For Each sheet In xlWorkbook.Sheets If sheet.Name.Equals(sSheetname) Then issheetext = True Exit For End If Next […]

SSIS – SSRS渲染冲突EXCEL和EXCELOPENXML之间

我正在尝试将SSRS仪表板（ssrs 2016）呈现给Excel（2010）。 我的仪表板有4个参数 StartDate, EndDate, Company, NumberOfJobs. 当使用渲染到xlsx（EXCELOPENXML）时，StartDate，Company和NumberOfJobs将全部呈现完美。 在我的SSIS VB脚本中使用EXCEL作为格式时，它们不会渲染。 EndDate不会使用EXCELOPENXML进行渲染，但在使用渲染到xls（Excel）时会很好。 如果inputIE浏览器，报告的URL将愉快地呈现所有4到xlsx，提供打开Excel或保存到文件的选项。 但是，当它使用SSIS运行时，它会生成一个0kb文件并提供错误消息 由于扩展名无效，excel无法打开文件。 我注意到，EndDate也打破了渲染到PDF。 任何想法如何在运行VB脚本时合并渲染？ 非常感谢，史蒂芬

将文本框内容附加到Excel工作表

我有下面的代码，但我希望我的数据被添加到Excel文件，每次我input的信息，而不是覆盖相同的单元格。 （find下一个空单元格，并添加textbox1.text数据） Imports Excel = Microsoft.Office.Interop.Excel Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim xlApp As New Excel.Application Dim xlWorkBook As Excel.Workbook Dim xlWorkSheet As Excel.Worksheet Try xlApp.DisplayAlerts = False xlWorkBook = xlApp.Workbooks.Add xlWorkSheet = DirectCast(xlWorkBook.Sheets("Sheet1"), Excel.Worksheet) xlApp.Visible = False 'Don't show Excel; we can and we don't have […]

Process.Start等待excel退出错误

这是我的代码： Dim sTemplateSharedPath As String = sSharedDrive & ":\Excel Templates\ImportTemplate.xlsx" Dim objProcess As System.Diagnostics.Process Try objProcess = New System.Diagnostics.Process() objProcess.StartInfo.FileName = sTemplateSharedPath objProcess.Start() objProcess.WaitForExit() Catch MessageBox.Show("Could not start process " & sTemplateSharedPath, "Error") End Try Excel打开我请求的文件，但系统崩溃在objProcess.WaitForExit() 。我得到的错误是： 没有进程与此对象关联。 我希望系统打开模板，让用户添加他/她的数据，保存并closuresMS Excel。 一旦系统检测到进程不再运行，请指向sTemplateSharedPath并将所有更改导入系统。 如果应用程序的用户界面在用户编辑Excel文档时不响应，那就好了。 在开始这个过程之前，我已经将以下代码添加到上面的代码中了： objProcess.StartInfo.UseShellExecute = false 但是我得到这个错误： 指定的可执行文件不是该OS平台的有效应用程序 我希望有人能够帮助我解决这个问题。 提前致谢。