Buen día,
Al pulsar el botón guardar del formulario el archivo se guarda con 2 EXTENSIONES (.PDF Y .XLSM) en el mismo destino C:, ambos se guardan con la misma información.
Que me gustaría:
Poder abrir el libro desde excel y que se copien las siguiente celdas automáticamente.
h8-g9-b10-f10-e11-f11 de la b13 a la b15. que se copie del libro que se guarda en .XLSM en disco C: a el libro de facturación.
ya la macro para buscar el libro esta lista solo falta poder hacer que se copien las celdas y cierre el libro ABIERTO automáticamente.
Feliz dia muchas gracias
| Adjunto | Tamaño |
|---|---|
 facturacion_-_copy_2.xlsm | 256.14 KB |
Como quieres intercambiar datos entre el libro actual y el libro que vas abrir, te sugiero que utilices una variable de tipo libro para referirte al nuevo libro
Suponiendo que en la variable rutaArchivo tengas la ruta completa al archivo
Dim ElOtroLibro as Workbook
Set ElOtroLibro =Workbooks.Open(rutaarchivo)
Por ejemplo para poner en la celda activa el valor que haya en la hoja "datos", celda "B32" del otor libro, puedes hacer lo siguiente:
ActiveCell.Value=ElOtroLibro.Sheets("datos").Range("B32").value
Para escribir datos en el otro libro, tomándolos de otro sitio, pues más o menos igual, por ejemplo, para escribir en la celda B54 de la hoja "resultados" del otro libro un valor que tengo en la variable MiVariable, podrías hacer esto
ElOtroLibro.Sheets("resultados").Range("B54").value = MiVariable
ves que se puede hacer de muchas maneras, depende de lo que quieras hacer y de dónde tengas los datos y dónde los quieras copiar.
Cuando termines, para cerrar el libro
ElOtroLibro.Close True ' True es para guardar los cambios
Set ElOtroLibro=Nothing
------
Ya sé Excel, pero necesito más.