Hello i got stuck and cant figure out how to create to export the datagridviews from each tabpage to excel when click on button.
Here is my code for create the datagridviews+tabpages (that will be readed from .txt file)
[code]
Dim Lines() As String = IO.File.ReadAllLines(My.Application.Info.DirectoryPath & "\Lines.txt")
For Each line As String In Lines
Dim LineParts() As String = Strings.Split(line, "|", 2) 'Split the current line into two chunks at the first =
If LineParts.Count < 2 Then
Continue For 'No = in the line, so skip it
Else
Dim Key As String = LineParts(0)
Dim Value As String = LineParts(1) 'This contains the part after the =
'Do whatever you want with the value here. e.g.
Dim dynamicTab As New TabPage(Key)
Dim btn As New DataGridView()
btn.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.Fill
btn.AlternatingRowsDefaultCellStyle.BackColor = Color.White
btn.AlternatingRowsDefaultCellStyle.ForeColor = Color.Black
btn.AlternatingRowsDefaultCellStyle.SelectionBackColor = Color.FromArgb(0, 177, 89)
btn.AlternatingRowsDefaultCellStyle.SelectionForeColor = Color.White
btn.ColumnHeadersDefaultCellStyle.BackColor = Color.White
btn.ColumnHeadersDefaultCellStyle.ForeColor = Color.Black
btn.ColumnHeadersDefaultCellStyle.SelectionBackColor = Color.FromArgb(0, 177, 89)
btn.ColumnHeadersDefaultCellStyle.SelectionForeColor = Color.White
btn.DefaultCellStyle.BackColor = Color.White
btn.DefaultCellStyle.ForeColor = Color.Black
btn.DefaultCellStyle.SelectionBackColor = Color.FromArgb(0, 177, 89)
btn.DefaultCellStyle.SelectionForeColor = Color.White
btn.RowHeadersVisible = True
btn.ColumnHeadersHeightSizeMode = AutoSize
btn.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.Fill
btn.Anchor = AnchorStyles.Top And AnchorStyles.Left And AnchorStyles.Right
btn.ScrollBars = ScrollBars.Both
btn.Dock = DockStyle.Fill
btn.Columns.Add("SAPCenter", "WorkCenter")
btn.Columns.Add("GetLine", "Line")
btn.Columns("GetLine").DefaultCellStyle.NullValue = Value
btn.Columns("GetLine").ReadOnly = True
TabControl1.TabPages.Add(dynamicTab)
dynamicTab.Controls.Add(btn)
End If
Next
[/code]
This is on Form Load to get all information from the txt file and create the tabPages.
So now i have 1 button to export this, but i cant find a way how to get the information from the datagridviews in each TabPage.
What i want to do is:
- Each TabName to be SheetName
- Each SheetName to record the information from each TabPage datagridview using ClosedXML
Thats all, can someone help me out?