Geri Yükleme Hk.

ultraslan38080 · 28 Ağu 2019

Arkadaşlar elimde DOSYA klasörü içinde bir tane makrolu PROGRAM.xlsm ve burdan yedek aldığım BİLGİLER.xlsx dosyası mevcut.

Ben DOSYA klasörünü hangi konumda ve hangi bilgisayarda kullanırsam kullanayım, klasör içindeki program ve yedeğini aldığım excellere hiçbir şekilde dokunmamak şartıyla;
PROGRAM.xlsm içindeki commandbutona bastığımda, BİLGİLER.xlsx içindeki verileri geri yüklemesini istiyorum.

Yedek almayı yaptım ama geri yüklemeyi yapamadım. Yardımcı olur musunuz?

İndir DOSYA rar

berkbaba · 29 Ağu 2019

Kod:

Private Sub CommandButton1_Click()
On Error Resume Next
Dim Dosya As String
Application.ScreenUpdating = False
Dosya = ThisWorkbook.Path & "\BİLGİLER.xlsx"
Workbooks.Open Dosya
Sheets("Sayfa1").Cells.Copy ThisWorkbook.Sheets("BİLGİLER").Range("A1")
ActiveWorkbook.Close False
Application.ScreenUpdating = True
MsgBox "İşlem tamam...", vbInformation, "......."
End Sub

kod alıntıdır.

cakarem · 18 Eyl 2019

Sayın @ultraslan38080 ,
Sorunuz çözüme ulaşıldı ise konuyu çözüldü olarak işaretleyip, kilitleyelim.

cakarem · 23 Eyl 2019

Dönüş sağlanmadığı için konu çözüldü olarak işaretlenip, kilitlenmiştir.

	Userform Üzerinde Geri Sayım Sayacı Yapma berkbaba 13 Ocak 2024 Makro Soruları
	Commandbutton düğmesine iki görev yükleme berkbaba 14 Tem 2019 Makro Soruları
	Klasör Oluşturup İçine Dosya Yükleme ExcelDepo 11 Eyl 2024 Makro Soruları
	SQL Server Resimli Veri Yükleme rasit 9 Eyl 2024 Makro Soruları
	SQL Resim Yükleme ve ListView Nesnesinde Yazdırma rasit 7 Eyl 2024 Makro Soruları