Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
06/04/2018 10:54
Konu Sahibi
drummers
Yorumlar
0
Okunma
260
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

drummers

Omur Can
Destek
OM.... CA....
 408
 118
 11/05/2009
125
 İzmir
 
 Ofis 2003
 19/07/2018,15:11
Photo 

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
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Dim Dosyaad As String
        Dim Uygulama As Excel.Application
        Dim Kitap As Excel.Workbook
        Dim Sayfa As Excel.Worksheet
        Dim SayfaSec As Excel.Range
        Dim KolonSinir(0 To 100) As String
        Uygulama = New Excel.Application

        Dim file As OpenFileDialog = New OpenFileDialog()
        If file.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

            Dosyaad = file.FileName
            Uygulama.Workbooks.Open(Dosyaad)
            Kitap = Uygulama.ActiveWorkbook
            Sayfa = Kitap.ActiveSheet
            SayfaSec = Sayfa.UsedRange

            If SayfaSec.Columns.Count > 0 Then
                If SayfaSec.Rows.Count > 0 Then

                    For xlRow = 1 To SayfaSec.Rows.Count
                        For xlCol = 1 To SayfaSec.Columns.Count
                            KolonSinir(xlCol) = SayfaSec.Cells(xlRow, xlCol).text

                            If xlCol = 1 Then
                                ListView1.Items.Add(KolonSinir(xlCol).ToString)
                            Else
                                ListView1.Items(xlRow - 1).SubItems.Add(KolonSinir(xlCol).ToString)
                            End If
                        Next
                    Next


                End If
            End If

        End If

        Uygulama.Workbooks.Close()

resim
Bu şekilde listviewe Excel verilerini aktarıyorum.
Sorum Şudur;
1- İlk checkbox sütununa isimleri yazıyor. Ben isimleri 2. kolona yazmasını istiyorum.
2- Satırlar listviewe eklenirken progresbar eklenen satır sayısı kadar artsın satır ekleme bitince progresbar da sonlansın istiyorum.

Teşekkürler.


drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Listview Otomatik Sıra Numarası Hakkında xxihsidxx 0 121 01/07/2018, 09:59
Son Yorum: xxihsidxx
  Web Sayfasına Veri Aktarımı drummers 18 3.532 05/12/2015, 16:10
Son Yorum: Sherlock.Holmes
  Listview Seçilenleri Yazdırma Hakkında drummers 0 1.246 16/06/2015, 15:55
Son Yorum: drummers
  ListView Search Hakkında drummers 1 1.228 26/05/2015, 16:05
Son Yorum: drummers
  ListView de resim yada icon göstermek ? byhook 1 2.387 18/02/2014, 01:41
Son Yorum: byhook

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