Com obrir el llibre de treball amb nom de variable amb Excel VBA

Hugh West

10-08-2023 Macros i amp; Excel VBA
  • Comparteix Això
Hugh West

Naturalment, és possible que hàgim d'obrir el fitxer des d'un fitxer Excel principal mitjançant VBA en un directori diferent. Però al mateix temps, tenim diversos tipus de criteris també sobre com volem obrir el llibre de treball. Si teniu curiositat per saber com podeu obrir un llibre de treball amb el nom de la variable, aquest article us pot resultar útil. En aquest article, expliquem com podeu obrir un quadern de treball amb un nom de variable mitjançant VBA a Excel amb explicacions elaborades.

Baixeu el quadern de pràctiques

Descarregueu aquest quadern de pràctiques a continuació.

Obre el llibre de treball amb nom de variable mitjançant VBA.xlsm

Sample.xlsx

4 Fàcil Maneres d'obrir el llibre de treball amb nom de variable mitjançant VBA a Excel

Utilitzarem el conjunt de dades següent per a la demostració. Tenim la informació del producte de diversos productes amb el seu identificador. aquest és un fitxer de mostra que obrirem amb el codi VBA.

1. Utilitzant Workbook.Open Property

Utilitzant el Workbook Propietat .Open , podem obrir fitxers esmentant el directori, o sense esmentar la ubicació. També podem fer que el fitxer obert sigui només de lectura.

1.1 Obriu el llibre de treball que esmenta la ruta del fitxer

En el següent mètode, utilitzarem la Propietat Workbook.Open per obrir el fitxer directament des del directori d'ubicació del fitxer esmentat. No importa on es trobi el fitxer, podem obrir-loque és Sub Open_File_with_Add_Property()

⮚ A continuació, declarem la variable File_Path com a String tipus.

9985

⮚ I establiu la variable File_Path a la ubicació del fitxer.

9174

⮚ Declarem wb com a variable al tipus Workbook .

7821

⮚ A continuació, s'afegeix el llibre de treball des del directori emmagatzemat a la ubicació File_Path mitjançant la propietat Workbook.Add .

4771

⮚ Finalment, acabem el subprocediment d'aquest codi.

Llegir més: [Fixat!] Mètode d'obertura dels llibres de treball d'objectes ha fallat (4 solucions)

Conclusió

En resum, la qüestió de com podem obrir llibres de treball amb noms de variables mitjançant VBA es respon aquí amb 4 exemples diferents. El mètode VBA Macro requereix coneixements previs relacionats amb VBA per entendre-ho des de zero.

Per a aquest problema, hi ha disponible un quadern de treball habilitat per a macros per baixar on podeu practicar. aquests mètodes.

No dubteu a fer qualsevol pregunta o comentari a través de la secció de comentaris. Qualsevol suggeriment per millorar la comunitat Exceldemy serà molt apreciable

fàcilment.

Pasos

  • Tenim un fitxer emmagatzemat a la carpeta de documents que hem d'obrir.
  • Utilitzarem el fitxer nom com a variable i, a continuació, obriu el fitxer amb una petita macro VBA.
  • El directori de fitxers exactes del fitxer es mostra a continuació a la finestra de propietats.

  • Primer, aneu a la pestanya Desenvolupador i feu clic a Visual Basic . Si no ho teniu, heu de activar la pestanya Desenvolupador . O també podeu prémer " Alt+F11" per obrir l' Editor de Visual Basic .

  • Aleshores hi haurà un quadre de diàleg nou, en aquest quadre de diàleg, feu clic a Insereix > Mòdul .

  • A continuació, a la finestra de l'editor del Mòdul , escriviu el codi següent: 
9174

  • A continuació, tanqueu el Finestra del mòdul .
  • Després, aneu a la pestanya Visualitza > Macros .
  • A continuació, feu clic a Visualitza Macros .

  • Després de fer clic a Mostra les macros, seleccioneu les macros que heu creat ara. El nom aquí és Open_with_File_Path . A continuació, feu clic a Executar .

  • Després s'obrirà el fitxer Mostra .

