Ivan Cuenca

Prueba con Ruta=activeworkbook.path & “\PDF”

Pega este código en todas las hojas que quieras que tengan esta función: Option Explicit Private Sub Worksheet_SelectionChange(ByVal Target As Range) If ActiveCell = Range("A1") Then Formulario.Show 'Aquí pon el nombre de tu formulario End If End Sub

A ver que tal te funciona este código. Tienes que ponerlo en módulo de la hoja en cuestión. Cada vez que selecciones una celda de la columna TD te pintará los valores coincidentes de verde y los no coincidentes los dejará sin color. Option Explicit...

Si he entendido bien hay que general tantos textbox como veces aparece el valor buscado en la columna A, y a cada combo box se le asigna el valor correspondiente a la misma fila en la columna B ¿Correcto? Para resolverlo he creado un formulario de...

Uff! Pues no, creo que sencillo no es, pero imposible tampoco. Primero, a ver si he entendido bien el problema: en todos los rodamientos aparece un código númerico que normalmente esta entre dos espacios (como en el "Rodamiento 60202 2RS") pero que...

Entiendo que el número de comprobante es único. Si es así deberías crear una tabla a parte con tres columnas: Nº Comprobante Observaciones Estado Esta tabla la puedes ligar a la de la imagen 2 con un BUSCARV El inconveniente de este sistema es que...

Prueba con las funciones sumar. Si o sumar. Si. Conjunto

Podrías intentar algo así: Sub Recortar_a_6_digitos() Dim Celda As Range Set Celda = Range("G2") '<-- aquí pon la primera celda con valores Celda.Select While Not Celda.Value = "" '<--- El algoritmo se parará cuando encuentre una celda en blanco...

Hay muchos tipos de botones diferentes, te explico los que yo se programar a ver si alguno de estos te sirve: Botones ActiveX Estos son mis favoritos por que te dan mucho control sobre el botón en si. Una vez creado el botón simplemente con click...

Me encontré el mismo problema hace unos años, al final tuve que resignarme y programarlo en una rutina que ejecutaba a conveniencia.