主题：[求助]关于读取Excel

之前不是说过要怎么处理了吗？不是一样？

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=105363&skin=0

你要怎么读取数据？具体例子发上来说明。

1、读取某个单元格的值，你只需要知道其坐标即可，【是/否】你不知道怎么获取？

2、现在你是不会读取sheets(0)或者sheets(1)？直接循环每一行，读取不就可以了？这部分有困难？

3、你表格要加上一个【分清单表】，把你需要的数据合并进去。你哪一步不会做？

汗，根本看不懂你写的什么代码。

Dim dlg As new OpenFileDialog
If dlg.ShowDialog = DialogResult.OK Then
    Dim book As new XLS.Book(dlg.FileName)
    Dim sheet2 As XLS.Sheet = book.Sheets("sheet2")
    For i As Integer = 0 To sheet2.Rows.count-1
        If sheet2(i,0).text = "编码" Then
            For j As Integer = i+1 To sheet2.rows.count-1
                If sheet2(j,0).text.contains("小计") Then
                    i = j
                    Exit For
                End If
                output.show(sheet2(j,0).text & " " & sheet2(j,1).text & " " & sheet2(j,2).text)
            Next
        End If
    Next
End If

不要动态修改表结构，如果需要修改，应该临时改一下

http://www.foxtable.com/webhelp/scr/1428.htm

把你的项目拷贝出来，放在另一个文件夹，把bin文件夹删除，重新打开。

你是不是把文件夹设置了同步、共享、禁止写入等操作？

1、如果编码相同如何处理？

2、你可以find的条件加上数量的值，如果是编号、数量都一样的，就不处理，不同的，就新增一行。

1、

Dim dlg As new OpenFileDialog
If dlg.ShowDialog = DialogResult.OK Then
    Dim book As new XLS.Book(dlg.FileName)
    Dim sheet2 As XLS.Sheet = book.Sheets("sheet2")
    For i As Integer = 0 To sheet2.Rows.count-1
        If sheet2(i,0).text = "编码" Then
            Dim sj As String = sheet2(i-1, 0).text
            Dim reg As new System.Text.RegularExpressions.Regex("[0-9]{4}-[0-9]+-[0-9]+")
            Dim mc As object = reg.Matches(sj)
            If mc.count > 0 Then
                sj = mc(0).value
            End If
            For j As Integer = i+1 To sheet2.rows.count-1
                If sheet2(j,0).text.contains("小计") Then
                    i = j
                    Exit For
                End If
                output.show(sj & " " & sheet2(j,0).text & " " & sheet2(j,1).text & " " & sheet2(j,2).text)
            Next
        End If
    Next
End If

2、

直接写 DataTables("发货分清单").DeleteFor("编号 is null")

1、不明白你为什么要增加列。不懂你的逻辑。

    那，你可以循环两次，第一次循环增加列，第二次循环获取值。

2、你是不是安装了什么同步的软件？导致无法正常访问文件夹文件？换一个盘符、换一个文件夹。

这个是正则，你可以看看其规则

https://www.baidu.com/baidu?wd=%E6%AD%A3%E5%88%99