我有一个代码,其中我带两个文件。两者都是Excel文件,我需要将一个文件复制到另一个文件。文件中的行数和列数是动态的。
sFile
是源文件,sFile1
是目标文件。我需要知道源文件中的行数,以便在将其复制到目标文件时运行for循环。
代码如下:
Dim shtlight As New SLDocument(sFile1)
Dim lrow As Integer
Dim lcol As Integer
Dim sflie = Environment.Directory & "\Data.xls"
lrow = 2
Dim shtlight1 As New SLDocument(sFile1)
For each row in sfile1
for column in sfile1 'code here to set value next next
我想帮助运行这个for循环,不知道如何设置上限,因为文件中的行和列没有动态。
有人可以帮忙吗?我正在使用手机,因此格式可能不正确。 :(
答案 0 :(得分:3)
正如我在上面的评论中所提到的,我从未与SpreadsheetLight
合作过。我刚刚下载了SpreadsheetLight
并进行了实验。
要获得最后一行,您需要使用此
Imports DocumentFormat.OpenXML
Imports DocumentFormat.OpenXML.Spreadsheet
Imports SpreadsheetLight
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim sl As New SLDocument("C:\Users\Siddharth\Desktop\Tester.xlsx", "Sheet1")
MessageBox.Show (sl.GetWorksheetStatistics.EndRowIndex)
End Sub
End Class
注意强>
对于像SpreadsheetLight这样的新手,想要试验的人。