Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
30/08/2016 21:00
Konu Sahibi
emir ustaoğlu
Yorumlar
2
Okunma
922
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
emir ustaoğlu

emir ustaoğlu

Onursal Üye
75504
Yu.... Em.... US....
 26
 28
 176
 12/08/2015
65
 Hatay
 Muhasebe Sorumlusu
 Ofis 2013 64 Bit
 08/04/2019,13:25
Merhaba;

Çalışmamda DataGridView daki verilerimi excele aşağıdaki kod ile göndere biliyorum

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Dim excel As New Microsoft.Office.Interop.Excel.Application()
        excel.Visible = True
        Dim workbook As Microsoft.Office.Interop.Excel.Workbook = excel.Workbooks.Add(System.Reflection.Missing.Value)
        Dim sheet1 As Microsoft.Office.Interop.Excel.Worksheet = DirectCast(workbook.Sheets(1), Microsoft.Office.Interop.Excel.Worksheet)
        Dim StartCol As Integer = 1
        Dim StartRow As Integer = 1

        For j As Integer = 0 To DataGridView1.Columns.Count - 1
            Dim myRange As Microsoft.Office.Interop.Excel.Range = DirectCast(sheet1.Cells(StartRow, StartCol + j), Microsoft.Office.Interop.Excel.Range)
            myRange.Value2 = DataGridView1.Columns(j).HeaderText
        Next
        StartRow += 1
        For i As Integer = 0 To DataGridView1.Rows.Count - 1
            For j As Integer = 0 To DataGridView1.Columns.Count - 1

                Try
                    Dim myRange As Microsoft.Office.Interop.Excel.Range = DirectCast(sheet1.Cells(StartRow + i, StartCol + j), Microsoft.Office.Interop.Excel.Range)
                    myRange.Value2 = If(DataGridView1(j, i).Value Is Nothing, "", DataGridView1(j, i).Value)
                Catch
                End Try

            Next
        Next


Bu kod ile datagridteki verileri göründüğü şekli ile aktara biliyorum ancak tablomda görünmeyen veya aktarmasını istemediğim verilerim var. Örneğin ekteki örnekte kişilerin tc side var excele bu verileri göndermek istemiyorum.
Kodta nasıl bir düzenleme ile yapabilirim. Bir iki deneme yaptım ancak kod hata vermeye başlıyor. Biraz internette de araştırma yaptım istediğim tarzda bir örnek veya kodlama bulamadım.
Şuanda kullandığım kodu C# için hazırlanmış bir örnekten  uzun uğraş sonucu vb.net e uyarlaya bildim. Ancak bir türlü DataGridte o anda göründüğü şekli ile gizlenen kolonları veya sadece belirlenen kolonları aktarmayı başaramadım.
Örnek çalışma ektedir.
Şimdiden teşekkürler.



Dünyada Yetirince Anlaşılır Dile Konuşan İnsanlar Var Birazcık da Anlaması İçin Düşünmesi Gerekiyor İnsanların

POWER

POWER

Uzman
17709
Uf.... Öz....
 55
 44
 1.874
 02/04/2010
 İzmir
 Bilgisayar Mühendisi
 Ofis 2003
 15/07/2019,01:29

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
        For i As Integer = 0 To DataGridView1.Rows.Count - 1
            For j As Integer = 0 To DataGridView1.Columns.Count - 1
                If j = 3 Then GoTo 100 'Bu satırı ekleyin...
                Try
                    Dim myRange As Microsoft.Office.Interop.Excel.Range = DirectCast(sheet1.Cells(StartRow + i, StartCol + j), Microsoft.Office.Interop.Excel.Range)
                    myRange.Value2 = If(DataGridView1(j, i).Value Is Nothing, "", DataGridView1(j, i).Value)
                Catch
                End Try
100:'Bu satırı ekleyin...
            Next
        Next


Please return your positive or negative ...

...........
emir ustaoğlu

emir ustaoğlu

Onursal Üye
75504
Yu.... Em.... US....
 26
 28
 176
 12/08/2015
65
 Hatay
 Muhasebe Sorumlusu
 Ofis 2013 64 Bit
 08/04/2019,13:25
Power hocam;

Yardımınız için çok teşekkür ederim.

İyi çalışmalar.


Dünyada Yetirince Anlaşılır Dile Konuşan İnsanlar Var Birazcık da Anlaması İçin Düşünmesi Gerekiyor İnsanların


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü DataGridView Veri Güncelleme emir ustaoğlu 8 1.534 11/10/2016, 00:30
Son Yorum: emir ustaoğlu
Çözüldü VB 2010 kullanarak excele veri kaydetme. Mettleshade 2 1.519 10/09/2016, 23:39
Son Yorum: Mettleshade
Çözüldü Datagridview Veri Okuma İşlemleri Yardım 47terminator 12 4.308 24/05/2014, 18:48
Son Yorum: 47terminator
Çözüldü Datagridview üzerinden kayıt güncelleme Hakkında umutakkaya 3 2.042 04/05/2014, 16:31
Son Yorum: umutakkaya
Çözüldü Combobox ile DataGridview (Access Veritabanı) Sorgusu chevy 19 8.559 12/04/2014, 23:49
Son Yorum: chevy

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.