Како да се отвори работна книга со име на променлива со Excel VBA

Hugh West

10-08-2023 Макроа & засилувач; Excel VBA
  • Споделете Го Ова
Hugh West

Содржина

Нормално, можеби ќе треба да ја отвориме датотеката од матична датотека Excel користејќи VBA во друг директориум. Но, во исто време, имаме различни видови критериуми и за тоа како сакаме да ја отвориме работната книга. Ако сте љубопитни да знаете како можете да отворите работна книга со името на променливата, тогаш овој напис можеби ќе ви се најде. Во оваа статија, разговараме за тоа како можете да отворите работна книга со име на променлива користејќи VBA во Excel со детални објаснувања.

Преземете ја работната книга за вежбање

Преземете ја оваа работна книга за вежбање подолу.

Отвори работна книга со име на променлива користејќи VBA.xlsm

Sample.xlsx

4 Лесно Начини за отворање работна книга со име на променлива користејќи VBA во Excel

Ќе ја користиме долунаведената база на податоци за демонстрација. Имаме информации за производот на неколку производи со нивниот ИД. ова е примерок од датотека што ќе ја отвориме со помош на кодот VBA.

1. Користење на работната книга. Отворете ја сопственоста

Користење на Работната книга Својство .Open , можеме да отвориме датотеки со спомнување на директориумот или не споменување на локацијата. Исто така, можеме да ја направиме отворената датотека само за читање.

1.1 Отворете ја патеката за спомнување на датотеката за работна книга

Во следниот метод, ќе ја користиме Работната книга. Отвори сопственост за да ја отворите датотеката директно од споменатиот директориум за локација на датотеката. Без разлика каде се наоѓа датотеката, можеме да ја отвориме датотекаташто е Sub Open_File_with_Add_Property()

⮚ Потоа ја декларираме променливата File_Path како String тип.

4174

⮚ И поставете ја променливата File_Path на локацијата на датотеката.

2824

⮚ Декларираме wb како променлива во типот Работна книга .

9991

⮚ Работната книга потоа се додава од директориумот зачуван во локацијата File_Path користејќи го својството Workbook.Add .

8255

⮚ Конечно, завршуваме под-процедурата на овој код.

Прочитај повеќе: [Поправено!] Методот Отворен на работните книги на објектот не успеа (4 решенија)

Заклучок

Да резимираме, прашањето за тоа како можеме да отвориме работни книги со имиња на променливи користејќи VBA е одговорено со 4 различни примери. Методот VBA Macro бара претходно знаење поврзано со VBA за да се разбере од нула.

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

Слободно поставувајте какви било прашања или повратни информации преку делот за коментари. Секој предлог за подобрување на заедницата Exceldemy ќе биде многу ценет

лесно.

Чекори

  • Имаме датотека зачувана во папката документи која треба да ја отвориме.
  • Ќе ја користиме датотеката именувајте како променлива и потоа отворете ја датотеката користејќи мало VBA макро.
  • Точниот директориум на датотеката на датотеката е прикажан подолу во прозорецот со својства.

  • Прво, одете во картичката Програмер и кликнете на Visual Basic . Ако го немате тоа, мора да го овозможите табот Програмери . Или, исто така, можете да притиснете ' Alt+F11' за отворање на Visual Basic Editor .

  • Потоа ќе има нов дијалог прозорец, во тој дијалог прозорец, кликнете на Вметни > Модул .

  • Следно, во прозорецот за уредување Module , напишете го следниов код: 
3209

  • Потоа затворете го Модул прозорец.
  • Потоа, одете во табулаторот Преглед > Макроа .
  • Потоа кликнете на Преглед Макроа .

  • Откако ќе кликнете Преглед на макроа, изберете ги макроата што ги создадовте сега. Името овде е Open_with_File_Path . Потоа кликнете Стартувај .

  • Потоа ќе се отвори датотеката Sample .

🔎 Разложување на кодот 

9668

⮚ Прво, даваме име за под- процедура која е Open_with_File_Path .

9434

⮚ Потоа, ја ставаме локацијата на датотеката во променливата File_Path 

4308

⮚Потоа, ја декларираме нашата променлива wrkbk , чиј тип е работна книга.

3568

⮚ Потоа, ја отвораме датотеката именувана во променливата директориум File_Path и ја поставуваме датотеката како променлива wrkbk .

8913

⮚ Конечно, ја завршуваме под-постапката на овој код.

Прочитајте повеќе: Како да Отворете ја работната книга од патека користејќи Excel VBA (4 примери)

1.2 Отворете ја работната книга без споменување на патеката на датотеката

Во следниот метод, ќе ја отвориме датотеката од матичната папка, каде што главната датотека е зачувана. Датотеката може да се отвори без да се спомене која било локација во кодот. Оваа датотека само треба да биде во истата папка со матичната папка.

