Estimado buenos días, como están, una consulta tengo un formulario con lista que al hacer click me muestra una imagen y si lo quiero ver mas grande le doy click en la imagen se me habré un formulario pero al cerrarlo se me duplica las datos que tengo en la lista, alguien sabe por que Gracias amigos

Tengo un archivo de Inventario, al digitar el código en la celda D9 me figura la descripción del producto en la celda D11. Pero lo que me gustaría adaptarle es al digitar el nombre de un producto o solo digitarle las primeras letras como por ejemplo ACETA en la celda D9 que me muestre todos los productos que comience con la ACETA etc. Que seria: 18 ACETA+ERGOTA+CAFEINA SELECPHARMA 21 ACETAMINOFÈN 500 MG ( BLISTER) LAFCO 22 ACETAMINOFÈN 500 MG ( BLISTER) PROMEGAL 23 ACETAMINOFÉN JA…

Que tal a todos los genios en Excel, me podrían ayudar en este proyecto que se detalla a continuación: Que al digitar en el textbox1 la fecha, que me jale en el listbox fecha de la operación, descripción, código y clase de registro. Y ese programa tiene para modificar celdas, pero si alguien tiene otra idea mejor como hacerla será bienvenido, de antemano gracias. Modificar_datos_mediante_ListBox.xlsm

Amigos tengo un macros con el cual importa varios archivos en un mismo libro, el problema es que la formula que tengo en otra hoja para consolidar informacion cambia.... basicamente le agrega una letra "A" a casi todas las formulas Antes de ejecutar macros =(qb!$V4-qb!$D4)*$A$4 Despues de ejecutar = =(qb!$AV4-qb!$D4)*$A$4 Agradecería enormemente su ayuda Saludos

Hola amigos. no es el mejor titulo para exponer el problema que os trasmito, pero en el fichero que os adjunto creo haberme explicado para esta peticion. Un saludo y muchas gracias movimiento de celdas con sus importe.zip

Tengo un pequeño libro de excel que he hecho salseando con aportes vuestros y cuando envío el archivo xlsm por correo a alguien para que lo utilice le dice que está dañado y no le funciona. En mi ordenador va perfectamente ¿que puedo hacer? Gracias Almacen Marichu.rar

Estoy creando una macro donde se ajecuta cada ves que cambio el valor a una celda, lo que nesicito saber es que debo poner al final para que al terminar la macro siga a la sigientes celda activa ya que hasta ahora solo me queda selecionado el grafico. gracias

Buenos días tengo una macro para mandar un correo avisando que se modifico, pero hay que ejecutar el macro para que funcione, busque en el foro pero no encontre esta solución especifica. Hay alguna manera que al guardar salga el correo automaticamente. Este es el macro que uso, pero no se como asignarsela al boton guardar, gracias. Sub Mail_small_Text_Outlook() ' Is working in Office 2000-2010 Dim OutApp As Object Dim OutMail As Object Dim strbody As String Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(0) strbody = "Ha habido una modificación en " & ThisWorkbook.Name & vbNewLine & vbNewLine & _ "" & vbNewLi…

Hola!!!!!!!!! Saludos a todos. Bueno mi duda es que, primeramente tengo un userform el cual tengo que llenar de datos dentro de los combobox y textbox. Y para colocar el nombre de cada dato que se tiene que llenar puse label's. Ahora lo que quiero es que al hacer click el cada label me vote un cuadro de ayuda diferente (help) donde yo pueda poner la información necesaria de ayuda que se requiere para colocar ese dato. Espero me puedan entender la verdad no tengo ni la menor idea de como hacer eso, ni tampoco si se puede, por esa razon es que no adjunto ningun archivo ok. Agradezco a todos los que puedan ayudarme. Private Sub CommandButton1_Click() If TextBox1.tex…

Estimados tengo un problema en una lista, ya que cuando le doy Buscar Articulo se me habré un form con una lista y una imagen, pero cuando le doy click en la imagen se hace un zoom pero se me duplica los items dentro de la lista adjunto unas imágenes y el archivo Gracias por su ayuda espero que me puedan ayudar Sistema.rar