🔎 Desglossament del codi 

5024

⮚ En primer lloc, proporcionem un nom per al sub- procediment que és Open_with_File_Path .

1121

⮚ Aleshores, posem la ubicació del fitxer a la variable File_Path 

7539

⮚Aleshores, declarem la nostra variable wrkbk , el tipus de la qual és un llibre de treball.

6409

⮚ Aleshores, obrim el fitxer anomenat a la variable del directori File_Path i establim el fitxer. com a variable wrkbk .

7116

⮚ Finalment, finalitzem el subprocediment d'aquest codi.

Llegir més: Com Obriu el llibre de treball des del camí mitjançant Excel VBA (4 exemples)

1.2 Obre el llibre de treball sense esmentar el camí del fitxer

En el següent mètode, obrirem el fitxer des de la carpeta principal, on el el fitxer principal està desat. El fitxer es pot obrir sense esmentar cap ubicació al codi. Aquest fitxer només ha d'estar a la mateixa carpeta que la carpeta principal.

Pasos

  • Tenim un fitxer diferent desat al mateix directori on el pare. Ara s'ha desat el fitxer Excel.
  • El nom del fitxer és 1.

  • Primer, aneu a Desenvolupador i feu clic a Visual Basic . Si no ho teniu, heu de activar la pestanya Desenvolupador . O també podeu prémer " Alt+F11 " per obrir l' Editor de Visual Basic .

  • Aleshores hi haurà un quadre de diàleg nou, en aquest quadre de diàleg, feu clic a Insereix > Mòdul .

  • A continuació, a la finestra de l'editor del Mòdul , escriviu el codi següent: 
4110

  • A continuació, tanqueu el Finestra del mòdul .
  • Després, aneu a la pestanya Visualitza > Macros .
  • A continuació, feu clic a VisualitzaMacros .

  • Després de fer clic a Mostra les macros, seleccioneu les macros que heu creat ara. El nom aquí és Open_without_File_Path . A continuació, feu clic a Executar.

  • Després de prémer Executar , notareu que el fitxer anomenat 1 ja està obert.
  • I així és com obrim el llibre de treball amb el nom de la variable mitjançant VBA a Excel.

🔎 Desglossament del Codi 

3162

⮚ En primer lloc, proporcionem un nom per al subprocediment que és Sub Open_without_File_Path() 

1551

⮚ Declarem wrkbk com a variable del tipus de llibre de treball

9020

⮚ Obrim el fitxer del directori principal anomenat 1.xlsx .

4130

⮚ Finalment, finalitzem el subprocediment d'aquest codi.

1.3 Obrir el llibre de treball com a només lectura

El mètode és bastant semblant al primer mètode, però aquí obrirem el fitxer en mode de només lectura, és a dir, no ho farem. capaç d'alterar qualsevol dada o valor del fitxer Excel.

Pasos

  • El fitxer que volem obrir es desa a la carpeta del document.
  • I aquest és el fitxer que volem obrir com a només de lectura.

  • Primer, aneu a Desenvolupador i feu clic a Visual Basic . Si no ho teniu, heu de activar la pestanya Desenvolupador . O també podeu prémer ' Alt+F11 ' per obrir l'Editor de Visual Basic.

  • A continuació, hi haurà un nou quadre de diàleg, en aquest quadre de diàleg, feu clic a Insereix > Mòdul .

  • A continuació, a la finestra de l'editor Mòdul , escriviu el codi següent: 
9595
  • A continuació, tanqueu la finestra Mòdul .
  • Després, aneu a la pestanya Visualitza > Macros .
  • A continuació, feu clic a Mostra les macros .

  • Després de fer clic a Visualitza Macros, seleccioneu les macros que heu creat ara. El nom aquí és Open_with_File_Read_Only . A continuació, feu clic a Executa .

  • Després de fer clic a Executa , veurem que ara s'obre el fitxer com a només lectura, tal com es mostra a la barra de títol.

