Macros y programación VBA

Hola, deseo crear una imagen con extencion PNG de una rango de datos de Excel y guardarlo en una rita especifica, pero al realizarlo, me doy con la sorpresa que la nitides no es la misma que cuando lo hago manualmente, como hago con una macro para que la nitidez de la imagen no cambie.

Tengo mi aplicación la cual se llama " Mantenimiento Personal e Insumos " lo que deseo hacer es Agregar - Modificar - Eliminar Me parece que el Agregar y el Eliminar ya están okey, pero el modificar es el que me falta, lo que deseo es que al seleccionar un ítem del Listbox y enseguida darle clic al Botón Modificar, me jale los registros seleccionados para su modificación pero no me esta saliendo, alguien me podría dar una mano por favor y si tuviesen alguna observación a la aplicación hagan mela saber por favor que soy nuevo programando. De antemano muchas gracias por el tiempo dado : PD. dejo link del excel ya que a la hora de subirlo por aqui me dice que el archivo pe…

Hola a todos buen día Estoy trabajando en un proyecto de almacén, deseo reducir datos repetidos Sucede que cada articulo tiene un código en particular, si este articulo no existe se procede a crear un código nuevo, cuando el inventario es muy grande es difícil diferenciar si el articulo existe o no, ya que en veces hay descripciones similares pero no iguales Por lo cual solicito su ayuda, les dejo el ejemplo adjunto Ejemplo.xls

tengo un combobox dentro de una celda, escondi la la flecha hacia abajo, hasta que eligen la celda, tengo el problema es que si no dan doble clic dentro de la celda no aparece la flecha de las opciones del combobox, existe forma de arreglarlo?, es decir, tengo la opcióndropbuttonwhen que aparezca cuando selecciono el combobox, pero necesito que sin importan sea seleccionada la celda con el mouse o con el tdeclado aparezca la flecha de la lista ejemplo.zip

buenas noches a todos por acá de nuevo con un nuevo tema que me da vuelta la cabeza,. tengo un userform para el cobro de servicio, lo que quiero saber es como hacer para filtrar los datos en base al DNI y FECHA a la vez y que el dato del cliente, la descripción y el costo me aparescan en el listbox y poder cobrarle los servicios realizados durante el dia, gracias espero contar con sus sabidurias. gracias. aquí le dejo el formulario para que lo puedan analizar y/o modificar pdta. si me pueden ayudar con el tema del cambio ya que no me devuelve , y como ingresar los datos ala hoja2 se los voy a agradecer. FILTRAR.rar

Buenos días a todos...necesito una mano para resolver esto; es lo siguiente, esta macro no me arroja los datos dentro de la tabla, me lo arroja muchos mas abajo, ya intente de mil manera resolverlo pero no llego a la solución...agradecería si pueden decirme donde está el error..la idea es que me arroje los datos a partir de la fila "A7 " y de ahí en adelante..la celda "A7", tendría las fechas seria posible que esto me los ordenes?;.....dejo la macro y el link del archivo..gracias Private Sub CommandButton3_Click() Dim MES As String ' BOTÓN REGISTRAR Dim UltFila As Long MES = ComboBox4.Value If MES <> "" Then Sheets(MES).Activate …

Hola amigos en esta ocasion quiero hacer la siguiente consulta: estoy haciendo una plantilla para realizar cotizaciones y la idea es que el numero de la cotizacion que esta en una celda especifica se convierta en el nombre del archivo cuando le de guardar, ojala me puedan ayudar. Gracias. Example.xlsx

hola no logro cuadrar los datos en un formulario vb, estos datos se intruducen en una hoja de excel, el cual ya esta resuelto,, pero no puedo cuadrar los offset para q queden bien parejos debajos de los rotulos en el formulario,, y tampoco me listan, cuando llamo un dato,, que tengo q mover para q me queden parejo adjunto foto este es el codigo If ActiveCell.Value = 0 Then ActiveCell.Offset(0, -50).Select LISTACLI.ColumnCount = 4 LISTACLI.AddItem LISTACLI.List(LISTACLI.ListCount - 1, 0) = ActiveCell.Value ActiveCell.Offset(0, 1).Select LISTACLI.List(LISTACLI.ListCount - 1, 1) = ActiveCell.Value ActiveCell.Offset(0, 1).Select LISTAC…

Hola, os pido ayuda porque estoy atascado, tengo una macro que utilizo para hacer una copia de una hoja concreta de un libro ésta macro la utilizo para todas las hojas cuando tengo que copiar y guardar hojas individuales por ejemplo guardar una hoja de un presupuesto como hoja individual, la hoja en cuestión por ejemplo es "Presupuestos" y tiene unas imágenes en la zona Cliente que quiero que vayan en la copia pero me pide el nombre de la imagen que no corresponde con el de la macro, estoy harto de buscar el nombre que le da Excel a dicha imagen para cambiarlo en la macro pero, y en propiedades no consigo encontrarlo, me podéis echar una mano, gracias

