Mündəricat
Biz çoxlu Excel vərəqləri ilə işləyərkən bəzən məlumatları bir cədvəldən digərinə köçürməli oluruq. VBA tətbiqi Excel-də istənilən əməliyyatı yerinə yetirmək üçün ən effektiv, ən sürətli və ən təhlükəsiz üsuldur. Bu yazıda biz sizə VBA makrosu ilə Excel-də verilənləri bir iş vərəqindən digərinə kopyalayıb yapışdırmağı göstərəcəyik.
İş kitabını endirin
Ödənişsiz Excel iş kitabını buradan yükləyə bilərsiniz.
Bir İş Vərəqindən Digərinə Kopyalayın və Yapıştırın.xlsm
VBA ilə Excel-də bir iş vərəqindən digərinə verilənləri kopyalamaq və yapışdırmaq üçün 15 üsul
Bu bölmədə siz verilənlərin kopyalanması haqqında 15 üsul öyrənəcəksiniz. bir iş vərəqi və onu Excel-də VBA ilə digərinə yapışdırın.
Yuxarıda bu məqalənin nümunə kimi nəzərdən keçirəcəyi verilənlər toplusu var.
1. Məlumat diapazonunu bir iş vərəqindən digərinə kopyalamaq və yapışdırmaq üçün VBA makrosunu yerləşdirin
VBA ilə bir sıra verilənləri bir iş vərəqindən digərinə kopyalayıb yapışdırmaq üçün addımlar təsvir edilmişdir. aşağıda.
Addımlar:
- Əvvəlcə klaviaturanızda Alt + F11 düymələrini basın və ya nişanına keçin. Tərtibatçı -> Visual Basic Redaktoru açmaq üçün Visual Basic .
- Açılan kodda pəncərəsində, menyu çubuğundan Daxil et -> Modul .
- İndi aşağıdakı kodu kopyalayın vəExcel-də süzülmüş xanalar (4 üsul)
- İşləmə vaxtı xətası 1004: Diapazon sinfinin PasteSpecial metodu uğursuz oldu
- Əlaqəni necə yapışdırmaq və köçürmək olar Excel (8 sürətli üsul)
12. Kopyalanmış düsturu yuxarı diapazondan saxlayarkən sətiri diapazonun aşağısına yapışdırın
Dəyəri kopyalamaq və düsturu onun daxilində saxlamaq istədiyiniz zaman onu yapışdırarkən başqa bir sıra, sonra VBA kodu ilə tapşırığı asanlıqla yerinə yetirə bilərsiniz.
Addımlar:
- İlk olaraq Visual-ı açın. Əsas Redaktoru Developer tabından və Daxil edin a Modul kod pəncərəsində.
- İkincisi, aşağıdakıları kopyalayın kodu və onu kod pəncərəsinə yapışdırın .
6511
Kodunuz indi işləməyə hazırdır.
- Sonra bu kodu Çalışdırın və aşağıdakı şəklə baxın.
sonuncu cərgə tam olaraq kopyalanır. yanındakı cərgədə yerləşir.
Ətraflı oxuyun: Excel-də verilənləri avtomatik olaraq bir xanadan digər xanaya necə köçürmək olar
13. Açıq, lakin Saxlanmamış İş Kitabında Verilənləri Bir Vərəqdən Digər Vərəqə Replikasiya etmək üçün VBA
Nümunə iş kitabımızın adına diqqət yetirin, Mənbə İş Kitabı . Biz bu iş kitabından Dataset vərəqindən məlumatları kopyalayacağıq və onu Təyinat İş Kitabı adlı başqa bir iş kitabına yapışdıracağıq. açıq, lakin yadda saxlanmayıbhələ .
Addımlar:
- İlk olaraq, Visual Basic Redaktoru açın Developer nişanı və Daxil et a Module kod pəncərəsində.
- İkincisi, aşağıdakı kodu kopyalayın və yapışdırın onu kod pəncərəsinə.
4160
Kodunuz indi işləməyə hazırdır.
- Sonrakı, Bu kodu çalışdırın .
-dəki Dataset vərəqindən verilənlər Mənbə İş Kitabı indi Cədvəl1 vərəqində Təyinat İş Kitabında kopyalanır.
Ətraflı oxuyun: Excel VBA: Hüceyrə dəyərini kopyalayın və başqa hüceyrəyə yapışdırın
14. Açıq və Saxlanmış İş Kitabında Məlumatların Bir Vərəqdən Digər Vərəqə Yenidən Yaradılması üçün Makro
Bu dəfə biz verilənləri Dataset<19-dan kopyalayacağıq. Mənbə İş Kitabından > vərəqi və Yapışdırın -dəki Cədvəl2 iş vərəqinə> Təyinat İş Kitabı . Amma indi iş kitabı açıqdır və saxlanılır .
Addımlar:
- İlk olaraq Visual Basic Redaktoru<2 açın> Developer nişanından və Daxil edin kod pəncərəsində Modul .
- İkincisi, aşağıdakı kodu kopyalayın və onu kod pəncərəsinə yapışdırın .
8315
Kodunuz indi işə salınmağa hazırdır.
- Sonra bu kodu Çalışdırın .
Dataset vərəqindən verilənlər Mənbəİş kitabı indi Cədvəl2 vərəqində Təyinat İş Kitabı -a kopyalanır. Və adına baxın, bu iş kitabı bu dəfə saxlanıldı .
Ətraflı oxuyun: Formatı Dəyişmədən Excel-də Necə Kopyalama və Yapışdırmaq olar
15. Digər Qapalı İş Kitabında Bir İş Vərəqindən Digər İş Vərəqinə Məlumat Kopyalamaq və Yapıştırmaq üçün VBA tətbiq edin
Əvvəlki iki bölmədə biz başqa bir iş kitabında məlumatları bir iş vərəqindən digərinə kopyalayıb yapışdırmağı öyrəndik. açıq. Bu bölmədə biz iş kitabı bağlandıqda verilənləri kopyalayıb yapışdırmaq haqqında kodu öyrənəcəyik.
Addımlar:
- İlk olaraq, Developer nişanından Visual Basic Redaktoru açın və kod pəncərəsində Daxil edin Modulu edin.
- İkincisi, aşağıdakı kodu kopyalayın və yapışdırın kod pəncərəsinə.
9939
Sizin kodunuz artıq işə hazırdır.
- Sonra bu kodu Çalışdır .
Baxmayaraq ki, bu dəfə iş dəftəri bağlıdır, lakin hələ də kod icrasından sonra, Mənbə İş Kitabında Məlumat dəsti vərəqindən məlumatlar indi <-ə kopyalanır. 18>Cədvəl3 Təyinat İş Kitabında .
Daha çox oxuyun: Məlumatları Kopyalamaq üçün Excel VBA Açılmadan başqa bir iş kitabından
Yadda saxlanmalı olanlar
- 1-14-cü üsullar iş dəftərlərinizin olmasını tələb ediraçıldı . Bu üsullarda göstərilən makro kodları icra edərkən həm mənbə, həm də təyinat iş kitablarını açıq saxlamağı unutmayın.
- İş kitablarınız saxlanarkən faylın adını fayl növü ilə yazın kodun içərisində. iş kitabları saxlanmadıqda, faylın növü olmadan yalnız fayl adını yazın. Məsələn, iş kitabınız saxlanılıbsa , o zaman “ Təyinat. xlsx ” yazın, lakin əgər iş kitabı saxlanmayıb , sonra kodun içərisinə “ Təyinat ” yazın.
Nəticə
Bu məqalə sizə VBA ilə Excel-də verilənləri bir iş vərəqindən digərinə kopyalayıb yapışdırmağı göstərdi. Ümid edirəm bu məqalə sizin üçün çox faydalı oldu. Mövzu ilə bağlı hər hansı sualınız olarsa, çekinmeyin.
onu kod pəncərəsinə yapışdırın.8592
Kodunuz indi işə salınmağa hazırdır.
Bu kod parçası B2-dən F9 -ə qədər olan diapazonu Dataset adlı vərəqdən kopyalayacaq və B2 diapazonunda olanları yapışdıracaq. CopyPaste adlı vərəqdə .
- Sonra klaviaturanızda və ya menyudan F5 düyməsini basın. bar seçin Çalış -> Sub/UserForm -u işə salın. Siz həmçinin makronu işə salmaq üçün alt menyu çubuğundakı kiçik Oynatma işarəsinə klikləyə bilərsiniz.
Aşağıdakı şəklə baxın .
Nəhayət, Dataset vərəqindəki bütün məlumatlar indi Copy Paste<-ə kopyalanır. Excel iş dəftərimizdə 19> vərəqi.
Ətraflı oxuyun: Excel VBA: Aralığı başqa bir iş kitabına kopyalayın
2 . Excel-də bir aktiv iş vərəqindən digərinə verilənlərin kopyalanması və yapışdırılması üçün VBA makrosu
Əvvəlki bölmədə biz iş vərəqinin aktivləşdirilməsini tələb etmirdik. Lakin bu bölmədə biz aktiv iş vərəqində verilənləri kopyalayıb yapışdırmağı öyrənəcəyik.
Addımlar:
- Eyni şəkildə əvvəlki kimi, Developer nişanından Visual Basic Redaktoru açın və kod pəncərəsində Daxil edin Modulu .
- Kod pəncərəsində, aşağıdakı kodu kopyalayın və yapışdırın .
7084
Kodunuz indi işləməyə hazırdır.
- Sonra, yuxarıda göstərildiyi kimi kodu Çalışdırın və nəticəyə aşağıdakı şəkildə baxınşəkil.
Bu dəfə Dataset vərəqindəki bütün məlumatlar indi -ə kopyalanır. Məlumatı kopyalamadan əvvəl aktivləşdirdiyimiz Yapışdırın vərəqi.
Daha çox oxuyun: Mətni bir xanadan digər vərəqə kopyalamaq üçün Excel düsturu
3. VBA Makro ilə Excel-də Tək Hüceyrəni Bir İş Vərəqindən Digərinə Kopyalayın və Yapıştırın
Yuxarıdakı bölmələrdə siz bir sıra verilənləri bir iş vərəqindən digərinə kopyalayıb yapışdırmağı öyrəndiniz. İndi Excel cədvəlinizdə bir məlumat parçası olduqda kopyalayıb yapışdırmağın yollarını görəcəksiniz.
Aşağıdakı şəkilə baxın, Aralıq vərəqi yalnız bir dəyərdən ibarətdir.
Bu bir xananı kopyalayıb digərinə necə yapışdıra biləcəyimizi görəcəyik. VBA ilə Excel-də vərəq .
Addımlar:
- Yuxarıda göstərildiyi kimi, Visual Basic Redaktoru Developer nişanından və Daxil edin kod pəncərəsində Modul .
- Kod pəncərəsində aşağıdakıları kopyalayın kodu və yapışdırın
9328
Kodunuz indi işə salınmağa hazırdır.
- Sonrakı, Bu kod parçasını çalışdırın və aşağıdakı şəklə diqqət yetirin.
Həmin tək data “ Bu Xananı Kopyalayın<19 Dataset vərəqindəki B4 xanasındakı> ” indi CopyRange vərəqində kopyalanır Cell B2 .
Daha çox oxuyun: Yalnız Kopyalamaq üçün Excel VBATəyinat üçün dəyərlər (Makro, UDF və UserForm)
4. Excel Makro-da PasteSpecial metodu ilə kopyalanan məlumatları bir iş vərəqindən digərinə yapışdırın
Siz bir iş vərəqindən verilənləri kopyalaya və onları Excel-in PasteSpecial<2 ilə müxtəlif yollarla yapışdıra bilərsiniz> metodu VBA ilə. Bunu etmək üçün addımlar aşağıda verilmişdir.
Addımlar:
- İlk olaraq, Tərtibatçıdan Visual Basic Redaktoru açın. nişanı və Daxil edin kod pəncərəsində Modulu .
- İkincisi, aşağıdakı kodu kopyalayın və yapışdırın onu kod pəncərəsinə daxil edin.
2521
Kodunuz indi işləməyə hazırdır.
- Sonra, Çalışdır bu kod parçası.
Yuxarıdakı şəklə baxın. Dataset vərəqindəki məlumatlar indi Excel-də PasteSpecial vərəqinə köçürülür.
Daha çox oxuyun : VBA Dəyərləri və Formatları Excel-də Kopyalamaq üçün Xüsusi Yapışdırın (9 Nümunə)
5. Excel-də bir iş vərəqindən digərinə son xananın altındakı verilənlərin kopyalanması və yapışdırılması üçün makro
Bizdə artıq Məlumat dəsti vərəqində bəzi məlumatlar var (bölmədə göstərilmişdir) giriş bölməsi). İndi bu bölmənin qarşıdan gələn hissəsinə baxın. İndi Son Hüceyrə adlı başqa vərəqdə bəzi yeni məlumatlarımız var.
Burada etmək istədiyimiz şey xüsusi məlumatları (B5-dən F9-a qədər) Dataset vərəqindən kopyalayın və -də olanları yapışdırın.bu Son Hüceyrə vərəqinin son xanasının altında.
Addımlar:
- Birincisi, Developer nişanından Visual Basic Redaktoru açın və kod pəncərəsində Daxil edin Modulu .
- İkincisi, aşağıdakı kodu kopyalayın və yapışdırın kod pəncərəsinə.
6766
Sizin kodunuz artıq işə hazırdır.
- Sonra bu kodu Çalışdırın . Aşağıdakı şəklə baxın.
Burada, Dataset vərəqindən yalnız seçilmiş data indi <1-dir>Excel-də Son Xana vərəqinin sonuncu xanasının altına kopyalanıb.
Ətraflı oxuyun: Excel-də Dəyərləri Kopyalama və Yerləşdirmə Düsturu ( 5 Nümunələr)
6. VBA makrosu əvvəlcə iş vərəqini təmizləmək üçün, sonra başqa bir iş vərəqinə kopyalayın və yapışdırın
Mövcud vərəqinizdə səhv məlumatınız varsa və oradan orijinal məlumatları çıxarmaq istəyirsinizsə nə etməli?
Aşağıdakı şəkilə baxın. Biz verilənləri Clear Range vərəqindən təmizləyəcəyik və burada Dataset vərəqindəki məlumatları VBA kodu ilə saxlayacağıq.
Addımlar:
- İlk olaraq Developer nişanından Visual Basic Redaktoru açın və Daxil edin kod pəncərəsində Module .
- İkincisi, aşağıdakı kodu kopyalayın və yapışdırın kod pəncərəsinə.
7412
Sizin kodunuz indi işləməyə hazırdır.
- Sonra bu kod parçasını Çalışdırın . Baxaşağıdakı şəkil.
Təmizləmə Aralığı vərəqindəki əvvəlki məlumatlar indi
Ətraflı oxuyun: Meyarlara əsasən verilənlərin bir iş kitabından digərinə kopyalanması üçün makro
7. Range.Copy Funksiyası ilə Verilənləri Bir İş Vərəqindən Digərinə Kopyalamaq və Yapışdırmaq üçün Makro
İndi biz VBA kodu öyrənəcəyik. Excel-də Range.Copy funksiyası ilə bir iş vərəqi digərinə .
Addımlar:
- İlk olaraq <1-i açın. Developer nişanından>Visual Basic Redaktor və kod pəncərəsində Daxil edin Modul .
- İkincisi, kopyalayın aşağıdakı kodu və yapışdırın kod pəncərəsinə.
7359
Sizin kodunuz indi işə hazırdır.
- Sonra, bu kod parçasını Çalışdırın və aşağıdakı şəklə baxın.
Biz məlumatları uğurla təkrarladıq. Range.Copy funksiyası ilə Copy Range vərəqindəki Dataset vərəqi.
Daha çox oxuyun: Xüceyrə dəyərini başqa bir hüceyrəyə kopyalamaq üçün Excel düsturu
Oxşar oxumalar
- Meyarlara əsasən sətirləri başqa bir iş vərəqinə köçürmək üçün Excel VBA
- Dəyərləri yalnız yapışdırmaq üçün VBA-dan istifadə edin y Excel-də Formatsız
- Yalnız Excel-də Görünən Xanaları Kopyalama və Yerləşdirmə (3 Asan Yol)
- Kopyala və YapıştırExcel-də işləmir (9 Səbəb və Həllər)
- Makrodan istifadə edərək Excel-də Çoxlu Sətirləri Necə Kopyalamaq (4 Nümunə)
8. USEDRANGE Mülkiyyəti ilə Bir İş Vərəqindən Digərinə Verilənlərin Dublikatını etmək üçün Makro Kod tətbiq edin
Bu dəfə biz VBA kodunu verilənlərin birindən kopyalayıb yapışdırmağı öyrənəcəyik. iş vərəqini Excel-də UsedRange atributuna malik başqasına keçirin.
Addımlar:
- İlk olaraq Visual Basic proqramını açın. Redaktoru Developer tabından və Daxil edin a Module kod pəncərəsində.
- İkincisi, aşağıdakı kodu kopyalayın və onu kod pəncərəsinə yapışdırın .
4585
Kodunuz indi işə salınmağa hazırdır.
- Sonra, bu kod parçasını Çalışdır .
Yuxarıdakı şəkildə gördüyümüz kimi, uğurla kopyalayıb yapışdırdıq. USEDRANGE xassəsi ilə UsedRange vərəqindəki Dataset vərəqindən verilənlər.
Ətraflı oxuyun: Excel-də birdən çox xanada eyni dəyəri necə kopyalamaq olar (4 üsul)
9. Excel-də seçilmiş verilənləri bir vərəqdən digərinə kopyalamaq və yapışdırmaq üçün VBA makrosu
Siz VBA ilə yalnız bəzi seçilmiş məlumatları bir iş vərəqindən digərinə kopyalaya və yapışdıra bilərsiniz 2>. Bunu etmək üçün addımlar aşağıda göstərilmişdir.
Addımlar:
- İlk olaraq, Developer<-dən Visual Basic Redaktoru açın. 2> nişanı və Daxil et a Modulu daxil edinkod pəncərəsi.
- İkincisi, aşağıdakı kodu kopyalayın və yapışdırın kod pəncərəsinə.
1517
Kodunuz indidir. işə hazırdır.
Bu kod yalnız B4-dən F7-ə qədər olan diapazonu Məlumat dəsti vərəqindən kopyalayacaq və onları bura yapışdıracaq. B2 diapazonu PasteSelected adlı vərəqdə .
- Sonrakı, Bu kodu çalışdırın .
Nəhayət, Dataset vərəqindən yalnız seçilmiş data uğurla kopyalanır və Excel iş kitabında Seçilənləri Yapışdırın vərəqinə yapışdırılır.
Ətraflı oxuyun: VBA PasteSpecial və Necə Tətbiq olunur Excel-də mənbə formatını saxla
10. Birinci boş sətirdə verilənlərin bir iş vərəqindən digərinə təkrarlanması üçün makro kod
Burada biz verilənlərin Məlumat dəsti <19-dan necə kopyalanacağını görəcəyik> vərəq və VBA ilə Excel-də başqa iş vərəqindəki ilk boş xanada olanları yapışdırın.
Addımlar:
- İlk olaraq, Developer nişanından Visual Basic Redaktoru açın və Daxil edin Modulu kod pəncərəsində.
- İkincisi, aşağıdakı kodu kopyalayın və yapışdırın kod pəncərəsinə.
6956
Kodunuz indi işlətməyə hazırdır.
- Sonra, bu kod yığınını Çalışdır .
Yuxarıdakı şəkilə baxın. Cədvəl13 tamamilə boş idi. Nəticədə icra edilən kod yapışdırıldıExcel-də Cədvəl13 vərəqinin ən birinci xanasında Dataset vərəqindən kopyalanmış məlumatlar.
Ətraflı oxuyun: Excel VBA ilə Dəyərləri Kopyalayın və Növbəti Boş Sıraya Yapışdırın (3 Nümunə)
11. Avtomatik filtrlənmiş verilənləri bir Excel vərəqindən digərinə kopyalamaq və yapışdırmaq üçün VBA-nı yerləşdirin
Biz mənbə məlumat dəstini süzgəcdən keçirə və yalnız süzülmüş verilənləri başqa bir iş vərəqinə kopyalayıb yapışdıra bilərik Excel. Bunu VBA ilə addım-addım necə edəcəyinizi öyrənmək üçün bu məqaləni izləyin.
Addımlar:
- İlk olaraq -i açın. Developer nişanından Visual Basic Redaktoru və kod pəncərəsində Daxil edin Modulu .
- İkincisi, nüsxələyin aşağıdakı kodu edin və onu kod pəncərəsinə yapışdırın .
6771
Kodunuz indi işə salınmağa hazırdır.
- Sonra bu kodu Çalışdırın . Yalnız “ Dean ” olan sətir filtrlənəcək və başqa vərəqə kopyalanacaq.
Yuxarıdakı şəkildə diqqət yetirin. İndi B Sütun -dən yalnız süzülmüş “ Dean ” məlumatı kopyalanır və Vərəq15 vərəqinə yapışdırılır .
Ətraflı oxuyun: VBA (7 Metod) istifadə edərək Excel-də Necə Kopyalama və Yerləşdirmə
Oxşar Oxumalar
- Excel VBA ilə Görünən Sətirləri Avtofiltrləmə və Kopyalama
- Unikal Dəyərləri Exceldə Başqa İş Vərəqinə Kopyalayın (5 Metod)
- Birləşdirilmiş və
