Excel VBA para crear táboas a partir do intervalo (6 exemplos)

  • Comparte Isto
Hugh West

Mentres traballamos con Microsoft Excel , podemos utilizar o exame de grandes cantidades de datos. E transformar eses intervalos de datos nunha táboa é unha das mellores opcións. As táboas de Excel permítennos clasificar e filtrar os datos rapidamente, engadir novos rexistros e actualizar de forma instantánea gráficos e táboas dinámicas. E Excel VBA axúdalle ao usuario a personalizar a aplicación con só algúns códigos sinxelos. Neste artigo, veremos algúns exemplos de Excel VBA para crear unha táboa a partir do intervalo.

Descargar o libro de prácticas

Podes descargar o libro de traballo e practique con eles.

Crear táboa a partir de intervalo.xlsm

6 exemplos de Excel VBA para crear táboa a partir de intervalo

As táboas comezaron como listas na edición do menú de Excel, pero estas creceron en funcións nas variantes da cinta. A conversión dun intervalo de datos nunha táboa amplía a capacidade, o que lle permite traballar de forma máis rápida e sinxela. Converter o intervalo nunha táboa usando VBA é o xeito máis sinxelo que usar a cinta.

Supoñamos que temos un conxunto de datos sinxelo que contén algúns elementos na columna B , a cantidade destes artigos na columna C e as vendas totais de cada artigo na columna D . Agora queremos converter o intervalo de datos nunha táboa. Demostramos diferentes exemplos e instrucións paso a paso para crear unha táboa a partir do intervalo B4:D9 con Excel VBA.

Usar ListObjects .Engadir ao xiro arango nunha táboa de Excel. O obxecto de folla de cálculo ten unha característica ListObjects . ListObjects ten unha técnica chamada Engadir . Os criterios para .Add son os seguintes.

expression .Add(SourceType, Source, LinkSource, HasHeaders,Destination)

E, use o SourceType xlSrcRange .

1. Excel VBA para xerar táboas a partir do intervalo

Con Excel VBA , os usuarios poden usar facilmente o código que actúa como menús de Excel desde a cinta. Para usar o código VBA para xerar unha táboa a partir do intervalo, sigamos o procedemento.

PASOS:

  • Primeiro, vai á pestana Desenvolvedor da cinta.
  • En segundo lugar, desde a categoría Código , fai clic en Visual Basic para abrir o Editor de Visual Basic . Ou preme Alt + F11 para abrir o Editor de Visual Basic .
  • En lugar de facelo, pode simplemente facer clic co botón dereito na súa folla de traballo e ir a Ver código . Isto tamén te levará ao Editor de Visual Basic .

  • Isto aparecerá no Editor de Visual Basic onde escribimos os nosos códigos para crear unha táboa a partir do intervalo.
  • En terceiro lugar, fai clic en Módulo na barra de menú despregable Inserir .

  • Isto creará un Módulo no teu libro de traballo.
  • E copia e pega o VBA código que se mostra a continuación.

Código VBA:

5786
  • Despois, executa o código facendo clic no botón RubSub ou premendo o tecladoatallo F5 .

Non é necesario cambiar o código. Todo o que podes facer é cambiar o intervalo segundo os teus requisitos.

  • E, finalmente, seguindo os pasos crearase unha táboa do intervalo B4:D9 .

Explicación do código VBA

5462

Sub é unha parte do código que é usado para xestionar o traballo no código pero non devolverá ningún valor. Tamén se coñece como subprocedemento. Así que chamamos ao noso procedemento Create_Table() .

1463

Esta é a liña de código principal coa que se converte o intervalo como táboa. Como xa sabemos que ListObjects.Add para converter un rango nunha táboa de Excel. E usamos xlSrcRange como tipo de fonte. Ademais, declaramos o noso intervalo Intervalo(“B4:D9”) . E, finalmente, nomea a nosa táboa como Táboa1 .

9510

Isto rematará o procedemento.

Ler máis: Como actualizar Pivot Intervalo da táboa (5 métodos adecuados)

2. Construír táboa a partir do intervalo usando Excel VBA

Vexamos outro exemplo para construír unha táboa a partir do intervalo usando Excel VBA.

PASOS:

  • Primeiro, vai á pestana Desenvolver r da cinta.
  • En segundo lugar, fai clic en Visual Basic para abrir o Editor de Visual Basic .
  • Outro xeito de abrir o Editor de Visual Basic é simplemente premer Alt + F11 .
  • Ou, prema co botón dereito do rato na folla , seleccione Ver código .
  • A continuación, vaia a Inserir eseleccione Módulo no menú despregable.
  • E, isto abrirá a xanela de Visual Basic.
  • Despois diso, copie e pegue o código VBA. a continuación.

Código VBA:

5872
  • Ademais, prema a tecla F5 ou faga clic na tecla Botón Executar Sub para executar o código.

  • E obterá o resultado como se mostra no Método 1 .

Explicación do código VBA

5842

A instrución DIM en VBA refírese a " declare, " e debe usarse para declarar unha variable. Entón, declaramos o noso intervalo tb2 e a folla de traballo en ws .

7286

VBA Set simplemente permítenos evitar ter que escribir o intervalo que necesitamos escoller. e outra vez ao executar o código. Entón, establecemos o noso intervalo na rexión actual e a nosa folla de traballo na folla de traballo activa.

3041

Con esta liña de código, creamos a táboa a partir do intervalo e nomeamos a nosa táboa Táboa2 .

Ler máis: Como usar unha táboa de Excel con VBA (9 formas posibles)

3. Crear táboa a partir dun intervalo con VBA en Excel

Vexamos outro exemplo de uso de Excel VBA para crear unha táboa a partir dun intervalo.

