RichTextBox taki veriyi Excel'e aktarma

Başlatan mutta16, 19 Kasım 2013, 22:22:18

mutta16

Merhaba arkadaşlar, richtextboxtaki veriyi satırlar halinde excele aktarmak istiyorum fakat bu beceremedim, richtextboxtaki alt alta veriler excelde bir sütunda yan yana yazılıyorlar.Kullanmış olduğum kod aşağıdaki gibidir.Bu kodun neresine ekleme/çıkarma yaparak textboxtaki her satırı excel deki her satıra eşleyebilirim?

Microsoft.Office.Interop.Excel.Application uygulama = new Microsoft.Office.Interop.Excel.Application();
            uygulama.Visible = true;
            Microsoft.Office.Interop.Excel.Workbook sayfa1 = uygulama.Workbooks.Add(System.Reflection.Missing.Value);
            Microsoft.Office.Interop.Excel.Worksheet kitap1 = (Microsoft.Office.Interop.Excel.Worksheet)sayfa1.Sheets[1];
            for (int i = 0; i < this.Controls.Count; i++)
            {
                if (this.Controls[i] is RichTextBox)
                {
                    Microsoft.Office.Interop.Excel.Range alan = (Microsoft.Office.Interop.Excel.Range)kitap1.Cells[1,1];
                    alan.Value2 = this.Controls[i].Text.ToString();
                }
            }

barisertekin

#1
Alıntı yapılan: mutta16 - 19 Kasım 2013, 22:22:18
                    Microsoft.Office.Interop.Excel.Range alan = (Microsoft.Office.Interop.Excel.Range)kitap1.Cells[1,1];
                    alan.Value2 = this.Controls.Text.ToString();

Siz kendiniz .Cells[1,1]; nolu hücreye yazmasını söylüyorsunuz. Yani bunu yapması normal.

Önce richtexbox'taki veriyi satır satır ayırın. Excel'e satır satır ekleyin.

string[] Rows = this.Controls.Text.Split('\n');
for(int j=0;j<Rows.Length;j++)
{
     Microsoft.Office.Interop.Excel.Range alan = (Microsoft.Office.Interop.Excel.Range)kitap1.Cells[j,1];
     alan.Value2 = Rows[ j ];
}