Excele veri aktarırken sayfa seçimi problemi
Tarih
05/12/2011 22:04
Konu Sahibi
drummers
Yorumlar
5
Okunma
1449
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
398
11/05/2009
125
İzmir
Ofis 2003
29/11/2016,13:56
Çözüldü 
Bu kod ile TextBox verilerimi excele aktarıyorum.

Kod:
 
Dim xls As New Excel.Application
 Dim w As Excel.Workbook = xls.Workbooks.Open("C:\deneme.xls")
 xls.Visible = True
 w.Sheets("Sayfa3").range("C6") = TextBox1.Text





Fakat çalışma kitabındaki tüm sayfalar seçilmiş olarak açılıyor. Benim istediğim yazdığım sayfanın seçili olarak ekrana gelmesi. Burada select i nereye koyacağımı bilemedim. Teşekkürler.

drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
5.993
29/10/2008
Ordu
Ofis 2013 32 Bit
Dün,22:59
Çözüldü 

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
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.

AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla


drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
398
11/05/2009
125
İzmir
Ofis 2003
29/11/2016,13:56
Çözüldü 
(05/12/2011, 22:11)alpeki99 Adlı Kullanıcıdan Alıntı:

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
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.
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
398
11/05/2009
125
İzmir
Ofis 2003
29/11/2016,13:56
Çözüldü 

Kod:
1
2
3
4
5
6
        Dim xls As New Excel.Application
        Dim w As Excel.Workbook = xls.Workbooks.Open("C:\deneme.xls")
                
        xls.Visible = True
        w.Sheets("Sayfa3").range("C6") = TextBox1.Text
        w.Sheets("Sayfa3").Activate()


Ben olayı böyle çözdüm ama, siz ne dersiniz?
"w.Sheets("Sayfa3").Activate()"

drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
5.993
29/10/2008
Ordu
Ofis 2013 32 Bit
Dün,22:59
Çözüldü 
9. satırda hangi sayfanın seçili olduğunu belirttikten sonra 10. satırda o sayfayı aktif ettik. Bu vakitten sonra belirttiğimiz hücre adresi zaten istediğimiz sayfa olmuş olması lazım.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla


drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
398
11/05/2009
125
İzmir
Ofis 2003
29/11/2016,13:56
Çözüldü 
(05/12/2011, 22:37)alpeki99 Adlı Kullanıcıdan Alıntı: 9. satırda hangi sayfanın seçili olduğunu belirttikten sonra 10. satırda o sayfayı aktif ettik. Bu vakitten sonra belirttiğimiz hücre adresi zaten istediğimiz sayfa olmuş olması lazım.
Teşekkürler. Olay tamamdır Img-grin

drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  DataGridView dan Excele Veri Gönderme emir ustaoğlu 2 263 31/08/2016, 15:33 emir ustaoğlu
Çözüldü Vb.net Webbrowser Yeni Pencere Problemi Sherlock.Holmes 9 1.617 04/12/2015, 19:09 Sherlock.Holmes
Çözüldü Foreign Key ve Relationship Problemi (Ana ve Yavru Tablo Kayıt silme) umutakkaya 3 2.254 15/08/2014, 18:04 umutakkaya
Çözüldü ComboBox İl İlçe Seçimi drummers 1 2.366 22/07/2014, 22:06 drummers
Çözüldü Datagrid Satır Seçimi drummers 8 2.572 25/02/2014, 02:05 drummers


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya