• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Excel 1. Sayfadaki Verileri 2. Sayfaya Satır Satır Kaydetme

Kodu denermisiniz...
Kod:
Sub Aktar()
Application.ScreenUpdating = False
Mutlu = Sheets("Liste").Range("A65536").End(3).Row + 1
For MSTF = 2 To Sheets("Giriş").Cells(65536, "B").End(xlUp).Row
Sheets("Liste").Cells(Mutlu, MSTF - 1) = Sheets("Giriş").Cells(MSTF, "B")
Next
Application.ScreenUpdating = True
MsgBox " Verileri Aktardım...........", vbExclamation, "Mustafa MUTLU 0 533 740 45 49"
End Sub
 
Kodu denermisiniz...
Kod:
Sub Aktar()
Application.ScreenUpdating = False
Mutlu = Sheets("Liste").Range("A65536").End(3).Row + 1
For MSTF = 2 To Sheets("Giriş").Cells(65536, "B").End(xlUp).Row
Sheets("Liste").Cells(Mutlu, MSTF - 1) = Sheets("Giriş").Cells(MSTF, "B")
Next
Application.ScreenUpdating = True
MsgBox " Verileri Aktardım...........", vbExclamation, "Mustafa MUTLU 0 533 740 45 49"
End Sub

Teşekkür ederim tam anlamıyla istediğim şey elleriniz dert görmesin.
 
hocam aynı aktarma işlemini bir web sitesinde bulunan tablo veya satırlar üzerinde nasıl kullanabiliriz arkadaş bahsetmiş ya hani gg hesabımıza düşen sipariş veya kargo adreslerini de direk excell e cekebilirmiyiz ?
 
hocam aynı aktarma işlemini bir web sitesinde bulunan tablo veya satırlar üzerinde nasıl kullanabiliriz arkadaş bahsetmiş ya hani gg hesabımıza düşen sipariş veya kargo adreslerini de direk excell e cekebilirmiyiz ?

Bugün keşfettim https://panel.stockmount.com bu site üzerinde üyelik aç ücretsiz paket seçeneklerinden en sondakini seç gittigidiyor n11 hepsiburada tüm pazar yerlerinin satışlarını mesajlar ve toplu excel dökümüyle faturalandırma işlemlerini tek ekranda yapabiliyosun sende ben gibi bir çözüm arıyosun sanırım bir gir dene benim %80 iş yükümü aldı.
 
Geri
Üst