Բարեւ բոլորին,
Սա իմ առաջին հարցն է այս ֆորումում, որովհետև ես բախվեցի իսկական գլխաքորի:
Ես փորձում եմ հարմարեցնել VB կոդը, որը հրապարակվել է
https://www.extendoffice.com/documents/excel/3388-excel-import-multiple-text-csv-xml-files.html#a2 մի քանի CVS ֆայլեր ներմուծել նույն գրացուցակից և տեղադրել դրանք մեկ Excel աշխատաթերթի մեջ:
Աղբյուրի ֆայլերը բոլորը գտնվում են նույն թղթապանակում:
Աղբյուրի ֆայլերում կա տվյալների 3 սյունակ, բայց միայն 1 սյունակ պետք է ներմուծվի,
Ներմուծված տվյալները պետք է փոխադրվեն և տեղադրվեն թիրախային աշխատաթերթի հաջորդ դատարկ տողում:
Իմ փոփոխված կոդը այնքան խառնաշփոթ է, որ ես նույնիսկ չեմ ուզում այն տեղադրել այստեղ, բայց դուք կարող եք գտնել երկու նմուշ մուտքագրված CVS ֆայլ և կցված ցանկալի ելքային XLSX ֆայլ:
Շնորհակալություն բոլոր օգնության համար նախապես: