Jump to content

Crear Imagen Que Abra Una Ventana Emergente


Recommended Posts

Hola a todos buenas tardes,

Escribo esta entrada para ver si me pueden ayudar con una herramienta que estoy desarrollando en excel.

Necesito colocar dentro de un formulario una imagen (eso no tiene mayor problema) y al momento de dar clic en la imagen que me salga una ventana emergente con un texto que yo asignare.

Basicamente lo que quiero es colocar el boton de ayuda (?) como imagen y que al hacer clic despliegue mis comentarios de ayuda para el usuario.

Saludos.

Link to comment
Share on other sites

Excelente, disculpa la molestia pero me surge una duda, lo que hice fue poner un botón normal por ahora pero quiero que me muestre en una ventana la información de una celda.

Private Sub CommandButton7_Click()

MsgBox "Documentación" & vbCr & "Preguntas!Y2", , "Ayuda"

End Sub

Especificamente como puedes ver de la Hoja que se llama Preguntas la celda Y2 pero no aparece la información de esta celda, si no que aparece el texto "Preguntas!Y2" ¿como le indico que lo que quiero es que aparezca el texto de esta celda?

Muchas gracias de antemano por la ayuda, saludos.

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • 72 ¿Te parecen útiles los tips de las funciones? (ver tema completo)

    1. 1. ¿Te parecen útiles los tips de las funciones?


      • No
      • Ni me he fijado en ellos

  • Ayúdanos a mejorar la comunidad

    • Donaciones recibidas este mes: 0.00 EUR
      Objetivo: 130.00 EUR
  • Files

  • Download Statistics

    • Files
      170
    • Comments
      89
    • Reviews
      26

  • Crear macros Excel

  • Posts

    • Buenas noches profesor Antoni y demás miembros del foro. Tanto con la solución suya como la del profesor HDD resuelvo el problema y está es una tercera variante que nunca viene mal, porque todo lo que se aprende no pesa ni estorba Gracias por el enlace, en cuanto tenga el chance lo reviso. Necesito una última petición a ustedes. He tratado de convertir los números en texto a números y no he podido lograrlo. Lo hice con la función Sustituir por si hubiera algunos espacios de más, con el Texto en columna, lo multiplique x 1, le sumé +0, lo trate con un ciclo For Each, creando una variable Celda de tipo Range y un condicional If/End if y nada. Por favor, si fuera tan amables de sugerirme algo que no haya probado. Agradecido como siempre y mis respetos a ustedes. Pino
    • Utilizando la función  WorksheetFunction.Clean se eliminan la mayoría de caracteres no imprimibles.   Eliminar caracteres no imprimibles
    • Buenas tardes reiteradas. Que bien que se sumó el profesor Antoni a la solución. Qué provilegio, JSD y Antoni, no podría estar en mejores manos. Gracias a ambos por su respuestas, pero tengo una duda más. En el caso de Antoni manifiesta que el caracter es el 001 del ASCII, pero pregunto, si fuera otro caracter este códiogo me serviría también o hay que modificarle algo? Mis respetos a todos los miembros del Foro y en especial a Antoni y JSD. Agradecido. Pino
    • Hola Antoni, te adelantaste, bueno dejo lo mismo de otra manera Sub EliminarCaracteres(): Application.ScreenUpdating = False Dim rango As Range Dim datos As Variant Dim i As Long, j As Long With Hoja2 '>>>>> pon la hoja donde quieras trabajar Set rango = .Range("A4:M" & .Cells(.Rows.Count, "A").End(xlUp).Row) datos = rango.Value For i = 1 To UBound(datos, 1) For j = 1 To UBound(datos, 2) datos(i, j) = Application.WorksheetFunction.Clean _ (datos(i, j)) Next j Next i rango.Value = datos End With End Sub  
  • Recently Browsing

    • No registered users viewing this page.
×
×
  • Create New...

Important Information

Privacy Policy