Tag: listview

导出ListView到Excel – 苦苦挣扎的performance

我试图优化我前段时间编写的应用程序的输出,虽然我在许多方面取得了很大成绩,但我正在努力加快将列表视图的结果导出到.xlsx文件的function。 我正在使用Interop来完成它,如下所示: Imports Excel = Microsoft.Office.Interop.Excel Imports System Imports System.IO Imports System.Data.OleDb Imports System.Threading Imports System.Linq Imports System.Data.SqlClient 这是在listview中输出数据的函数: Private Function ExportListViewTab5ToXLSxFile(ByRef FileNameWithoutExtension As String, ByRef OutputDir As String) As Boolean Try Dim objExcel As Excel.Application = New Excel.Application Dim bkWorkBook As Excel.Workbook Dim shWorkSheet As Excel.Worksheet Dim i As Integer Dim j As Integer […]

Excel VBA listview控件在设置宽度时会给出“无效的属性值”错误

这是Listview控件6.0(SP6) 当我试图添加一列我没有看到列,我意识到这可能是由于列的宽度为0.00的事实,所以我试图改变宽度多种方式。 所有导致相同的错误 “运行时错误'380':无效的属性值 Private Sub ListView41_Click() Dim width As Long width = 10 With ListView41 .View = lvwReport .HideColumnHeaders = False .ColumnHeaders.Clear .ColumnHeaders.Add 1, , "A" .ColumnHeaders(1).width = width .ColumnHeaders.Add 2, , "B", width End With End Sub 唯一没有给出的错误是当宽度= 0我的直觉告诉我有一些其他的属性值造成这一点,但我不知道它可能是哪个属性。

工作表上的ListView生成不能插入对象错误Excel 2010

嗨,我有一个Excel 2003应用程序有一个列表视图embedded在工作表中。 它不再适用于Excel 2010。 我根据build议使用regsvr32 C:\Windows\System32\MSCOMCTL.OCX重新注册了ocx。 这适用于表单上的列表视图,但不适用于工作表。 Microsoftbuild议如果控件是特定于窗体并尝试添加到工作表,则无法插入对象。 在Excel 2010中可以在工作表中使用该列表视图吗? 如果这样怎么样? 否则,将需要重写。

Excel VBA自动调整ListView列

我发现代码为了调整列的项目中的最长的string的ListViews列的大小,但我想修改它,所以它也考虑了列名的长度以及resize。 我有几列最长的string是列名本身。 我一直在search谷歌尝试和解决这个问题,但我真的不明白在这里使用的API。 这个问题的一个扩展也是,什么是LVM_FIRST在这里做什么,我似乎无法find任何东西在我的search。 宣言: Private Declare Function SendMessage Lib "user32" Alias _ "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, _ ByVal wParam As Long, lParam As Any) As Long Private Const LVM_FIRST = &H1000 子: Public Sub LV_AutoSizeColumn(LV As ListView, Optional Column _ As ColumnHeader = Nothing) Dim C As ColumnHeader If […]

我不断收到System.Runtime.InteropServices.COMException(0x80028018):旧的格式或无效的types库。 错误

我尝试使用ListView – objLv中的相应行颜色来更新Excel工作表行 objLv = ListView 我添加了一个参考System.Drawing.dll – 运行版本v2.0.50727 – 版本2.0.0.0 该错误发生在“workbook.Styles.Item(i).Interior.Color …所以这是下面的代码的第六行。 我应用了一些解决scheme,但无法解决问题。 Dim oldCI = New System.Globalization.CultureInfo("en-US") 'Me.sCloseDoc(strXLSFile) Dim workbook As Excel.Workbook = Me.fOpenXlsFile(strXLSFile) For i As Int32 = 0 To objLv.Items.Count – 1 workbook.Styles.Item(i).Interior.Color = objLv.Items(i).BackColor Next workbook.Save()

如何将数据从ListView导出到Excel和PDF(VBA)

我有一个ListView中的数据,并希望将这些数据与列标题导出到一个新的Excel文件和一个PDF文件。 LV的定义如下: 'listview: | # | Col1 | Col2 | Col3 | … ================================== | 1 | Val1 | Val2 | Val3 | … 我从这个代码开始: Dim objExcel As Excel.Application Dim objWb As Excel.Workbook Dim objWs As Excel.Worksheet Dim objRange As Excel.Range Dim i%, j% On Error GoTo errMsg Set objExcel = New Excel.Application objExcel.Visible = […]

ListView _ItemClick事件不会触发(XL2007)

我有一个用户窗体包含一个标准的MSComctlLib v6(SP6)ListView控件,称为lvwTables 。 当用户看到它时,大约有二十左右的ListItems被添加到控件中。 我试图陷入_ItemClick事件使用我认为*是正确的forms,即 Private Sub lvwTables_ItemClick(ByVal Item As MSComctlLib.ListItem) 'blah End Sub 但事件子从未触发。 其他点击事件(如_Click和_ColumnClick )工作正常。 有没有人成功地把这个事件困在XL07中,如果是的话,你是怎么做到的? (*我指的是networking的信息,因为我没有访问控制的在线帮助或任何其他文件。)

ListView不能正确地将数据导出到Excel

我在Excel中得到一个错误,涉及到我想从列表视图(ASP&C#)导出的数据。 为了澄清,我正在转换ListView到一个DataTable,因为我得到错误之前。 所有这些都是通过单击button来处理的,Excel文档被创build,但是在打开时出现错误,只显示标题。 任何想法,我在做什么错了? 我怀疑在LoadFromDataTable中添加dt会导致这种情况,但是在debugging时没有任何错误 – 任何指针都会被感激地接收到。 Excel错误: We found a problem with some content in 'Test_List.xlsx'. Do you want us to try to recover as much as we can? If you trust the source of this workbook, click Yes. We found a problem with some content in 'Test_List.xlsx'. Do you want us to try […]

导出Listview项目为Excel,获取子项目不是listviewItem错误的成员

我目前正在用基于用户input到search文本框的文本从数据库填充数据。 <ListView x:Name="listSearchServer" HorizontalAlignment="Center" Height="282" Margin="20,50,33,0" VerticalAlignment="Top" Width="264" BorderThickness="1" BorderBrush="#FFCCCCCC" Grid.ColumnSpan="3"/> 所以当我运行我的SQL并获取我需要的数据时,我将这些项目添加到列表视图 While reader.Read() countvalues = countvalues + 1 'Populate the SearchServers listview with result from query Dim share = reader("ShareName") listSearchServer.Items.Add(share) End While 现在我添加了一个button来将结果导出为ex​​cel,并且我使用了下面的代码来带回一个错误 – “子项目不是listviewitems的成员” Private Sub cmdExportServer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdExportServer.Click Dim xls As New Excel.Application Dim […]

列表视图不导出列为Excel

我试图将一个列表视图导出到Excel文件。 列表视图中的信息已成功导出,但列不是。 这里是代码: StringBuilder sb = new StringBuilder(); Microsoft.Office.Interop.Excel.Application app = new Microsoft.Office.Interop.Excel.Application(); app.Visible = true; Microsoft.Office.Interop.Excel.Workbook wb = app.Workbooks.Add(1); Microsoft.Office.Interop.Excel.Worksheet ws = (Microsoft.Office.Interop.Excel.Worksheet)wb.Worksheets[1]; int i = 1; int i2 = 1; int x = 1; int x2 = 1; foreach (ColumnHeader ch in listView1.Columns) { ws.Cells[x2, x] = ch.Text; x++; } foreach (ListViewItem lvi […]