Чекори

  • Имаме друга датотека зачувана во истиот директориум каде што родителот Excel датотеката сега е зачувана.
  • Името на датотеката е 1.

  • Прво, одете во Програмер картичката и кликнете на Visual Basic . Ако го немате тоа, мора да го овозможите табот Програмери . Или, исто така, можете да притиснете „ Alt+F11 “ за да го отворите Уредникот на Visual Basic .

  • Потоа ќе има нов дијалог прозорец, во тој дијалог прозорец, кликнете на Вметни > Модул .

  • Следно, во прозорецот за уредување Module , напишете го следниов код: 
3560

  • Потоа затворете го Модул прозорец.
  • Потоа, одете во табулаторот Преглед > Макроа .
  • Потоа кликнете на ПрегледМакроа .

  • Откако ќе кликнете Прикажи макроа, изберете ги макроата што ги создадовте сега. Името овде е Open_without_File_Path . Потоа кликнете Стартувај.

  • Откако ќе притиснете Изврши , ќе забележите дека датотеката со име 1 сега е отворена.
  • И вака ја отвораме работната книга со име на променлива користејќи VBA во Excel.

🔎 Расчленување на Код 

8762

⮚ Прво, даваме име за под-процедурата што е Sub Open_without_File_Path() 

2566

⮚ Изјавуваме wrkbk како променлива во Работната книга тип

7675

⮚ Ја отвораме датотеката од родителскиот директориум со име 1.xlsx .

5440

⮚ Конечно, ја завршуваме под-постапката од овој код.

1.3 Отворете ја работната книга како само за читање

Методот е доста сличен на првиот метод, но овде ќе ја отвориме датотеката во режим само за читање, што значи дека нема да може да измени какви било податоци или вредност во датотеката Excel.

Чекори

  • Датотеката што сакаме да ја отвориме е зачувана во папката со документи.
  • И ова е датотеката што сакаме да ја отвориме како само за читање.

  • Прво, одете во Програмер табот и кликнете на Visual Basic . Ако го немате тоа, мора да го овозможите табот Програмери . Или, исто така, можете да притиснете „ Alt+F11 “ за отворање на уредувачот на Visual Basic.

  • Потоа ќе има нов дијалог прозорец, во тој дијалог прозорец, кликнете на Вметни > Модул .

  • Следно, во прозорецот на уредникот Модул , напишете следниот код: 
1360
  • Потоа затворете го прозорецот Module .
  • Потоа, одете во табулаторот Преглед > Макроа .
  • Потоа кликнете на Прегледај макроа .

  • По кликнување на Прикажи Макроа, изберете ги макроата што ги создадовте сега. Името овде е Open_with_File_Read_Only . Потоа кликнете Изврши .

  • Откако ќе кликнете на Изврши , ќе видиме дека датотеката сега е отворена како само за читање, како што е прикажано во лентата за наслов.

🔎 Разложување на кодот 

8113

⮚ Прво, даваме име за под-процедурата што е Open_with_File_Read_Only() 

1765

⮚ Изјавуваме wrkbk како променлива во типот на работна книга

2879

⮚ Потоа датотеката ќе се отвори од назначениот директориум, а датотеката ќе биде поставена само за читање со последниот аргумент.

5314

⮚ Конечно, го завршуваме под-процедура на овој код.

Прочитај повеќе: Како да се отвори работна книга како само за читање со Excel VBA

2. Користење на полето за пораки

Речиси слично на претходниот метод, можеме да отвориме датотеки преку VBA кодот овде во Excel, но во овој случај, тука ќе вградиме мало поле за пораки.

Чекори

  • Прво, одете во картичката Програмер и кликнете на Visual Basic . Ако го немате тоа, мора да го овозможитеКартичка за програмери . Или, исто така, можете да притиснете ' Alt+F11' за отворање на Visual Basic Editor .

  • Потоа ќе има нов дијалог прозорец, во тој дијалог прозорец, кликнете на Вметни > Модул .

  • Следно, во прозорецот за уредување Module , напишете го следниов код: 
4749

  • Потоа затворете го Модул прозорец.
  • Потоа, одете во табулаторот Преглед > Макроа .
  • Потоа кликнете на Преглед Макроа .

  • Откако ќе кликнете Преглед на макроа, изберете ги макроата што ги создадовте сега. Името овде е Open_File_with_Messege_Box . Потоа кликнете Стартувај .

  • Потоа го добивме полето за предупредување, кое покажува дека Датотеката е успешно отворена .
  • Потоа кликнете OK .

  • И тогаш ќе видиме дека датотеката е сега отворете.

  • И потоа се обидуваме малку да го смениме кодот.
  • Го менуваме името на датотеката во Sample10 , а всушност нема датотека со име Sample10 во папката документи.

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

Open_with_File_Read_Only() 

4062

⮚ Ниедекларирај го wrkbk како променлива во работната книга type 

8253
8150

⮚ Оваа линија ќе провери дали датотеката со име Sample е достапна во директориумот или не, ако датотеката е таму, тогаш ќе отворете ја датотеката и во исто време ќе ја прикаже пораката.

