ВБА ФилеЦопи функција | Копирајте датотеку из једног директоријума у ​​други

Екцел ВБА ФилеЦопи функција

Копирање датотеке је уграђена вба функција која се користи за копирање датотеке са једне локације на другу поменуту локацију. Да бисмо користили ову функцију, морамо споменути тренутну путању датотеке и одредишну путању датотеке.

Ок, погледајмо синтаксу функције ФилеЦопи.

  • Извор: Ово није ништа друго до одакле треба копирати датотеку. Морамо споменути потпуно квалификовану путању до фасцикле.
  • Одредиште: Ово је одредишна фасцикла у коју треба да налепимо копирану датотеку.

Примери

Испод су примери како копирати датотеке помоћу ВБА кода.

Ову ВБА датотеку за копирање датотека Екцел можете преузети овде - ВБА датотеку за копирање датотека Екцел

Пример # 1

Почнимо са једноставним примером. У фасцикли имам датотеку под називом „Продаја у априлу 2019“. Испод је слика исте тј. „Извор”.

Са горње локације желим да копирам ову датотеку и налепите у другу фасциклу. Испод је слика исте тј. „Извор одредишта ”.

Ок, напишимо код за то.

Отвори ФилеЦопи функција унутар Суб поступка.

Шифра:

 Суб ФилеЦопи_Екампле1 ()

ФилеЦопи

Енд Суб

Сада за први аргумент, морамо споменути путању датотеке у којој се налази наша струја.

Шифра:

 Суб ФилеЦопи_Екампле1 ()

ФилеЦопи „Д: \ Ми Филес \ ВБА \ Април Филес

Енд Суб

Након помињања путање до директоријума, морамо споменути и датотеку са наставком датотеке. Дакле, спомените име датотеке стављањем косе црте (\).

Шифра:

 Суб ФилеЦопи_Екампле1 () ФилеЦопи "Д: \ Ми Филес \ ВБА \ Април Филес \ Салес Април 2019.клск", Енд Суб 

Сада у другом аргументу спомените где треба да налепимо копирану датотеку.

Шифра:

 Суб ФилеЦопи_Екампле1 () ФилеЦопи "Д: \ Ми Филес \ ВБА \ Април Филес \ Салес Април 2019.клск", "Д: \ Ми Филес \ ВБА \ Дестинатион Фолдер \ Салес Април 2019.клск" Енд Суб 

Једна ствар коју треба да урадимо у даљем тексту помињући путању до фасцикле на крају треба да наведемо и име датотеке у одредишном аргументу.

Сада покрените код помоћу тастера Ф5 или ручно, а затим ће копирати датотеку са доње локације на одредиште.

„Д: \ Моје датотеке \ ВБА \ Април Филес \ Продаја април 2019.клск“

„Д: \ Ми Филес \ ВБА \ Дестинатион Фолдер \ Салес Април 2019.клск“

Пример # 2 - Користите променљиве за складиштење изворне путање и одредишне путање.

У претходном примеру, изворну и одредишну путању дали смо директно у формулу. Али ово није најбоља пракса за наставак, па их похранимо у променљиве.

За пример погледајте доњи код.

Шифра:

 Суб ФилеЦопи_Екампле2 () Затамни СоурцеПатх као низ Затамни ДестинатионПатх као низ СоурцеПатх = "Д: \ Ми Филес \ ВБА \ Април Филес \ Салес Април 2019.клск" ДестинатионПатх = "Д: \ Ми Филес \ ВБА \ Дестинатион Фолдер \ Салес Април 2019. клск "ФилеЦопи СоурцеПатх, ДестинатионПатх Енд Суб 

Да вам детаљно објасним шифру.

Прво сам прогласио две променљиве.

 Пригуши изворни пут као низ Пригуши одредишни пут као низ 

Тада сам за прву променљиву доделио путању до фасцикле одакле мора да копира датотеку и име датотеке заједно са њеним наставком датотеке.

СоурцеПатх = "Д: \ Моје датотеке \ ВБА \ Април Филес \ Продаја април 2019.клск"

За другу променљиву слично, доделио сам путању до одредишне мапе са именом датотеке и екстензијом екцел.

ДестинатионПатх = „Д: \ Моје датотеке \ ВБА \ Одредишна мапа \ Продаја април 2019.клск“

Тада сам за формулу ФилеЦопи навео ове променљиве уместо дугачких низова путање директоријума.

ФилеЦопи СоурцеПатх, ДестинатионПатх

Овако, можемо користити променљиве за чување стаза и ефикасну употребу.

Пример # 3 - Грешка у функцији копирања датотеке

Понекад функција копирања датотеке наиђе на грешку „Дозвола одбијена“.

Разлог зашто добијамо ову грешку јер када се отвори датотека за копирање и ако покушате да копирате горњу грешку, увек затворите датотеку и извршите код.