Yazı Font Küçült Yazı Font Büyült

Excel Sayfasındaki Sütundaki Verileri ListBoxta Göstermek

 

Herkese selamlar. Bu örneğimizde Excel sayfasındaki verileri listboxta gösterimini sağlayacağız. İlk önce Formunuza Button ve OpenFileDialog ekleyin. OpenFileDialog ile açtığımız Excel dosyasının A sütunundaki bilgileri listboxa aktaracağız.

 

.cs

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Linq;

using System.Text;

using System.Windows.Forms;

using System.Data.OleDb;

 

namespace WindowsFormsApplication1

{

    public partial class Form1 : Form

    {

        public Form1()

        {

            InitializeComponent();

        }

 

        private void button1_Click(object sender, EventArgs e)

        {

            openFileDialog1.Title = "Lütfen Excel Dosyası Seçiniz";

            openFileDialog1.Filter = " (Excel dosyası aç (*.xlsx))|*.xlsx|(Excel dosyası aç (*.xls))|*.xls";

            openFileDialog1.FilterIndex = 1;

            openFileDialog1.Multiselect = true;

            if (openFileDialog1.ShowDialog() == DialogResult.OK)

            {

           string path = openFileDialog1.FileName;

OleDbConnection baglan = new OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + path + ";Extended Properties=Excel 12.0");

                baglan.Open();

                //Excel sayfasındaki A sütunundaki ilk 100 satırdaki bilgiyi aldık.

                string sql = "Select * From [Sayfa1$A1:A100] ";

                OleDbCommand komut = new OleDbCommand(sql, baglan);

                OleDbDataReader dr = null;

                dr = komut.ExecuteReader();

                while (dr.Read())

                {

                    if (dr[0] != "")

                    {

                        listBox1.Items.Add(dr[0].ToString());

                    }

                    else

                    {

                        break;

                    }

                }

                baglan.Close();

            }

 

        }

    }

}

 

 

Ekran Çıktısı

 

Resim1

Şekil 1

 

Resim2

Şekil 2

 

   Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN