Mediante ayuda de un miembro llamado Shauinto, a quien le debo muchos agradecmientos, logre hacer una aplicacion en excel, que me permite busquedas y edicion de informacion de planos.
La Solicitud que hago es la siguiente, y agradeceria la atencion que me puedan brindar.
1. El archivo contiene 6 userform, solo uso 2, que serian el editor, y el buscador. Los otros 4 userforms, son para usos secundarios como carga de un archivo, o seleccion de tipo de identificacion de un plano, o correccion.
2. Tengo el inconveniente de que al insertar un nuevo plano, el hipervinculo o ruta del archivo me lo crea en las dos hojas, la hoja de presentacion hoja1, y en el listado llamado listas. No puede mostrarse ningun hipervinculo en la Hoja1, por que aqui hago las operaciones requeridas. No se que podria hacer, y por ello, les hago la consulta. Cabe destacar que la hoja Listas, esta oculta, y uso las propiedades de Application.Sheets("Lista").Visible = True o False, para realizar las operaciones que requiero, esto por que debo mantener esta hoja oculta, ya que es el listado de datos.
3. Tengo dos combobox, para intentar hacer un filtrado tipo cascada, es decir, si selecciono 8BT2 en el campo technology, deben aparecer en type BBC o CC, o si selecciono 8DA10, solo deben aparecer ductos o LVC.
Solicito ayuda con los dos puntos anteriores. Si hay alguna duda, o sugerencia, con gusto la tendre en cuenta para hacerme enntender lo mejor posible respecto a mi pedido.
Por ultimo, olvide mencionar, que hay una macro, ubicada en la hoja llamada Listas, que permite el hipervinculado, en una fila y columnas predeterminadas, que en este caso es la F. La macro es la siguiente
Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next
If Target.Column = 6 And Target.Row > 6 And Not Trim(Target.Value) = Empty Then ' NOMBRE = Target.Value fichero = Target.Value direccion = ruta & fichero ruta = Lista.Cells(6, 6) & " G: " & ".pdf" Target.Select Application.Sheets("Lista").Visible = True ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=direccion, TextToDisplay:=fichero End If Application.Sheets("Lista").Visible = False End Sub [/code]
Donde G: es la unidad que uso para la localizacion de los archivos, y hacer la operacion de marcar la ruta del archivo y posteriormente hipervincularla. Gracias.
Adjunto el archivo, y muchas gracias por la colaboracion prestada.
Estimados amigos del foro ayudaexcel.com
Mediante ayuda de un miembro llamado Shauinto, a quien le debo muchos agradecmientos, logre hacer una aplicacion en excel, que me permite busquedas y edicion de informacion de planos.
La Solicitud que hago es la siguiente, y agradeceria la atencion que me puedan brindar.
1. El archivo contiene 6 userform, solo uso 2, que serian el editor, y el buscador. Los otros 4 userforms, son para usos secundarios como carga de un archivo, o seleccion de tipo de identificacion de un plano, o correccion.
2. Tengo el inconveniente de que al insertar un nuevo plano, el hipervinculo o ruta del archivo me lo crea en las dos hojas, la hoja de presentacion hoja1, y en el listado llamado listas. No puede mostrarse ningun hipervinculo en la Hoja1, por que aqui hago las operaciones requeridas. No se que podria hacer, y por ello, les hago la consulta. Cabe destacar que la hoja Listas, esta oculta, y uso las propiedades de Application.Sheets("Lista").Visible = True o False, para realizar las operaciones que requiero, esto por que debo mantener esta hoja oculta, ya que es el listado de datos.
3. Tengo dos combobox, para intentar hacer un filtrado tipo cascada, es decir, si selecciono 8BT2 en el campo technology, deben aparecer en type BBC o CC, o si selecciono 8DA10, solo deben aparecer ductos o LVC.
Solicito ayuda con los dos puntos anteriores. Si hay alguna duda, o sugerencia, con gusto la tendre en cuenta para hacerme enntender lo mejor posible respecto a mi pedido.
Por ultimo, olvide mencionar, que hay una macro, ubicada en la hoja llamada Listas, que permite el hipervinculado, en una fila y columnas predeterminadas, que en este caso es la F. La macro es la siguiente
Donde G: es la unidad que uso para la localizacion de los archivos, y hacer la operacion de marcar la ruta del archivo y posteriormente hipervincularla. Gracias.
Adjunto el archivo, y muchas gracias por la colaboracion prestada.
Copy of Busqueda y Edicion ALL DTOS (modificaciones).xls
Copy of Busqueda y Edicion ALL DTOS (modificaciones).xls