🔎 Desglossament del codi 

9014

⮚ En primer lloc, proporcionem un nom per al subprocediment que és Open_with_File_Read_Only() 

4450

⮚ Declaram wrkbk com a variable al tipus de llibre de treball

7528

⮚ Aleshores, el fitxer s'obrirà des del directori designat i el fitxer s'establirà en només lectura amb l'últim argument.

9293

⮚ Finalment, finalitzem el subprocediment d'aquest codi.

Llegir més: Com obrir el llibre de treball com a només lectura amb Excel VBA

2. Ús del quadre de missatges

Gairebé semblant al mètode anterior, podem obrir fitxers mitjançant el codi VBA aquí a Excel, però en aquest cas, incorporarem un petit quadre de missatge aquí.

Passos

  • Primer, aneu a la pestanya Desenvolupador i feu clic a Visual Basic . Si no ho teniu, heu de activar elPestanya Desenvolupador . O també podeu prémer " Alt+F11" per obrir l' Editor de Visual Basic .

  • Aleshores hi haurà un quadre de diàleg nou, en aquest quadre de diàleg, feu clic a Insereix > Mòdul .

  • A continuació, a la finestra de l'editor del Mòdul , escriviu el codi següent: 
9078

  • A continuació, tanqueu el Finestra del mòdul .
  • Després, aneu a la pestanya Visualitza > Macros .
  • A continuació, feu clic a Visualitza Macros .

  • Després de fer clic a Mostra les macros, seleccioneu les macros que heu creat ara. El nom aquí és Open_File_with_Messege_Box . A continuació, feu clic a Executar .

  • A continuació, tenim el quadre d'advertència, que mostra que El fitxer s'ha obert correctament .
  • A continuació, feu clic a D'acord .

  • I aleshores veurem que el fitxer és ara obert.

  • I després intentem alterar una mica el codi.
  • Canviem el nom del fitxer a Sample10 , i en realitat no hi ha cap fitxer anomenat Sample10 a la carpeta de documents.

  • A continuació, Executeu el codi de nou i hi ha un quadre de missatge que diu Ha fallat l'obertura del fitxer .
  • Feu clic a D'acord després.

🔎 Desglossament del codi 

8777

⮚ En primer lloc, proporcionem un nom per al subprocediment que és Obrir_amb_fitxer_només_lectura() 

5600

⮚ Nosaltresdeclara wrkbk com a variable al tipus de llibre de treball 

3893
7396

⮚ Aquesta línia comprovarà si el fitxer anomenat Mostra està disponible al directori o no, si el fitxer hi és, obre el fitxer i al mateix temps es mostrarà el missatge.

3716

⮚ Si no hi ha cap fitxer anomenat Mostra al directori, s'entregarà aquest missatge.

6624

⮚ Finalment, acabem el subprocediment d'aquest codi.

3070

⮚ Finalment, acabem el subprocediment d'aquest codi.

Llegir més: Com obrir el llibre de treball i executar una macro amb VBA (4 exemples)

3. Ús del quadre de diàleg per obrir fitxers

Extreure el directori d'ubicació del fitxer i importar-los cada vegada en el codi VBA és bastant feixuc. Per resoldre el problema, us mostrarem com podeu utilitzar un quadre de diàleg per seleccionar un fitxer de qualsevol directori.

Passos

  • Ara obrirem el fitxer utilitzant el quadre de diàleg de l'explorador de fitxers.
  • Primer, aneu a la pestanya Desenvolupador i feu clic a Visual Basic . Si no ho teniu, heu de activar la pestanya Desenvolupador . O també podeu prémer ' Alt+F11' per obrir l' Editor de Visual Basic .

  • Aleshores hi haurà un quadre de diàleg nou, en aquest quadre de diàleg, feu clic a Insereix > Mòdul .

  • A continuació, a la finestra de l'editor del Mòdul , escriviu el codi següent: 
