Hola, Buenos dias.
Tengo el siguiente problema, tengo 2 Cuadros de Lista que contienen el Pais y Marcas
| Pais |
|---|
| Chile |
| Argentina |
| EEUU |
| Brasil |
| Pais | Marcas |
|---|
| Chile | Marca 1 |
| Chile | Marca 2 |
| EEUU | Marca 3 |
| EEUU | Marca 4 |
| EEUU | Marca 5 |
| Brasil | Marca 6 |
| Argentina | Marca 7 |
| Argentina | Marca 8 |
Al seleccionar algun Pais este filtra sus marcas correspondientes, la idea es poder generar un boton que exporte esta informacion a EXCEL
para eso tengo lo siguiente (Boton con una Macro).
Codigo.
la necesidad es poder generar automaticamente 1 archivo por cada pais y sus marcas en otra hoja, por ejemplo.
Informe1_Chile.xls y su contenido seria en la Hoja 1 Chile y en la Hoja 2 Marca 1 y Marca 2
Muchas Gracias.
Saludos, Rodrigo
Sub Genera_Excel
Directorio = ActiveDocument.GetVariable("xPathExport").GetContent.String
Archivo1 = "Informe1"
Archivo2 = "Informe2r"
ExtArchivo = ".xls"
Archivof1 = Directorio & Archivo1 & ExtArchivo
Archivof2 = Directorio & Archivo2 & ExtArchivo
' 'Crear Archivos
Set Pais = ActiveDocument.GetSheetObject("INF_PAI_01")
Pais.ExportBiff Archivof1
Set Set = Nothing
Set Marca= ActiveDocument.GetSheetObject("INF_MAR_01")
Marca.ExportBiff Archivof2
Set Marca= Nothing
End Sub
