angy57

vikmar respondió: ' Aqui está el código y no olvides de cerrar la pregunta ' saludos Sub abrirArchivoWord() 'rutina donde pueda abrir un archivo de Word '(el nombre de archivo saldría de una celda concatenada) Dim wdApp As Word.Application, wdDoc As Word.Document Dim...

Cadipas spain respondió: Si no te he entendido mal, prueba esto..., me imagino que sabrás utilizarla, si tienes dudas, preguntame: ahí va la rutina: With Range("g5:g10") Set c = .Find(Range("h1"), LookIn:=xlValues) If Not c Is Nothing Then firstAddress = c.Address Do fila =...

leone respondió: He verificado el código, lo he probado y esta a la perfección, pega el formato de las celdas de manera correcta. Indicame detalles del error que te genera. Si puedes especifica más detalles como que datos estas copiando y los de destino, y que...

Elsa Matilde respondió: ¿Qué tipo de form tenés? En hoja, en Userform? Ese cuadro de texto (o lo que fuese), ¿dónde se guardará? ¿En 1 celda? ¿1 comentario? Espero tus aclaraciones

Elsa Matilde respondió: Como esto parece ser solo una parte de la rutina, quizás lo que te dejo a continuación no responda del todo al problema, si es así escribime nuevamente explicando o agregando el resto del código. Lo que hace esta parte de la rutina ajustada, es...

Elsa Matilde respondió: Como no comprendo cómo realizás la búsqueda ('... Mi planilla en excel busca un dato...' ) entonces supondré que tenés un control Textbox1 donde ingresas el dato a buscar. Necesitas una rutina como esta, que colocarás en un botón o en el evento...

Anónimo respondió: Pues simplemente agrega al principio del código que se posicione en el libro que quieres mediante algo parecido a esto sub TuMacro() Windows(tuLibro). Activate ... TuCodigo end sub

Juan Carlos González Chavarría respondió: Para que sea un poco más estándar puedes utilizar la instrucción thisworkbook. Path, la cual te leerá sin importar la ruta.