8364
  • A continuació, tanqueu el Mòdul finestra.
  • Després, aneu a la pestanya Visualitza > Macros .
  • A continuació, feu clic a Mostra les macros .

  • Després de fer clic a Mostra les macros, seleccioneu les macros que heu creat ara. El nom aquí és Open_File_with_Dialog_Box . A continuació, feu clic a Executar .

  • I s'obre una finestra nova. Al quadre de diàleg de l'explorador de fitxers, seleccioneu Mostra i feu clic a D'acord .

  • A continuació, el fitxer anomenat Mostra oberta.
  • I així és com obrim el llibre de treball amb nom de variable mitjançant VBA a Excel.

🔎 Desglossament del codi 

3306

⮚ En primer lloc, proporcionem un nom per al subprocediment que és Sub Open_File_with_Dialog_Box() 

2751

⮚ Declaram Dbox com a variable a FileDialog type

1303

⮚ Declaram File_Path com a variable a File_Path Com String type 

4999

⮚ Hi haurà un quadre de diàleg des de la primera línia. La línia següent indica el nom del quadre de diàleg i el tipus de fitxer.

⮚ Dbox.Title establirà el títol del quadre de diàleg. i FileType estableix el tipus de fitxer.

9543

⮚ El Dbox.Filters.Clear esborrarà qualsevol filtre anterior aplicat al quadre de diaog

7149

⮚ El Dbox.Show farà que el quadre de diàleg aparegui al fitxer.

⮚ Aquesta línia determinarà si l'usuari ha seleccionat més d'un fitxer o no. Si l'usuari selecciona més deun fitxer, tot el procediment s'aturaria.

6338

⮚ Finalment, finalitzem el subprocediment d'aquest codi.

Llegir més: Com obrir Carpeta i selecció de fitxers amb Excel VBA (4 exemples)

4. Utilitzant Workbook.Add Property

Contràriament als mètodes anteriors, crearem un nou fitxer Excel en un directori predeterminat i després l'obrirem utilitzant el Workbook. Afegeix propietat.

Passos

  • Primer, aneu a la pestanya Desenvolupador i feu clic a Visual Basic . Si no ho teniu, heu de activar la pestanya Desenvolupador . O també podeu prémer " Alt+F11" per obrir l' Editor de Visual Basic .

  • Aleshores hi haurà un quadre de diàleg nou, en aquest quadre de diàleg, feu clic a Insereix > Mòdul .

A continuació, a la finestra de l'editor Mòdul , escriviu el codi següent:

3248
  • Després tanqueu la finestra Mòdul .
  • Després això, aneu a la pestanya Visualitza > Macros .
  • A continuació, feu clic a Veure macros .

  • Després de fer clic a Mostra les macros, seleccioneu les macros que heu creat ara. El nom aquí és Open_File_with_Add_Property . A continuació, feu clic a Executa .

  • Després de fer clic a Executa, notareu que ara hi ha un fitxer nou creat i obert.

🔎 Desglossament del codi

⮚ En primer lloc, proporcionem un nom per al subprocediment

Publicació anterior Com crear un formulari amb llista desplegable a Excel
Següent post Desplaçament suau amb la roda del ratolí a Excel (una anàlisi detallada)

Hugh West és un entrenador i analista d'Excel molt experimentat amb més de 10 anys d'experiència en el sector. És llicenciat en Comptabilitat i Finances i Màster en Administració i Direcció d'Empreses. Hugh té una passió per l'ensenyament i ha desenvolupat un enfocament pedagògic únic que és fàcil de seguir i entendre. El seu coneixement expert d'Excel ha ajudat a milers d'estudiants i professionals de tot el món a millorar les seves habilitats i a destacar en les seves carreres. A través del seu bloc, Hugh comparteix els seus coneixements amb el món, oferint tutorials d'Excel gratuïts i formació en línia per ajudar les persones i les empreses a assolir tot el seu potencial.