Excel Dosya Adı
Tarih
15/03/2014 22:27
Konu Sahibi
idrisy
Yorumlar
2
Okunma
1019
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



idrisy
Aktif Üye
Kullanici Avatari
Aktif Üye
İ.... Y....
170
27/12/2008
11
Osmaniye
Ofis 2003
21/02/2017,23:48
Çözüldü 
Sponsor Reklam
Sayın hocalarım EK'teki dosyada EK formunda seçtiğim yıl ve aya göre verileri Excele gönderiyorum. Program oluşturduğu Excel dosyasına verileri gönderiyor. Benim yapmak istediğim LBExcel modülünde dosya oluşturma kodlarının Excel dosya ismini EK formundaki açılır kutulardan YIL ve AY şeklinde oluşturmasını istiyorum.


Ek Dosyalar
.rar   ExceleGonder.rar (Dosya Boyutu: 87,34 KB / İndirme Sayısı: 11)
Cevapla

aydın3838
Destek Ekibi
Kullanici Avatari
Destek
256
20/12/2009
8
Kayseri
Ofis 2003
15/12/2016,19:28
Çözüldü 
selam
excel modulunuzdeki kodları alttaki ile değiştirin

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
  On Error GoTo ExAcHata
  '-------------------------------------------------
  Dim yol, deger As String
  yol = Application.CodeProject.Path 'excel dosyasının kaydedileceği yol
  deger = "ayd yapı" 'excel dosyasının ve sayfasının adı
  Kill yol & deger & ".xls" 'excel dosyasının varsa sil
  '-------------------------------------------------
  ExAc = False
  Set ExC = New Excel.Application
  ExC.Visible = True
  Set ExW = ExC.Workbooks.Add
  Set ExS = ExW.Worksheets(1)
  ExAc = True
      '-------------------------------------------------
With ExC
.Sheets("Sayfa2").Delete 'sayfa sil
.Sheets("Sayfa3").Delete 'sayfa sil
.Sheets("Sayfa1").Name = deger 'sayfa adı
ExC.Application.ActiveWorkbook.SaveAs FileName:=yol & deger & ".xls"
End With
  '-------------------------------------------------
  Exit Function
ExAcHata:
  ExAc = False
  Set ExC = Nothing


aydın3838, 20-12-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

idrisy
Aktif Üye
Kullanici Avatari
Aktif Üye
İ.... Y....
170
27/12/2008
11
Osmaniye
Ofis 2003
21/02/2017,23:48
Çözüldü 
Sponsor Reklam
Sayın aydın3838, biraz geç oldu ama ilginiz için çoook teşekkür ederim. Ellerinize sağlık.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Excel'e Gönderirken Biçimlendirme husem 1 43 Dün, 00:38 husem
  Excel Tablosunda Tekrarlayan Kayıtları Access'e Taşıma dralioner 17 201 17/02/2017, 00:55 dralioner
  Dinamik Excel İle Sorgu Cevabı Almak dufrety 6 76 08/02/2017, 13:02 dufrety
  Raporu Excel'e aktarma nightashes 10 319 31/01/2017, 10:09 nightashes
  Accessten excel bağlantısı ile veri alırken parola hatası. Mecnun24 8 315 02/01/2017, 20:11 Mecnun24


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