Exportar tabla dinamica de Access a Excel
Publicado por Alfredo (10 intervenciones) el 06/08/2012 16:08:39
Hola, muy buen dia disculpen, esque tengo una duda y hasta ahorita no he podido resolverlo, he estado Tratando de exportar de Access a Excel una consulta que tengo en vista de tabla dinamica, el problema es que a la hora de exportarla me la exporta como una tabla normal y yo quiero que me la exporte como esta, en tabla dinamica, tengo este codigo
Pero lo he cambiado en distintas formas creyendo que me lo pueda expoortar y no he podido, ojala me pudiesen ayudar, de antemano mil gracias.
Saludos.
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Comando22_Click()
Dim nomExcel As String
Dim miRange1 As String
Dim Fecha As String
Fecha = Format(Date, "medium date")
nomExcel = "\\10.81.4.150\supply chain\DV\MRP V1.0\reportes diarios\Histórico Consumos PM\Reporte_Historico_PM" & Fecha & ".xls"
miRange1 = acViewPivotTable("tabla dinamica PM")
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel8, "tabla dinamica PM", nomExcel, , miRange1
MsgBox "Exportación Realizada", vbInformation, "Finalizar"
End Sub
Pero lo he cambiado en distintas formas creyendo que me lo pueda expoortar y no he podido, ojala me pudiesen ayudar, de antemano mil gracias.
Saludos.
Valora esta pregunta
0