Amigos, Espero me puedan ayudar con esto, mi proceso consiste en importar varios archivos TXT a un libro de excel, los datos de cada archivo TXT deben corresponder a su repectiva hoja dentro del libro, pero tengo un problema, el TXT aparentemente tiene 6 columnas, pero al momento de querer copia los datos, me junta en una sola columna del excel, los valores de la columna uno y dos del txt. Como podría hacer para que a través de una macro, pueda separar estos datos y copie la información correctamete. Gracias.

Saludos amigos tengo un formato el cual he hido adjuntando varias macro con diferntes instrucciones y necesito adjuntar una nueva que haga lo siguiente, al Imprimir una o varias de las hojas del libro se vaya creando un archivo en PDF con el mismo nombre del libro, en la hoja DATOS hay una celda (C16) que le da el nombre del libro que generalmente es un numero, he revisado varios proyectos pero ninguno se adapta a mi requerimiento, tambien en el editor de vb en la hoja ThisWorkBook hay una macro que se ejecuta antes de imprimir intente usar esta instruccion pero no me funciono Sub GuardaPDF() Dim rutaarchivo As String rutaarchivo = "C:\PDFs\" ActiveSheet.Expor…

Estimados, recurro nuevamente e ustedes por el siguiente problema. En el documento adjunto, poseo una macros el cual deseo que al momento de ingresar un valor en el textbox con una pistola lectora de códigos de barra, se ejecute el botón ingresar. hasta ahí ningún problema, pero he estado intentando mediante el comando textbox1.setfocus que vuelva a posicionarse en el textbox después de hacer el ingreso y no me funca. La idea es que se ejecute el ingreso, borre lo que esta en el textbox y se posicione en el nuevamente. Desde ya un saludo y las gracias. Prueba.xls

Compañeros, tengo el siguiente problema tengo un archivo de excel que genera un sistema en mi trabajo, los valores de las celda en la columna "I" son fechas, en el formato "12/12/2016" por ejemplo, el formato de cada celda es "General", dependiendo del valor en la columna J, a la fecha de la columna I necesito sumarle 14 dias: If Range("J" & No).Value = 14 Then Range("I" & No).Value = DateAdd("d", 14, Range("I" & No).Value) ' se suman los 14 dias End If ya que termino de hacer todas las modificaciones, tengo que convertir los valores de la columna "I" en texto Columns("I").Select Selection.NumberFormat = "@" …

Hola, Estoy intentando de adaptar una macro que tengo de otro proyecto y me da error "run-time 424 se requiere un objeto". He buscado información sobre el error en causa pero no me aclaro. Lo que pretendo, en la hoja "LISTADO" atraves de un TEXTBOX en cuanto voy escribiendo un nombre completo o parte de un nombre se me muestra solo la/las fila/s que se aproximan o contienen el nombre completo de la lista de base de datos que tengo en los rangos "B7:H10000". Tal como lo tengo ahora escribo en la celda "C4" el nombre completo y me marca en amarillo la parte de la fila que contiene dicho nombre. Si la lista es demasiado larga costara mucho en localizar la…

Hola buenas, estoy intentando pasar un listbox a una función que me sume los valores de una de las columnas del listbox, pero aunque tenga datos me dice que recibe null, que el listbox vale null. No puedo entender lo que pasa ya que el mismo listbox lo paso a otra función en el mismo método para ver si existe un valor introducido y si que funciona. Private Sub bnt_ADD_TQ_Click() If Me.txt_DESCRIPCION_TQ.Text = Empty Or Me.txt_PRECIO_TQ.Text = Empty Then MsgBox ("Te has olvidado de introducir algún dato.") Else If Me.lst_TIQUETS.ListCount = 0 Then Me.lst_TIQUETS.AddItem Me.lst_TIQUETS.List(Q, 0) = Me.txt_DESCRIPCION_TQ.Te…

Hola a todos, Es posible que un boton que cumpla una función también de una señal de alerta para que indique "No Olvides Reportar tu Factura" este botón esta en la plantilla de excel seria el de Guardar factura, adjunto el ejemplo. Un Saludo FACTURA Y GUIA MODEL OK 61.zip

