Actividad pública reciente
Ha valorado "Excelente" la respuesta
Cerrar un libro al abrir otro
En realidad lo que Excel te permite, es 'impedir' que otro libro se abra mientras esté tu libro abierto. En el objeto ThisWorkbook colocá esta rutina: Private Sub Workbook_WindowDeactivate(ByVal Wn As Window) 'el libro activo es el que se acaba de...
Ha valorado "Excelente" la respuesta
Imagenes en excel
Así debe de ser tu rutina: Sub aut() Dim ruta As String Dim variable As Variant Sheets("DATOS").Select Range("AF17").Select ruta = ThisWorkbook.Path variable = Trim(ruta & "\" & Range("AF17").Value & ".jpg") *** Image1. Picture =...
Ha valorado "Buena" la respuesta
Imagenes en excel
Por lo que estuve averiguando esta propiedad LoadPicture.variable = Image1.Picture, se aplica a las propiedades Image.Picture que es el boton de imagen que se ocupa en los userform o formularios creados desde visual Aca tienes mas info...
Ha valorado "Excelente" la respuesta
Mensaje mientras se ejecuta macro
Según lo comentado los recursos son consumidos por la macro y no dan tiempo para mostar o manipular los objetos, utiliza el DoEvents en tu macro para solventarlo. Si la macro es un ciclo colocalo adentro del WHILE.
Ha valorado "Excelente" la respuesta
Cerrar ventana
Para poder hacer eso inserta el siguiente código en el UserForm, en la sección de Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode <> 1 Then Cancel = 1 Else Cancel = 0 End If End Sub Espero te sirva.
Ha valorado "Buena" la respuesta
Macro excel
Q+ Javier, Revisa las declaraciones DIM, pues al parecer el uso de DIM y luego SET requiere de condiciones especiales. Probé tu código sin declarar DIM y logra correr en buena parte... voy a seguir revisando y te aviso.
Ha valorado "Excelente" la respuesta
Textbox
Luego de encontrar el dato, estás guardando en la variable ubica su dirección. Aquí debieras guardar solo la fila: ubica = midato.row Luego colocas el valor del textbox16 en la celda Y14, cuando en realidad solicitás guardarlo en la misma fila del...
Ha valorado "Excelente" la respuesta
Comman Button
Es fácil Sub CommandButton1_Click() CommandButton2.Enabled = False 'O puedes poner Locked en lugar de Enabled con True End Sub

