Arşiv

Excel ile ilk uygulamamızda bir excel hücresine değer yazma uygulaması yapalım. Öncelikle form üzerine bir adet komut butonu ekleyelim. Kod olarak da şunları yazalım:

 

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim xl

        xl = CreateObject("Excel.Application") 'Excel nesnesi oluşturuyoruz

        xl.Workbooks.add() 'Yeni bir çalışma kitabı ekliyoruz

        xl.application.visible = True 'Excel sayfasını görüntülüyoruz

        xl.worksheets(1).Activate() '1 nolu çalışma sayfasını aktif ediyoruz

        xl.cells(1, 1).value = "Deneme" 'A1 hücresine değerimizi yazıyoruz

    End Sub

End Class

 

Programımızı çalıştırdığımızda A1 hücresine Deneme yazıldığını görürüz.

xl.cells(1, 1) ifadesinde ilk değer satırı, ikinci değer ise sütunu belirtmektedir.

 

Projenin dosyasının linki:

http://www.volkanaktas.com/PrgDosya/vba/exceldegeryaz.rar

Etiketler : VB.Net VBA Excel
Kategoriler : VB.Net VBA
Yorumlar : 0 Yorum Yorum Yaz

Arama
  Ara
Takvim
<September 2010>
SMTWTFS
2930311234
567891011
12131415161718
19202122232425
262728293012
3456789
Tag Bulutu