PASOS:

  • Para comezar, selecciona todo o intervalo que queres converter nunha táboa.
  • En segundo lugar, fai clic na pestana Desenvolvedor da cinta.
  • En terceiro lugar, inicie o Editor de Visual Basic facendo clic en VisualBasic .
  • Como alternativa, pode acceder ao Editor de Visual Basic premendo Alt + F11 .
  • Ou, dereita -faga clic en na folla e escolla Ver código no menú.
  • A continuación, seleccione o Módulo no menú despregable en Inserir .
  • E aparecerá a xanela visual basic.
  • Escribe o código alí.

Código VBA:

9333
  • Finalmente, prema a tecla F5 para executar o código.

  • E, isto creará unha táboa do intervalo de datos tal e como obtivemos no Método 1 .

Ler máis: Como facer unha táboa en Excel (con personalización) )

Lecturas similares

  • Suma de campos calculada dividida polo reconto na táboa dinámica
  • Como ilustrar a distribución de frecuencias relativas en Excel
  • Agrupar a táboa dinámica de Excel por semana (3 exemplos axeitados)
  • [Correxir] Non se poden agrupar as datas en Táboa dinámica: 4 solucións posibles
  • Como facer unha táboa de amortización en Excel (4 métodos) <1 3>

4. Aplicar VBA para crear unha táboa dinámica a partir do intervalo

Vexamos outra forma de xerar unha táboa a partir dun intervalo mediante Excel VBA.

PASOS:

  • Para comezar, abra a cinta e seleccione a opción Desenvolvedor .
  • A continuación, para acceder ao Editor de Visual Basic , prema en Visual Basic .
  • Premer Alt + F11 tamén aparecerá o Visual BasicEditor .
  • Como alternativa, faga clic co botón dereito na folla e escolla Ver código no menú que aparece.
  • Agora, dende a Inserir opción despregable, escolla Módulo .
  • A continuación, copie e pegue o código VBA que segue.

Código VBA:

6320
  • Executa o código premendo a tecla F5 .

  • Como se ilustra na ilustración do Método 1 , a táboa construirase a partir do intervalo.

VBA Explicación do código

5757

Esta liña indica o nome do subprocedemento.

5663

Esta dúas liñas utilízase para a declaración de variables.

5460

O Con statement permítelle facer unha secuencia de instrucións sobre un único obxecto sen ter que recalificar o nome do obxecto. Entón, incluímos a Con instrucción co nome da folla.

4920

Estes son para atopar respectivamente a última fila e a última columna.

8282

Intervalo para crear a táboa.

8282

Crear unha táboa no intervalo especificado anteriormente.

5686

Especificar o nome da táboa

9002

Especificar o estilo de táboa.

Ler máis: Crear táboa en Excel usando o atallo (8 métodos)

5. Crea unha táboa dinámica a partir dun intervalo

Agora, bótalle un ollo a outro método VBA de Excel para crear unha táboa a partir dun intervalo.

PASOS:

  • Para comezar, abra a cinta e escolla Desenvolvedor no menú despregable.
  • A continuación, seleccione Visual Basic para abrir o Editor de Visual Basic .
  • Tamén se pode acceder ao Editor de Visual Basic premendo Alt + F11 .
  • Como alternativa, pode premer co botón dereito do rato na folla e seleccionar Ver código no menú emerxente.
  • Despois diso, seleccione Módulo desde Inserir menú despregable.
  • Copie e pegue o seguinte código VBA.

Código VBA:

5614
  • Finalmente, executa o código premendo F5 no teu teclado e verás o resultado na túa folla de traballo.

  • E, como se demostra na ilustración do Método 1 , a táboa construirase a partir do intervalo.

Ler máis: Como Fai que as táboas de Excel se vexan ben (8 consellos eficaces)

6. Use Excel VBA para crear táboas dinámicas

Exploremos outra forma de Excel VBA de construír unha táboa a partir dun intervalo.

PASOS:

  • Ao principio, vai á pestana Desenvolvedor > Visual Basic > Inserir > Módulo .
  • Ou premendo co botón dereito do rato na folla de traballo abrirase unha xanela. A partir de aí vai ao Ver código .
  • E, isto levarache ao campo Editor de Visual Basic , onde podemos escribir Macros VBA.
  • Por outra banda, premendo Alt + F11 tamén se abrirá o Editor de Visual Basic .
  • Despois diso, escriba o código VBA .

Código VBA:

4502
  • E executa o código para ver o resultado mediantepremendo a tecla F5 .

  • E, a táboa crearase a partir do intervalo como se mostra na imaxe de Método 1 .

Ler máis: Como crear unha táboa en Excel con datos (5 xeitos)

Conclusión

Os métodos anteriores axudaranlle a crear unha táboa a partir do intervalo en Excel. Espero que isto che axude! Se tes algunha pregunta, suxestión ou comentario, fáganos saber na sección de comentarios. Ou podes botar unha ollada aos nosos outros artigos no blog ExcelWIKI.com !

Hugh West é un adestrador e analista de Excel altamente experimentado con máis de 10 anos de experiencia na industria. É Licenciado en Contabilidade e Finanzas e Máster en Administración de Empresas. Hugh ten unha paixón polo ensino e desenvolveu un enfoque docente único que é fácil de seguir e comprender. O seu coñecemento experto de Excel axudou a miles de estudantes e profesionais de todo o mundo a mellorar as súas habilidades e a destacar nas súas carreiras. A través do seu blog, Hugh comparte os seus coñecementos co mundo, ofrecendo titoriais de Excel gratuítos e formación en liña para axudar ás persoas e ás empresas a alcanzar todo o seu potencial.