Cómo emergente de cuadro de texto con un solo clic Utilizando VBA en Microsoft Excel 2010
En este artículo, aprenderá a mostrar texto emergente con un solo clic usando el código VBA.
[.underline] #Háganos entender con un ejemplo: # Para ver un cuadro de texto emergente al hacer clic en una celda en particular, debe seguir los pasos a continuación. Haga clic en la pestaña Desarrollador. Desde el grupo Código, seleccione Visual Basic
Ingrese el siguiente código en Sheet1
Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Si Intersect (Target, Range («A1»)) no es nada, entonces
ActiveSheet.Shapes.Range (Array («TextBox 1»)). Visible = False
Else
ActiveSheet.Shapes.Range (Array («TextBox 1»)). Visible = True
Finalizar si
End Sub
El evento SelectionChange asegurará que cada vez que se haga clic en la celda A1, el cuadro de texto aparecerá emergente. Consulte la siguiente instantánea
De esta forma, podemos dejar que la otra persona ingrese su información correctamente.