Como escribir de dereita a esquerda en Microsoft Office 2016, 2019 / 365?
Aprende a cambiar de teclado LTR a RTL en Microsoft Word.
Como crear caixas de entrada e mensaxes nun documento de Word con VBA?
Última actualización: xullo de 2020; Aplicabilidade: Office 365,2019, 2016, 2013.
Ás veces, gustaríanos facer que os nosos documentos de Word sexan máis interactivos e mesmo capturar algunha entrada do usuario. Introduza mensaxes e caixas de entrada.
Como o nome indica, unha caixa de mensaxes é unha información que se mostra aos usuarios do documento. As caixas de entrada son fundamentais para capturar información do usuario.
Esta publicación contén toda a información e mostras de código que necesitarás para crear documentos totalmente funcionais con mensaxes e caixas de entrada de Visual Basic para aplicacións (VBA) para Microsoft Word.
Como engadir código VBA a Word?
Antes de seguir adiante e explicar como engadir caixas de mensaxes e de entrada, aquí tes unha actualización rápida sobre como engadir o teu código VBA personalizado a un documento de Word.
- En primeiro lugar, continúa e activa a pestana Programador .
- Agora, prema o botón Visual Basic da pestana Programador . Isto abrirá o Editor de Visual Basic.
- Resalte o seu documento.
- Fai clic en Inserir e logo selecciona Módulo .
- Copia o código que proporcionamos a continuación no módulo que acabas de crear no teu módulo.
- Fai clic en Gardar. Proporcione un nome ao documento se se lle solicita.
- Pecha o Editor de Visual Basic.
Caixas de mensaxes Código VBA
Sintaxe:
MsgBox (indicación, botóns, título, ficheiro de axuda, contexto)
Explicación da sintaxe:
Solicitude:
Obrigatorio. É a información que se lle pode dar ao usuario. Debe inserirse entre comiñas dobres .
Botóns:
Opcional. Os botóns son ese tipo de botóns que se dan á información dos usuarios. Hai varios botóns dispoñibles para MsgBox() e pódense atopar nas imaxes de abaixo.
Título:
Opcional. É o título da información que se lle dá ao usuario. Se non se indica, Microsoft Word será o título predeterminado.
Ficheiro de axuda e contexto:
- Opcional. O ficheiro de axuda identificará o ficheiro de axuda dispoñible no disco local que se pode proporcionar como axuda nunha caixa de diálogo
- Opcional. O contexto é unha expresión numérica que se usa para identificar o tema de axuda mediante un número único.
Exemplo de código da caixa de mensaxes
'VBA
Sub messagebox()
'Variables assigned
Dim buttonclick As VbMsgBoxResult
'Message box to display information to user
MsgBox "Hi, Visual Basic is easy to work with", vbExclamation, "VBA"
'Message box to ask question to user with yes or no question
buttonclick = MsgBox("Do you like VBA?", vbQuestion + vbYesNo, "VBA")
If buttonclick = vbYes Then
MsgBox "Yes, they are great!", vbExclamation, "VBA"
Else
MsgBox "Why not? They are great!", vbCritical, "VBA"
End If
End Sub
Saída:
Caixas de diálogo e entrada Código VBA
A caixa de entrada é un diálogo sinxelo que nos permite solicitar información ao usuario. Imos familiarizarnos co código VBA usando un exemplo.
Sintaxe:
InputBox (Solicitude, Título, Predeterminado, XPos, YPos, HelpFile, HelpContextId, Type)
Explicación da sintaxe:
Solicitude:
Obrigatorio. É a información que se lle pode dar ao usuario. Debe inserirse entre comiñas dobres .
Título:
Opcional. É o título da información que se lle dá ao usuario. Se non se indica, Microsoft Word será o título predeterminado.
Por defecto:
Opcional. Mostra o valor predeterminado dentro da caixa de texto, antes de que o usuario escriba un valor. Se non se especifica, a caixa de texto estará baleira.
XPos:
Opcional. Utilízase como posición no eixe X. De esquerda a dereita
YPos:
Opcional. Utilízase como posición no eixe Y. De arriba a abaixo
Arquivo de axuda e ID de contexto de axuda:
- Opcional. O ficheiro de axuda identificará o ficheiro de axuda dispoñible no disco local que se pode proporcionar como axuda nunha caixa de diálogo
- Opcional. HelpContext ID é o número de identificación do ficheiro de axuda.
Código da caixa de entrada:
'VBA
Sub macro()
'Variables assigned
Dim a As Long
Dim b As Long
'Input box to get value from user
a = InputBox("Enter a value for a", "Question 1")
b = InputBox("Enter a value for b", "Question 2")
'Answer displayed in a message box
MsgBox ("Answer is " & Val(a) + Val(b))
End Sub
Saída:
Como configurar a cor da fonte do texto de Excel con VBA?
Aprende a usar Excel VBA para cambiar o texto, a cor, o tamaño e as propiedades da cela mediante programación.
Como comprobar se unha cela ou un intervalo de varias celas está baleiro con Excel VBA?
Aprende a programar vba para buscar celas baleiras nunha folla de traballo ou rango de celas.
Rendemento lento de Microsoft Word? Sete consellos para facer que Word 365 / 2019 / 2016 funcione moito máis rápido
Aprende como podes facer que Word 365 funcione máis rápido desactivando os complementos, actualizando o teu hardware e eliminando
Podo eliminar os ficheiros vc_red do disco duro do meu ordenador persoal?
Aprende todo o necesario sobre a instalación de VC_RED e os ficheiros de armario. É seguro eliminalos do teu sistema operativo Windows 7 e 10?
Mostrar o texto do encabezado e do pé de páxina só na primeira páxina en Word 365/2016/2019 e Google Docs?
Aprende a mostrar o pé de páxina e o encabezado na primeira páxina só en Word 365, 2016 e 2019; así como en Documentos de Google
Como traballar coas caixas de mensaxes e de entrada en PowerPoint VBA?
Aprende a codificar caixas de mensaxes e entradas con VBA en PowerPoint
Como crear e engadir diapositivas a presentacións de PowerPoint con VBA?
Aprende a escribir unha macro VBA sinxela para inserir diapositivas e crear unha nova presentación
Como podo modificar as cores do meu tema de visualización de Office 2016?
Aprende a aplicar esquemas de cores personalizados de Office.
Como abrir ficheiros .one en ordenadores MAC e Windows?
Aprende a lanzar extensións de ficheiros de OneNote de MAC e Windows