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