Estimados Tengo un problema que seguro alguien sabrá resolver y parece ser una tontería pero por más que busco en internet no consigo la respuesta. Tengo un formulario; cuando ejecuto el formulario directamente desde visual basic, todo funciona correctamente. Ahora bien, por decir en la “hoja 1”, llamo a este formulario por un botón: Private Sub AbrirFormulario() PpalForm.Show End Sub Sí, me muestra el formulario, pero cuando salgo o lo cierro, a pesar de haber seleccionado alguna de las opciones del formulario que terminan por ejemplo: Worksheets("Hoja2").Activate Range(“A1”).Select Me muestra la hoja “Hoja2” y al parecer está en la celda “A1”, pero si por ejem…

Hola gente, tengo una consulta sobre un libro que estoy creando. Tengo un indice con todas las hojas del libro, y lo que busco es que al presionar el link con el nombre de la hoja solo muestre la hoja de destino por unos segundos. También podría ser la posibilidad de poner un botón en cada hoja para que vuelva al menú principal y este se ejecute automáticamente cada "x" segundos. En el archivo que adjunto puse el indice en cada hoja, pero ahora el indice que necesito es mucho mas grande y no entra para poner en cada hoja, y que se vea completo en un monitor de 28", por eso quiero poner el indice en una sola pagina, y luego de accionar algún botón regrese a es…

Hola. Mi problema es el siguiente. Tengo una lista desplegable con 150 elementos, y deseo que en función del elemento que escoja realice una u otra función (al cual llamare con una macro). La lista desplegable la tengo asociada a la celda A1. si cambio el elemento de la lista cambia el valor de la celda a1. Pero no consigo que el Excel se de cuenta que ha habido una actualización en la celda A1 y comience de nuevo el programa. En cambio, si el valor de A1 lo cambio manualmente, es decir, introduzco yo el valor entonces si que se activa Private Sub Worksheet_Change(ByVal Target As Range) End Sub y me ejecuta el programa. Lo que me gustaría saber (para evitar poner …

Hola a todos, me estoy encontrado con un problema, y no le encuentro solución por ninguna parte. Cuando desde un libro de excel llamo a otro y le pido que me ponga un formulario de otro excel, y repito esta acción varias veces, este ya no aparece, y no logro entender porque esto sucece. Adjunto dos archivos con el asunto en cuestión. Como siempre, muchas gracias por vuestra ayuda. PRIMERO.xls SEGUNDO.xls

Que tal .. Soy nuevo en el foro. estuve buscando un tema similar a mi problema y no encontre, agradecería si alguien me podría asesorar o ayudar con mi problema lo cual no debe ser muy complicado ya que es una función muy util y no soy el primero en tratar de desarrollar algo asi. Bueno el formato que me interesa tiene 3 objetivos 1.- un ingreso de datos mediante un cuestionario a una hoja de excel, hay un sinfín de tutoriales para eso y por este punto no me mortifico. 2.- el aviso de vencimiento de cada dato anexado, por ejemplo si doy de alta a un usuario que excel me avise cada determinado tiempo el vencimiento de este. aqui la cuestión si fuera mes tras mes seria …

Hola, Alguien me podría apoyar con una maros que pueda generar una alarma en Excel? He estado buscando información, pero la mayoría son para fechas, y no sé programación. Lo que requiero es un aviso para cuando tenga el stock mínimo para determinados productos. Gracias!

Tengo una macro muy grande y cuando se ejecuta tiene un fondo que no permite ver los movimientos y calculos, cuando se ha producido algun error no me doy cuenta ya que esta con Estado = Application.Calculation Application.Calculation = xlCalculationManual Application.EnableEvents = False Application.ScreenUpdating = False Necesito algun sonido en una macro que me indique que se ha producido un error cuando esto sucede. Gracias por la ayuda Milton

Hola podrian ayudarme a crear una alarma en la pantalla con sonido el cual me indique un mensaje en el que hay que hacer "cambios de parametros" y que si no le doy aceptar no deje de salir dicha alarma. La hora va a estar indicada en la celda A1 y la otra en la celda A2. mensaje.xls