vb.net - Multiple datagrids to one excel sheet -


I have the following code that will move the records from my datagrid to my Excel spreadsheet. At present, this code works for a datagrid excel sheet. Now I need to improve the code below so that it can work for many datagrids. I want to help to expand this code so that I can drag down the records from 3 data grids under one another under the same Excel sheet.

Microsoft.Office.Interop.Excel.Application excel = Dynamic Excel. Try new Microsoft.Office.Interop.Excel.Application excel.Workbooks.Open ("C: \ satish \ TestExcel \ vbexcel .xlsx ") I leave the block from the DGV elese if you want the column header as the integer as the integer, the dull diff as the integer = 1 '' '' '' DataGrid View 1 for j = 0 for "" "" "" "" "" "" "" "" "" "" "" "" ".ColumnCount - 1 excel.Worksheets (1) .cells (1, j + 1) = DataGridView1.Columns (j) .Name Next diff + = 1 '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' I = 0 to DataGridView4.RowCount - 1, then DataGridView4.Rows (i) .IsNewRow = False then JK for "" "" "" "" "" "" "" For = 0 DataGridView4.ColumnCount - 1 excel.Worksheets (1) .cells (i + diff, j + 1) = DataGridView4.Item (j, i) .Value next end then next excel.Worksheets (1). Select () excel.ActiveWorkbook () Save () excel.Workbooks.Close () excel.Quit () excel does not catch anything in the form of the system. time to time. Enterprises COMException Message Box Show Error ("Error accessing XC:" + ex.ToString ()) Try the end of messageBox.Show ("Error:" + ex.ToString ()) as the pre-exception capture

postprop = "text"> 

  Integer = 1 as intExcelRow As for the integer I = 1 3 dim your DataAdGridView in the form of DataGridView = Me.Controls ("YourDataGridView" & amp; i) 'First DataGridView's Title Only' Removal I = 1 You Print 3 Different Headers For the sake of I want to = 1 then for intColumn = 0 to yourDataGridView.ColumnCount - 1 excel.Worksheets (1) .cells (intExcelRow, intColumn + 1) = YourDataGridView.Columns (intColumn) .Name Next intColumn intExcelRow = intExcelRow +1 end then intRow = 0 to yourDataGridView.RowCount - 1, then yourDataGridView.Rows (intRow) .IsNewRow = False then intColumn = 0 to yourDataGridView. ColumnCount - 1 excel.Worksheets (1) .cells (intExcelRow, intColumn + 1) = YourDataGridView.Item (intColumn, intRow) .Value Next intColumn intExcelRow = intExcelRow + 1 End I
Then next intRow Next

-

Comments

Post a Comment

Popular posts from this blog

Member with no value in F# -

After I am trying to convert F # to the following C # code: [StructLayout (LayoutKind.Sequential, charset = CharSet.Ansi)] Private class DOCINFOA {[MarshalAs (UnmanagedType.LPStr)] public string nomeDocumento; [Marshall (UnmanagedType.LPStr)] Public string arquivoSaida; [Marshall (UnmanagedType.LPStr)] Public String Tipodo; } I am doing the following: Named place printer module RawPrinterHelper = [& LT; StructLayout (LayoutKind.Sequential, charset = CharSet.Ansi) & gt;] Type DOCINFOA = [& LT; MarshalAs (UnmanagedType.LPStr) & gt;] Member this.nomeDocumento [& LT; MarshalAs (UnmanagedType.LPStr) & gt;] Member this.arquivoSaida [& LT; MarshalAs (UnmanagedType.LPStr) & gt;] Member This Tipoda [/ code> But I get: One type of definition is necessary for one or more members . Can I vacate these members? you val code> member : [& lt; StructLayout (LayoutKind.Sequential, charset = CharSet.Ansi) & gt;] Type DOCINFOA = [...
Read more

java - Joda Time Interval Not returning what I expect -

मेरे पास निम्न प्रोग्राम है import java.util। *; Import java.text। *; आयात करें org.joda.time। *; सार्वजनिक श्रेणी के स्कोप कंट्रोल {सार्वजनिक स्थिर अंतराल मिलनसार () {दिनांक समय currDate = नया दिनांक समय (2008, 4, 4, 15, 30, 0, 0); दिनांक समय epochDate = नया दिनांकटाइम (2000, 1, 1, 12, 0, 0, 0); अंतराल अंतराल = नया अंतराल (युरोप डेट, करोडेट); वापसी अंतराल; } सार्वजनिक स्थिर शून्य मुख्य (स्ट्रिंग [] आर्ग्स) {डबल दिनबात = मिलते समय ()। ToDurationMillis () / 1000/60/60/24; StdOut.println (daysBtween); }} मुझे आउटपुट मिल रहा है: 3016.0 लेकिन जो मैं देख रहा हूं वह है: 3016.1458333333 मैं क्या कर रहा हूँ ? toDurationMillis एक लंबा लौटा देता है, और प्रत्येक प्रभाग को int के रूप में घोषित किया जाता है। जावा इस प्रकार इनट्स को लॉन्ग में परिवर्तित कर देगा और डिवीजन को लंबे समय तक लौटाना होगा। परिणाम को अंत में दोहरे रूप में परिवर्तित करना। डबल्स का उपयोग करके अभिव्यक्ति करने के लिए जावा को बताने के लिए, अभिव्यक्ति के किसी भी घटक को दोहरे रूप में घोषित करें। उदाहरण के लिए: ...
Read more

c# - Showing a SelectedItem's Property -

So I have enabled a rightclick option for my DataGrid. I want to display the only chosen property but it is not behaving like what I would like it to display my name and additional. Public category Paymentinfo {public int PaymentNo {get; Set; } Public string date {get; Set; } Public Double Pay {get; Set; } Public Double Principle {get; Set; } Public Double Interest {get; Set; } Public Double Balance {Received; Set; }} Private Zero MenuItem_OnClick (Object Sender, RoutedEventArgs e) {MessageBox.Show (AmortGrid.SelectedItem.ToString ()); } I'm trying to apply it without using a View Module! If I place a breakpoint where the messagebox and the recipient place it on selected ITEM, then this property will display the payment. A date-payment-principle-interest-balance is the only value that needs payment. Was hoping that it would be something like this MessageBox.Show (AmortGrid.SelectedItem.PaymentNo.ToString ()); When you call ToString () So you get the class typ...
Read more