批量导出XML数据到Excel电子表格

时间:2019-05-30 18:10:48

标签: excel vb.net export-to-excel

说实话,我不知道如何实现自己想要的。我是编程的新手,无法在线找到任何答案,所以我来到了这里。我正在尝试做一些看似非常简单的事情。我想将我的CAD / CAM软件生成的一批.drg文件添加到包含xml数据的列表视图中,并且我希望将每个文件的某些元素导出到excel电子表格中的单独一行。设计表单并添加所有按钮没有问题,但是我对编码一无所知。

在线找到了不同的样本

Imports System.Xml
Imports Microsoft.Office.Interop.Excel

Public Class Form1
    Private create_xml As Object

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Using ofd As New OpenFileDialog
            ofd.Multiselect = True
            If ofd.ShowDialog = DialogResult.OK Then
                For Each fn As String In ofd.FileNames
                    Dim fi As New IO.FileInfo(fn)
                    Dim lvi As ListViewItem = ListView1.Items.Add(fi.Name)
                    lvi.SubItems.Add(fi.DirectoryName)
                    If fi.Length >= 1024 Then
                        lvi.SubItems.Add((fi.Length / 1024).ToString("F2") & " kb")
                    Else
                        lvi.SubItems.Add(fi.Length.ToString & " bytes")
                    End If
                    lvi.SubItems.Add(fi.CreationTime.ToString)
                    lvi.SubItems.Add(fi.Extension)
                Next
            End If
        End Using
    End Sub

这是XML的样子 xml

突出显示的项目是我需要导出到Excel电子表格的项目。机智

这是我要创建的报告的一个示例excel sheet

0 个答案:

没有答案