Buen día para todos Actualmente manejo un archivo de Excel, el cual es usado por varios usuarios de mi empresa, periódicamente surgen mejoras o errores que debo solucionar y actualizar nuevamente el archivo en todas sus copias ya que cada archivo tiene información guardada y no puedo enviar uno nuevo. Quiero consultarles si existe alguna manera de actualizar el código desde otro código de forma automática?. hace un tiempo vi un aporte en el cual actualizan el código desde un archivo .txt, pero ese aporte solo sirve para un modulo, alguien conoce una manera de hacerlo para varios módulos la verdad no cuento con el conocimiento para modificar el código mencionado . …

hola expertos como puedo modificar el principio de este codigo con la idea de transpasar no solamente los dato de la columa B sino tambien los datos de la columna A,B,C Sub zero() Dim ultimaCeldaDatos As String 'hallar la ultima celda con datos de la columna B de la hoja estadistica ultimaCeldaDatos = Sheets("analisis").Cells(Rows.Count, 2).End(xlUp).Row 'copiando datos de columna B Sheets("analisis").Range("b5:b" & ultimaCeldaDatos).Copy Sheets("archivo").Select 'posicionando en la celda donde pegare los datos en la hoja archivo Sheets("archivo").Cells(2, Columns.Count).End(xlToLeft).Offset(0, 2).Select Selection.PasteSpecial Application.CutCopyMode = False …

Hola a todos. Quería saber si hay manera de imprimir un PDF con una macro Excel. De momento y buscando he encontrado la manera de ver el pdf en un webbrowser y tambien verlo con FollowHyperlink. La ruta del archivo la tengo en un textbox de un formulario y me gustaría que la macro buscara el archivo y lo imprimiera., pero no consigo hacerlo. ¿Es posible? Gracias.

Buenas noches estimados tengo un pequeño problemita... debo imprimir un formato A6, pero a la vez con un option buton imprimo de acuerdo a un rango OPTIONBUTON1: AZUL = Range("B2:H28").Select OPTIONBUTON2: AZUL + VERDE = Range("B2:H43").Select OPTIONBUTON4: AZUL + VERDE + AMARILLO + NARANJA = Range("B2:O43").Select OPTIONBUTON3: AZUL + VERDE + AMARILLO = aqui esta mi problema lo he querido hacer asi: Range("B2:H43, I2:O22").Select pero me imprime en hojas separadas y deseo que salga en una sola hoja Espero me sepan entender y ayudar quedo muy agradecido

Buenos días les agradezco de antemano si me pueden ayudar, hice este macro para ingresar la formula de SUBTOTALES me parece que lo escribe bien pero da un error y no lo encuentro, apelo a ustedes si ven el error o alguna otra opción que pueda utilizar.Mil gracias Consulta.xlsm

Hola cracks!! Estoy tratando de generar una macro que calcule el promedio de mis datos, pero en vez de que sea un rango fijo de X2:X8431 sea hasta el ultimo valor que tenga la columna X es decir que pueda variar ya que a veces son mas datos o a veces menos, les dejo el código que tengo actualmente con rango fijo. Range("X2").Select ActiveCell.FormulaR1C1 = "=AVERAGE(R[2]C:R[8431]C)" He tratado con este pero no funciona: Dim last_row As Integer last_row = Cells(Rows.Count, "C").End(xlUp).Row - 1 Range("X2").Select ActiveCell.FormulaR1C1 = "=AVERAGE(R[2]C:R[last_row]C)" Les agradezco mucho su ayuda si tienen alguna id…

ub guardar() 'archivo = Range("G2") archivo = Worksheets("Parte").Range("G2") nombre = "C2020-0138" & "_" & Day(Range("f2").Value) & "_" & Month(Range("f2").Value) & "_" & Year(Range("f2").Value) & "_" & archivo & ".xls" ActiveWorkbook.SaveAs nombre, FileFormat:=xlOpenXMLWorkbookMacroEnabled End Sub Buenos días Podrías guiarme en esta macro, quiero que me guarde el archivo en una carpeta especifica si necesidad de ser abierto. Gracias de antemano

hola buenas tardes! Gracias por su ayuda, les comparto el archivo, en las columnas que necesito modificar están en amarillo, la fecha la necesito en año/mes/día y en las otras columnas quiero que me respete los concepto que son : Referencia = Datos Pago de Factura = Nota de crédito Concepto = Descripción anexo el archivo y de ante mano mil gracias Carga Almacen.xlsm

