Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
28/07/2009 17:26
Konu Sahibi
makarax
Yorumlar
3
Okunma
2404
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

makarax

Hesap Aktif Değil
Aktivasyon Bekleyen
76
10/06/2009
Bursa
Ofis XP
11/09/2017,13:45
Çözüldü 
Merhaba Üstatlar. Excel dosyamda bulunan bulunan bir worksheet i belirtiğim klasör içindeki (yaklaşık 100 adet)tüm excellerin içine yapıştırmak istiyorum. Böyle bir macro yapabilir mi? yardımcı olursanız sevinirim.



Kullanici Avatari

esrefigit

Aktif Üye
Aktif Üye
599
30/10/2008
359
Konya
Ofis 2003
03/08/2017,11:47
Çözüldü 
bu sadece klasörden seçilene kopyalama
Private Sub CommandButton1_Click()
Dim CurWkbk As Workbook
Dim newWkbk As Workbook
Dim ws As Worksheet
Set CurWkbk = ActiveWorkbook
FNameAndPath = Application.GetOpenFilename _
(FileFilter:="Excel Files (*.xls), *.xls", _
Title:="Copyalıyoruz")
If FNameAndPath = False Then Exit Sub
Set newWkbk = Workbooks.Open(Filename:=FNameAndPath)
CurWkbk.Sheets(1).Copy after:=newWkbk.Sheets(1)
End Sub


burdaki (1) ilk 1 içinde olduğun actif sayfanın birinci sayfası diğeride diğerinin birinci sayfası


meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz

Kullanici Avatari

makarax

Hesap Aktif Değil
Aktivasyon Bekleyen
76
10/06/2009
Bursa
Ofis XP
11/09/2017,13:45
Çözüldü 
Teşekkürler hocam. Bu makro ile hepsini teker teker seçerek yapılabiliyor. Buda biraz hızlandırır. eline sağlık



Kullanici Avatari

mehmetdemiral

.
Uzman
ME.... DE....
4.787
30/10/2008
Samsun
Öğretmen
Ofis 2013 32 Bit
29/03/2018,15:43
Çözüldü 
Konu taşınmıştır.


İnadına, ille de Accesstr.net...


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü 2 excel dosyası arasında kritere göre bağ yapıştırma mehmetdemiral 19 4.755 17/04/2018, 12:47 Subco
Çözüldü Excel hücrede sayısal değeri yazı ile gösterme sezginsasm 20 8.260 29/03/2018, 12:27 MKMK2018
Çözüldü Excel De Düşeyara Formülü #yok Hatası Veriyor... mehmet yaşar öztürk 9 828 08/01/2018, 11:06 canazor
Çözüldü Excel Yıllık İzin Tablosu mehmetfetih 2 2.391 06/08/2017, 09:47 mehmetfetih
Çözüldü Excel Veri Çekme Sorunu goksel86 7 962 26/05/2017, 16:14 ozanakkaya

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.