yahsin

santiagomf respondió: Lo que tienes que hacer es controlar el momento en que se cierra el formulario y ver si se ha pulsado o no el botón de cerrar (en caso contrario es que se cierra con "X"). Usa este código: Option Explicit Dim snBotonCerrar As Boolean Private Sub...

Elsa Matilde respondió: No se entendió en qué momento se debe ejecutar la macro como para indicarte el evento correcto. Podría ser presionando un atajo de teclado. Entonces tendrías en un módulo del Editor una rutina así. Sub movimiento() 'x Elsamatilde col =...

paramisolo respondió: Elsa ya te lo dejó muy clarito, esto que puso es una macro, puedes colocarla en un modulo: Sub Nombre_Usuario() nbre = Application.Username Sheets("Hoja1").Range("A1").value = nbre End Sub Y desde la aplicación que estas creando puedes llamar a esta...

ivnxls respondió: Cambia en tu código: If Target.Address(False, False) = "A1" Then 'controla el cambio en A1 por If (Target.column = 1 and Target.row <=60) Then 'controla el cambio de A1 a A60

Elsa Matilde respondió: La siguiente rutina se ejecutará al ingresar un valor en A1 (no necesitas del botón- si lo preferís escribime nuevamente para el ajuste) Entrá al editor, seleccioná con clic derecho el objeto HOJA que corresponda (del panel a tu izquierda) y allí...

nandoaule respondió: Prueba presionando shift+barra espaciadora. Para las columnas es ctrl+barra espaciadora. Si lo necesitas vemos de realizar una macro.

paramisolo respondió: La linea de código es esta: ActiveCell.Offset(-1,5).Select Range(ActiveCell, ActiveCell.Offset(0,5)).Select Ahora acoplalá a tu código >Un saludo >Julio

Abraham Valencia respondió: Creo que se podría reducir, pero, así rapidito me salio esto: =Indice(C1:F100,Coincidir(Indice(C1:F100,Coincidir(VERDADERO,Indice(C1:F100>0,),)),C1:C100,0),1) Abraham