Buenas noches a todos espero se encuentren muy bien La presente es para solicitar amablemente su orientación con lo siguiente: Tego un libro de excel para registrar las horas laboradas en excel, los meses y el nombre del empleado cambian al usar una lista desplegable, sin embargo lo que necesito es ir guardando los datos que se ingresan manualmente en la plantilla y que corresponden a cada empleado y que a medida que cambie de nombre la hoja se ponga en blanco Para mayor comprensión adjunto el archivo Muchas gracias por su gentil colaboración INCENTIVOS LIBRO DE TRABAJO.xlsx

Buenas, Nunca he sabido muy bien cómo programar el buscarv para que busque en un rango dinámico y no en uno fijo, normalmente si más o menos sé que donde tiene que buscar nunca va a pasar de las 2000 filas pues pongo que busque de 1 a 2000, pero me gustaría saber cómo hacerlo para que fuese dinámico y buscase en la totalidad de filas que tenga la hoja en ese momento. Muchas gracias. Os paso el ejemplo de cómo lo hago hasta ahora. Ej_BuscarV.xlsm

Buenas tardes. Y si en lugar de copiar todos los ficheros en las rutas indicadas, fuera un fichero, una ruta. Es decir, el fichero de la b4, copiarlo en la ruta del f5, el fichero de la b5, copiarlo en la ruta del f6. Puedes ayudarme ? Muchas gracias por tu tiempo y ayuda !!!

Hola buenas tardes. Trabajo constantemente con varios archivos que deben ser movidos de una carpeta a otra. Estoy tratando de lograr que desde excel con un botón me abra el explorador y estando ahí poder seleccionar los archivos de mi interés y después de seleccionarlo que los copie. 2. ahora abrir el explorador y ubicar la carpeta (destino) en donde quiero colocar los archivos copiados. todo esto desde el explorador. Ya he logrado hacer el proceso de seleccionar los archivos, copiarlos y seleccionar la carpeta donde quiero que las pegue. El problema es que solo me pega un archivo. Me pueden ayudar con la parte de la estructura para que se p…

Buenos dias, tengo el siguiente problema, he creado un libro que me permite crear hojas a medida que ingreso nuevos equipos en la hoja inicio, los registra en una tabla (eso ya funciona), y la nueva hoja es la copia de una una hoja "Base", lo que no he podido hacer, es que el código del equipo ("f7" en adelante) quede como hipervinculo a su hoja respectiva que lleva el mismo nombre, necesito de verdad ayuda... adjunto archivo, gracias Planilla_Base.rar

Hola!, ando teniendo un problema y no encuentro exactamente lo que necesito por internet, ni dentro del foro. Tengo un libro, que la primera y segunda hoja contienen direcciones y fechas. Y una tercera hoja que se llama planificado, en la cual tomando el parametro de la fecha actual, necesitaria que me copie los datos de la primera y segunda hoja sumandole 1 día. Ejemplo: Hoy es 24/07/2012, que copie los datos del 25/07/2012 (la idea seria saber a que lugares tengo que ir con un día de anticipación). Si alguien me podria dar una mano, o guiar un poco como armarlo, estaria muy agradecido!. Muchas Gracias dias.rar

extraer datos de hojas separadas y cargarlas en resumen estoy tratando de automatizar esta planillas trabajo con ella a diario y no se como hacerlo mas eficiente alguien con mas conocimientos podria darme una mano. explico el trabajo consiste en cargar los viajes aqui la primera de las complicaciones ya que al cierre de cada dia tengo que en forma manual separar los viajes por movil y hacer el cierre de la caja en forma manual, lo que no se camo hacer es que esto se procese de forma automatica con una funcion de cerrar dia y los datos se carguen en hojas separadas, viajes, recaudacion, comision. si no fui muy claro me dicen asi lo podemos sacar. muchas gracias por su …

Hola, que tal a todos, estoy de nuevo por aca en busca de ayuda. Les comento tengo una macro la cual grabe el buscarv para que se ejecutara cada que entro a la macro, el problema es que cuando me genera el archivo, la celda donde me extrae la informacion al darle click me aparace la formula: =BUSCARV(F412;'C:\Users\JJ\Documents\PRUEBAS ESTADISTICO DE VENTAS TXT\ [Listado-OCTUBRE 2012.xlsx]LISTADO OCT-12'!$B:$R;3;FALSO) lo que yo quiero es que al ejecutar la macro queden los resultados pero sin estas formulas, ya que este archivo todavia necesita mas manipulacion y no deja hacer nada, la informacion que me arroja es como este tipo: 16611,20 Ya puse muchos codigos para…