Екцел ВБА ФрееФиле
ФрееФиле је функција у ВБА која је доступна само као ВБА функција, а не као функција радног листа. ВБА ФрееФиле функција враћа јединствени целобројни број у датотеку, која се отвара и чува следећи доступан број датотеке.
Датотеке обично отварамо са рачунара да бисмо нешто написали или само за читање, а позивајући се на те датотеке, морамо се позивати јединственим целобројним бројем. Функција ВБА ФрееФиле омогућава нам да одредимо тај јединствени целобројни број који ћемо доделити отварању датотеке за читање, писање и отварање датотека помоћу ВБА.

Сада погледајте синтаксу изјаве ОПЕН.
ОТВОРЕНО (Адреса путање датотеке) за (Начин отварања) Као (Број датотеке)
Адреса пута до датотеке : Морамо да напоменемо адресу датотеке на рачунару коју покушавамо да отворимо.
Начин за отварање: Отварајући датотеку, морамо знати какав ћемо модел применити. Овде можемо користити три начина, „Инпут Моде“, „ОутПут Моде“ и „Аппенд Моде“.
Режим уноса за читање само датотеке.
Излазни режим за брисање постојећих података и уметање нових података.
Режим додавања за додавање нових података уз задржавање постојећих података.
Број датотеке: Овим аргументом можемо се позвати на датотеку коју отварамо - ту функција „ФрееФиле“ игра виталну улогу и враћа јединствени целобројни број.
Како се користи функција ФрееФиле у програму Екцел ВБА?
Сада погледајте доњи код.
Шифра:
Под ФрееФиле_Екампле1 () Затамни путању као низ Затамни број датотеке као целу путању = "Д: Чланци 2019 Датотека 1.ткт" Број_фреме = Отворена путања ФрееФиле-а за излаз као Датотека броја датотеке = "Д: Чланци 2019 Датотека 2.ткт "ФилеНумбер = ФрееФиле Опен Патх за излаз као ФилеНумбер Енд Суб

Сада ми дозволите да декодирам горњи код да бисте га разумели.
Прво, прогласио сам две променљиве.
Затамни путању као низ, пригуши број датотеке као цео број
Тада сам доделио путању до датотеке са њеним именом.
Путања = "Д: Чланци 2019 Датотека 1.ткт"
Тада сам за још једну променљиву доделио функцију ФРЕЕФИЛЕ.
ФилеНумбер = ФрееФиле
Тада сам користио изјаву Опен да отворим текстуалну датотеку у датотеци поменутој горе.
Отворите путању за излаз као број датотеке
Ок, сада ћу покренути код по ред притиском на тастер Ф8 и видети вредност променљиве „Број датотеке“.

Приказује број датотеке као 1. Дакле, функција бесплатне датотеке аутоматски резервише овај број у почетној датотеци. Док се ово покреће, не отварају се друге датотеке.
Сада ћу наставити да извршавам следећи ред ВБА кода и видећу који је број датотеке ако пређем на следећи ред.

Сада пише 2. Дакле, функција ФрееФиле задржава јединствени цели број 2 за другу отварајућу датотеку.
Функција ФрееФиле увек даје 1 ако затворимо Екцел датотеку.
Једна ствар коју морамо да погледамо је да ВБА функција „ФрееФиле“ увек враћа ако затворимо отворену датотеку пре него што отворимо другу екцел датотеку.
На пример, погледајте доњи код.
Шифра:
Под ФрееФиле_Екампле2 () Затамни путању као низ Затамни број датотеке као целобројни пут = "Д: Чланци 2019 Датотека 1.ткт" Број датотеке = ФрееФиле Отвори путању за излаз као број датотеке Затвори путању броја датотеке = "Д: Чланци 2019 Датотека 2 .ткт "Број датотеке = Отворени пут датотеке ФрееФиле за излаз као број датотеке Затвори број датотеке Заврши крај

Сада ћу поново извршити код по ред притиском на тастер Ф8.

Каже 1 као и обично.
Сада ћу напредовати на следећи ниво.

Чак иу другом покушају каже 1.
Разлог за то је што смо користили наредбу Цлосе филе, ФрееФиле препознаје новоотворену датотеку као нову и враћа цео број као 1.