Екцел ВБА ФрееФиле

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

Шта је функција ВБА ФрееФиле?

ВБА ФрееФиле је функција која је категорисана под ВБА функцијом која омогућава систему да резервише број за следећу датотеку која ће се отворити под ВБА излазним датотекама за неометано искуство кодирања и смањење непотребних грешака у вашем коду. Када отворите датотеку преко ВБА датотеке ИО (улаз / излаз), постаје апсолутно обавезно доделити јединствени број тој датотеци, јер ћете можда имати више датотека на локацији коју намеравате да користите за читање, писање и отварање кроз своју код. Како систем зна која датотека из свих оних које желите да отворите? Функција ВБА ФрееФиле идентификује јединствени број који доделимо датотеци и омогућава вам отварање, читање или писање у ВБА.

Синтакса за функцију ФрееФиле је како слиједи:

Ова функција узима само један аргумент РангеНумбер који има стандардне вредности као нула (0) и један (1). Ако наведете нулу, број датотеке ће се додељивати кроз распон бројева од 1 до 255, корак по корак за сваку датотеку коју отворите. Ако је одредите, број датотеке ће се додељивати корак по распону од 256 до 511 за сваку датотеку коју отворите. Ако није наведен РангеНумбер, нула ће се подразумевано сматрати.

Како се користи функција ФрееФиле у Екцелу ВБА?

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

Можете преузети овај предложак ВБА ФрееФиле Екцел овде - ВБА Шаблон ФрееФиле Екцел

ВБА ФрееФиле - пример бр. 1

Следите доле наведене кораке за употребу функције ФрееФиле у Екцелу ВБА.

1. корак: Отворите нови Висуал Басиц Едитор (ВБЕ) кликом на дугме Висуал Басиц испод картице Девелопер присутне у вашој Екцеловој датотеци или истовремено притиском на тастер Алт + Ф11 .

Корак 2: Уметните нови модул у ВБЕ. Кликните на дугме Убаци . Изаберите Модул са листе опција доступних у Инсерт.

Корак 3: Дефинишите нови под-поступак који може садржати ваш макро.

Шифра:

 Суб Пример_1 () Крај Суб

Корак 4: Дефинишите две нове променљиве, филе_1 и филе_2 као цео број. Ове две променљиве садрже бројеве које доделимо свакој датотеци коју отворимо у макронаредби.

Шифра:

 Суб Пример_1 () Дим филе_1 Као Интегер Дим филе_2 Као Интегер Енд Суб

Корак 5: Користите оператер додјеле да додијелите цијелу вриједност 1 датотеци_1 варијабли уз помоћ ВБА ФрееФиле.

Шифра:

 Суб Пример_1 () Дим филе_1 Као Интегер Дим филе_2 Као Интегер филе_1 = ФрееФиле Енд Суб

Корак 6: Сада користите изјаву Опен која се може користити за отварање датотеке у ВБА.

Шифра:

 Под-пример_1 () Дим филе_1 Као цела Дим филе_2 Као целокупна датотека_1 = ФрееФиле Отвори "Д: \ Екцел садржај за писање \ тектФиле_1.ткт" за излаз као фајл_1 Заврши под

Овде смо одредили путању на којој се датотека налази. Изјава Фор даје вам опције попут начина на који желите да отворите датотеку (нпр. Као излаз), а изјава Ас одређује број датотеке који смо одредили помоћу ФрееФиле изјаве.

Корак 7: Следите Корак 5 и Корак 6 да доделите нови број другој датотеци кроз променљиву датотеку_2 и отворите је.

Шифра:

 Под-пример_1 () Дим филе_1 Као цела Дим филе_2 Као цела датотека_1 = = Отвори датотеку "Д: \ Писање садржаја у Екцелу \ ТектФиле_1.ткт" За излаз као фајл_1 датотека_2 = Слободно отварање датотеке "Д: \ Писање садржаја програма Екцел \ ТектФиле_2.ткт" за излаз Као датотека_2 Крај Суб

Корак 8: Сада бисмо желели да видимо бројеве који су заиста додељени обема текстуалним датотекама. Можете покренути сваку линију једну по једну уз помоћ типке Ф8. Међутим, излаз вам неће бити видљив. Ни у Екцел датотеци ни у непосредном прозору. Молимо додајте следећу МсгБок изјаву која искаче оквир са порукама са бројевима сваке датотеке.

Шифра:

 Под-пример_1 () Дим филе_1 Као цела Дим филе_2 Као цела датотека_1 = = Отвори датотеку "Д: \ Писање садржаја у Екцелу \ ТектФиле_1.ткт" За излаз као фајл_1 датотека_2 = Слободно отварање датотеке "Д: \ Писање садржаја програма Екцел \ ТектФиле_2.ткт" за излаз Као филе_2 МсгБок "Вредност за филе_1 је:" & филе_1 & Цхр (13) и "Вредност за филе_2 је:" & филе_2 Крај пот

