Paulo Pareja

Les molesto con un problema que me esta volviendo loco y no entiendo el porque: Tengo varios ListBox dentro de un formulario con algunos TextBox en el cual cargo la consulta y mediante algunas consultas pongo en una hoja los datos que quiero llenar...

Tengo el siguiente código: ActiveSheet.DrawingObjects.Delete ruta = ThisWorkbook.Path & "\Images\" For i = 2 To Range("e" & Rows.Count).End(xlUp).Row imagen = Cells(i, "e") If Cells(i, "e") = "" Then GoTo salidaa Range("b2").Select Dim SArchivo As...

Quería consultarle como realizar una búsqueda de una fecha y si no existe que encuentre la más próxima (antes o después). La fecha a buscar la tengo en un combobox y el rango de fechas a buscar están situadas todas en el primer renglón (encabezado)....

Tengo un código que funciona genial para enviar mail: Set objOutlook = CreateObject("Outlook.Application") Set objNamespace = objOutlook.GetNamespace("MAPI") Set objItem = objOutlook.CreateItem(olMailItem) objNamespace.Logon "EXCELSPACE", , True,...

Mediante una macro VBA (Excel) abrí un nuevo archivo y le inserte los datos que necesitaba, pero necesito que el nuevo archivo (informe) tenga dentro una macro para que el usuario de destino pueda ejecutarla. Para complicarla un poco más (no porque...

Quisiera saber si me pueden ayudar ya que tengo un problema. Tengo una macro que me genera una serie de reportes y los exporta. Funciona bien, pero el problema se presenta que sobreescribe los archivos. Intente que el nombre contenga la fecha, pero a...

Tengo un userform funcionando "bien", en una de las líneas del userform tengo el siguiente código: Me.TextBox19.Value = Sheets("Base de datos").Range("c:c").Find(Me.TextBox1.Text).Offset(0, 11) Lo que hace busca el valor que esta en el textbox1 en la...

Tengo un archivo que contiene ciertos datos y lo que deseo es insertar imágenes que hacen referencia a una celda. La idea es de que en cada celda "N" vaya una foto que poseo en una carpeta llamada "imagenes" alojada en el mismo directorio que mi...

Tengo un inconveniente bastante partícular que no logro entender porque. Tengo el siguiente código: On Error GoTo 2 imagen1 = ThisWorkbook.Path & "\Imagenes\" & ComboBox1 & ".jpg" Fotos.Image1.Picture = LoadPicture(imagen1) GoTo 3 2: imagen1 =...

Me acabo de comprar una colectora de datos Symbol MC9060 para poder realizar un inventario en mi pequeño negocio. El tema es que me vendieron la maquina sin programa alguno, solo tiene el Sistema Operativo y nada más. ¿Alguno podrá indicarme como...