Excel VBA: Desenvolve e utiliza unha caixa de mensaxes Si Non

  • Comparte Isto
Hugh West

Neste artigo mostrarei como pode desenvolver e utilizar unha caixa de mensaxes Si Non en VBA en Excel.

Desenvolver e utilizar un Si Non Caixa de mensaxes con Excel VBA (vista rápida)

9722

Descargar libro de prácticas

Descargar este libro de prácticas para facer exercicio mentres están lendo este artigo.

Si Non Caixa de mensaxes.xlsm

Unha visión xeral do código VBA para desenvolver e usar unha caixa de mensaxes Si Non (Análise paso a paso)

Aprendamos o uso dunha caixa de mensaxes si-non cun exemplo sinxelo. A caixa de mensaxes farache unha pregunta, gústache ExcelWIKI?

Se a túa resposta é afirmativa, fará clic en Si na caixa de mensaxes . E se a túa resposta é Non , fará clic en Non .

Agora, que pasará despois de que fagas clic en si ou non no cadro de mensaxes ? Na folla de traballo activa, hai 2 celas que conteñen o número de persoas ás que lles gusta e non ExcelWIKI. Se premes si , o número da cela que non me gusta aumentará nun.

E se premes non , o número da cela que non me gusta aumentará un. .

Entón, como realizar toda esta tarefa cun código VBA ? Fácil. Hai 2 pasos principais en todo o proceso.

  • Desenvolvemento da caixa de mensaxes Si-Non
  • Utilizando a saída do Caixa de mensaxes

Estou mostrando o detalle de cada paso para a súa aprendizaxe.

⧪ Paso1: Desenvolvendo a caixa de mensaxes si-non

Primeiro de todo, tes que crear a caixa mensaxe si-non en VBA . Isto é doado. Use o mesmo procedemento que a caixa de mensaxes común, coa pregunta sobre o argumento, xunto cun novo argumento vbYesNo .

Aquí a pregunta é: “Gústache ExcelWIKI ?”

6742

⧪ Paso 2: Usando a saída da caixa de mensaxes

A continuación, realizaremos unha tarefa usando a saída da caixa de mensaxes . Aquí, a cela C3 contén o número de persoas ás que lles gusta ExcelWIKI e a cela C4 contén o número de persoas ás que non lles gusta ExcelWIKI.

Entón, se o a resposta é Si , a cela C3 aumentará nun. E se é Non , a cela C4 aumentará nun.

Usaremos un If-block para executalo.

9514

Así que o código VBA completo será:

Código VBA:

9871

Crear a macro para desenvolver e usar unha caixa de mensaxes Si Non en Excel

Vimos a análise paso a paso do código para desenvolver e utilizar unha caixa de mensaxes Si-Non. Agora, imos ver como podemos construír unha macro para executar o código.

⧪ Paso 1: Abrir a xanela de VBA

Preme ALT + F11 no teu teclado para abrir a xanela Visual Basic .

⧪ Paso 2: inserir un novo módulo

Ir a Inserir > Módulo na barra de ferramentas. Fai clic en Módulo . Un novo módulo chamado Module1 (ou calquera outra cousa dependendo do teu historial pasado) abrirase.

⧪ Paso 3: Poñer o código VBA

Este é o paso máis importante. Insira o código VBA indicado no módulo.

⧪ Paso 4: Execución do código

Fai clic na ferramenta Executar Sub/Formulario de usuario da barra de ferramentas de arriba.

O código executarase. Unha caixa de mensaxes preguntarache se che gusta ExcelWIKI ou non, cunha opción Si e Non .

Se escolle Si , o número da cela C3 aumentará nun. E se escolle Non , o número da cela C4 aumentará nun.

Aquí, seleccionei si , polo que o O número de persoas ás que lles gusta ExcelWIKI aumentou nun un.

Cousas para recordar

  • Unha caixa de mensaxes en VBA contén un total de 4 parámetros chamados Prompt, Button, Title e Helpfile . Aquí mostrei só 2 parámetros, Solicitar e Botón . Pero se queres descubrir a caixa de mensaxe VBA con máis detalle, podes consultar esta ligazón.

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.