8727

⮚ Ако во директориумот нема датотека со име Примерок , тогаш оваа порака ќе биде доставена.

6569

⮚ Конечно, ја завршуваме потпроцедурата на овој код.

2341

⮚ Конечно, ја завршуваме потпроцедурата на овој код.

Прочитај повеќе: Како да се отвори работна книга и да се изврши макро користејќи VBA (4 примери)

3. Употреба на полето за дијалог за отворање датотека

Извлекување на директориумот за локација на датотеката и нивно увезување секој пат во VBA кодот е прилично тежок. За да го решиме проблемот, ќе покажеме како можете да користите дијалог-кутија за да изберете датотека од кој било директориум.

Чекори

  • Сега ќе ја отвориме датотеката користејќи го прозорецот за дијалог за истражувач на датотеки.
  • Прво, одете во картичката Програмер и кликнете на Visual Basic . Ако го немате тоа, мора да го овозможите табот Програмери . Или, исто така, можете да притиснете ' Alt+F11' за отворање на Visual Basic Editor .

  • Потоа ќе има нов дијалог прозорец, во тој дијалог прозорец, кликнете на Вметни > Модул .

  • Следно, во прозорецот на уредувачот Module , напишете го следниов код: 
3673
  • Потоа затворете го Модулот прозорец.
  • Потоа, одете во картичката Преглед > Макроа .
  • Потоа кликнете на Прикажи макроа .

  • Откако ќе кликнете Преглед на макроа, изберете ги макроата што ги создадовте сега. Името овде е Open_File_with_Dialog_Box . Потоа кликнете Стартувај .

  • И потоа се отвора нов прозорец. Во полето за дијалог за истражувач на датотеки и изберете Примерок и кликнете OK .

  • Потоа датотеката со име Примерокот отворен.
  • И вака ја отвораме работната книга со име на променлива користејќи VBA во Excel.

🔎 Разложување на кодот 

4849

⮚ Прво, даваме име за подпроцедурата што е Sub Open_File_with_Dialog_Box() 

1802

⮚ Го декларираме Dbox како променлива во FileDialog type

4085

⮚ Го декларираме File_Path како променлива во Патека_датотека Како Низа type 

6600

⮚ Ќе има дијалог прозорец од првата линија. Следниот ред го означува името на полето за дијалог и типот на датотеката.

⮚ Dbox.Title ќе го постави насловот на полето за дијалог. и FileType поставете го типот на датотеката.

2981

⮚ Dbox.Filters.Clear ќе го избрише секој претходен филтер применет во полето за дијагност

4325

⮚ Dbox.Show ќе направи дијалог прозорецот да се појави на датотеката.

⮚ Оваа линија ќе определи дали корисникот избрал повеќе од една датотека или не. Доколку корисникот избере повеќе одедна датотека, целата процедура би запрела.

1911

⮚ Конечно, ја завршуваме под-постапката на овој код.

Прочитај повеќе: Како да се отвори Папка и изберете датотека со користење на Excel VBA (4 примери)

4. Користење на работна книга. а потоа ќе го отвориме со помош на Работната книга. Додадете својство .

Чекори

  • Прво, одете во картичката Програмер и кликнете на Visual Basic . Ако го немате тоа, мора да го овозможите табот Програмери . Или, исто така, можете да притиснете ' Alt+F11' за отворање на Visual Basic Editor .

  • Потоа ќе има нов дијалог прозорец, во тој дијалог прозорец, кликнете на Вметни > Модул .

Следно, во прозорецот за уредување Модул , напишете го следниов код: 

9180
  • Потоа затворете го прозорецот Модул .
  • По тоа, одете во картичката Преглед > Макроа .
  • Потоа кликнете на Прегледајте макроа .

  • Откако ќе кликнете Преглед на макроа, изберете ги макроата што ги создадовте сега. Името овде е Open_File_with_Add_Property . Потоа кликнете Стартувај .

  • Откако ќе кликнете Изврши, ќе забележите дека сега е нова датотека создадена и отворена.

🔎 Разбивање на кодот

⮚ Прво, обезбедуваме име за под-постапката

Претходен пост Како да креирате формулар со паѓачка листа во Excel
Следен пост Непречено лизгање со тркало на глувчето во Excel (детална анализа)

Хју Вест е високо искусен тренер и аналитичар на Excel со повеќе од 10 години искуство во индустријата. Има диплома за сметководство и финансии и магистер по бизнис администрација. Хју има страст за предавање и има развиено уникатен пристап на наставата кој е лесен за следење и разбирање. Неговото стручно познавање на Excel им помогна на илјадници студенти и професионалци ширум светот да ги подобрат своите вештини и да се истакнат во нивните кариери. Преку својот блог, Хју го споделува своето знаење со светот, нудејќи бесплатни упатства за Excel и онлајн обука за да им помогне на поединците и бизнисите да го достигнат својот целосен потенцијал.