У овом ретку кода, први ред поруке садржи текст „вредност за филе_1 је:“ и бројчану вредност додељену функцијом ФрееФиле. Цхр (13) дозвољава појављивање следећег ретка. Следећи ред оквира за поруке гласи „Вредност за датотеку_2 је:“ и број додељен другој датотеци.

Корак 9: Покрените овај код притиском на дугме Покрени или притиском на тастер Ф5.

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

ВБА ФрееФиле - пример бр. 2

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

Корак 1: Дефинишите нови под-поступак који може садржати ваш макро.

Шифра:

 Суб Пример_2 () Крај Суб

Корак 2: Дефинишите две променљиве филе_1 и филе_2 као цео број унутар ново дефинисане потпоступке .

Шифра:

 Суб Пример_2 () Дим филе_1 Као Интегер Дим филе_2 Као Интегер Енд Суб

Корак 3: Сада користите ФрееФиле да доделите број датој датотеци, а Опен статемент отворите ту датотеку кроз локацију на којој је имамо.

Шифра:

 Под-пример_2 () Дим филе_1 Као Интегер Дим филе_2 Као Интегер филе_1 = ФрееФиле Опен "Д: \ Екцел Цонтент Вритинг \ ТектФиле_1.ткт" За излаз као филе_1 Енд Суб

Корак 4: Користите МсгБок изјаву да бисте додали оквир за поруку за број првих датотека.

Шифра:

 Под-пример_2 () Дим филе_1 Као цела Дим филе_2 Као целокупна датотека_1 = ОпенФиле Отвори "Д: \ Екцел садржај за писање \ ТектФиле_1.ткт" за излаз као фајл_1 МсгБок "Вредност за датотеку_1 је:" и датотека_1 крај под

Корак 5: Употријебите изјаву Цлосе да бисте затворили прву датотеку коју сте отворили путем ВБА.

Шифра:

 Под-пример_2 () Дим филе_1 Као Интегер Дим филе_2 Као целокупна датотека_1 = ОпенФиле Отвори "Д: \ Екцел садржај за писање \ ТектФиле_1.ткт" за излаз као датотеку_1 МсгБок "Вредност за датотеку_1 је:" & датотека_1 Затвори датотеку_1 Заврши под

Корак 6: Сада следите исти поступак као у 5. кораку, 6. кораку, 7. кораку, али за другу датотеку. То укључује доделу вредности променљивој датотеци_2 помоћу функције ФрееФиле и отварање је помоћу Опен изјаве, коришћењем МсгБок за приказ броја датотеке за другу датотеку и коначно затварање друге датотеке.

Шифра:

 Под-пример_2 () Дим филе_1 Као цела датотека Дим датотеке_2 Као целокупна датотека_1 = ОпенФиле Отвори "Д: \ Екцел садржај за писање \ ТектФиле_1.ткт" За излаз као датотеку_1 МсгБок "Вредност за датотеку_1 је:" и датотека_1 Затвори датотеку_1 датотека_2 = Слободна датотека отвори "Д : \ Екцел Цонтент Вритинг \ ТектФиле_2.ткт "За излаз као фајл_2 МсгБок" Вредност за филе_2 је: "& филе_2 Затвори датотеку_2 Крај Суб

Корак 7: Покрените овај код притиском на дугме Покрени или Ф5.

Прво поље с порукама представља вриједност датотеке_1 која се чини као 1. Друго поље за поруке представља вриједност датотеке_2 која такођер изгледа 1. Ова промјена је ту јер смо користили изјаву затварања да затворимо датотеке једну по једну. Због тога, приликом покретања нове датотеке, сваки пут када се стара датотека и њен број избришу из системске меморије, а следећа датотека ће се сматрати свежом датотеком са бројевима који почињу од 1.

Ствари које треба запамтити

  • ФрееФиле враћа јединствени цели број свакој датотеци коју отворимо, читамо, затворимо кроз ВБА датотеку ИО.
  • ФрееФиле има две вредности за аргумент РангеНумбер (који је опционалан). Нула обично додељује број између распона 1 до 255, а један додељује бројеве од 256 до 511.

Препоручени чланци

Ово је водич за ВБА ФрееФиле. Овде смо расправљали о томе како функција ФрееФиле омогућава да доделите број датотеци коју ћете отворити, прочитати, затворити кроз Екцел ВБА заједно са практичним примерима и бесплатним екцел шаблоном. Можете и да прођете кроз друге наше предложене чланке -

  1. ВБА Провјера датотеке постоји | Предложак Екцела
  2. ВБА претплата изван домета (примери)
  3. Функција ГетОбјецт у Екцелу ВБА
  4. Како користити формат броја у ВБА?
  5. ВБА Енвиронмент

Категорија:

ВБА