DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub nn()
Yol = "C:\"
Dosya = "1.xls"
Adres = "'" & Yol & "\[" & Dosya & "]1'!"
For i = 3 To 50
Cells(i, "a") = ExecuteExcel4Macro(Adres & Cells(i, "a").Address(True, True, xlR1C1))
Next
End Sub
bir excel çalışma kitabındaki sayım sonuçları sayfasından eksi sayfasına veya sayım sayfasından artı olanları artılar sayfasına nasıl alabiliriz?
Bu örnek işine yarar mı ?
Ben 1.xls kitabınızı incelerseniz tabloyu değiştirmiştim.Yani o şekilde olmuyor mu ? Yani öncesinde sizin 1.xls kitabınızda bazı sütunlar boş bırakılmıştı da...Tşk ederim .. işimi yarıyor ama bi duzeltme yaparsak super olcak verı almak ıstedıgım hucerlerle gelecegı yerler farklı yanı şöyle
kitap11 deki A6 hücresi verileri diger dosyanın A3 hücresinden
kitap11 deki B6 hücresi verileri diger dosyanın B3 hücresinden
kitap11 deki C6 hücresi verileri diger dosyanın F3 hücresinden
kitap11 deki D6 hücresi verileri diger dosyanın H3 hücresinden
kitap11 deki E6 hücresi verileri diger dosyanın L3 hücresinden
kitap11 deki F6 hücresi verileri diger dosyanın N3 hücresinden
VERİLERİ ALMASI GEREKMEKTEDİR...