(05/12/2011, 22:11)alpeki99 yazdı:

Dim strWorkSheet As String

Dim xExcel As Excel.Application

Dim xWorkBook As Excel.Workbook

Dim xWorkSheet As Excel.Worksheet



xExcel = New Excel.Application

xExcel.Visible = True

xWorkBook = xExcel.Workbooks.Open("Excel_Dosyam.xls")

xWorkSheet = xWorkBook.Worksheets("Sayfamın_Adı")

xWorkSheet.Activate()

olabilirmi acaba? Örnek dosya olmasını lütfen ihmal etmeyiniz.

Dosya boyutu yüksek ve herkesin VB 2010 kullanmadığını varsayarak eklemedim.

Yukarıdaki kodunuza birşey ekliyebilirmisiniz.

Örnek: Textbox1 verisini benim istediğim sayfaya ve benim belirliyeceğim hücreye yazsın.

Teşekkürler.