Gonzalo Gs

Gonzalo Gs

 Honduras @a56ahpc4687ep4k7 desde - visto
Preguntar

Actividad pública reciente

Ha preguntado en el tema en y en 3 temas más

¿Se puede evitar el molesto parpadeo cuando se asigna macro a una forma, imagen, o botón de comando?

Tengo una macro se la asigno a una imagen, o forma, o botón de comando y parpadea al ejecutar la macro, pero si la asigno a un botón de formulario no parpadea, ¿Alguien sabe por que pasa eso?
Sin respuestas
Ha valorado "Excelente" la respuesta

¿Cómo imprimir rango seleccionado en hoja3 con un botón en hoja1?

respondió: Puedes poner aquí el código para revisarlo. Utiliza el botón para añadir código. Me parece que tienes esta instrucción: Application.ScreenUpdating = False Si tienes esa instrucción, bórrala y prueba nuevamente.
Ha valorado "Buena" la respuesta

Range ("A4").speak teniendo configuración español me lo lee (pronuncia) en ingles

respondió: . L .l Buenas joven ha revisado el motor del narrador de windows 7, siempre trae instalado un narrador en ingles.
Ha valorado "Excelente" la respuesta

¿Cómo se pone un Countdown a las 10:00 am, 2:00 pm, 8 :00 pm?

respondió: El VBA de Excel dispone del método OnTime, que ejecuta un procedimiento a la hora que se le diga. Habría que pegar este código en el módulo del libro (en Thisworkbook): Private Sub Workbook_Open() Dim dtSiguiente As Date Select Case Time Case Is <...
Voto positivo a la respuesta

Ejecutar macro dependiendo el valor de una celda

respondió: Para ello es ideal programar el evento change de la hoja donde están esos datos. Sería así: Copia esta macro en el objeto hoja que estamos tratando, no en un módulo. De esta manera cuando modifiques el contenido de la celda A3 se autoejecutará la...
Ha empezado a seguir a
Ha valorado "Excelente" la respuesta

¿ Como copiar el rango "A1:D1" y pegarlos al final de los datos de las columnas "F:I" ?

respondió: Prueba esta macro Sub copiar() With Sheets("hoja2").Range("f1") filas = .CurrentRegion.Rows.Count .Rows(filas + 1).Resize(1, 4).Value = Sheets("hoja1").Range("a1:d1").Value End With End Sub
Ha empezado a seguir el tema
Ha empezado a seguir el tema
Ha empezado a seguir el tema