Id. de artículo: 327572 - Última revisión: martes, 20 de febrero de 2007 - Versión: 5.5

PRB: No se puede cambiar el origen de datos para una tabla dinámica en Excel para una conexión de Analysis Services

Vista en paraleloHaga clic aquí para ver en paralelo el artículo de traducción automática y el artículo original en inglés.
Traducción automáticaAdvertencia: Artículo de Traducción Automática, vea la exención de responsabilidad.
Ver los productos a los que se aplica este artículo
Nota acerca de su sistema operativoEste artículo se aplica a un sistema operativo distinto al que usa. El contenido del artículo que puede que no sea importante para usted, se deshabilitará
Expandir todo | Contraer todo

Síntomas

Después de cambiar el nombre de servidor del equipo que ejecuta Analysis Services que utiliza una tabla dinámica de Excel, no se puede cambiar manualmente la información de conexión a la nueva carpeta o el servidor.

Solución

Nota : Microsoft ha probado el siguiente ejemplo de código en Excel 2000.

Para evitar este problema, utilice Visual Basic para aplicaciones para cambiar mediante programación el origen de datos de una tabla dinámica en Excel para una conexión de Analysis Services:
  1. Inicie Excel 2000.
  2. Abra el archivo que contiene la tabla dinámica (o tablas dinámicas) que desea modificar.
  3. En el menú Herramientas , elija macro y, a continuación, haga clic en Editor de Visual Basic .
  4. En el menú Insertar , haga clic en módulo .
  5. En el módulo, inserte el siguiente código de macro: 
    Option Explicit

Sub ChangeServer()

    Dim sh As Worksheet, qy As QueryTable
    Dim pt As PivotTable, pc As PivotCache
    Dim OldPath As String, NewPath As String
    Dim strOld As String, strNew As String

    ' Replace the following paths with the original path or 
    ' server name where your database resided, and the new 
    ' path or server name where your database now resides.
    
    OldPath = "<old server name>"
    NewPath = "<new server name>"

    For Each sh In ActiveWorkbook.Sheets

        For Each pt In sh.PivotTables

            strOld = pt.PivotCache.Connection
            strNew = Replace(strOld, OldPath, NewPath)
            pt.PivotCache.Connection = strNew
            pt.PivotCache.Refresh

        Next pt

    Next sh

End Sub
  6. Cambiar OldPath y NewPath el nombre del servidor apropiado. Si utiliza un servidor que no existe para NewPath , se abre el Asistente para conexión multidimensional al realizar el paso 12 de este procedimiento.
  7. En el menú archivo , haga clic en Cerrar y, a continuación, devolver a Microsoft Excel.
  8. Cambie a la primera hoja.
  9. En el menú Herramientas , elija macro y, a continuación, haga clic en macros .
  10. En la lista de macros, seleccione la macro ChangeServer y, a continuación, haga clic en Ejecutar .
  11. Abre un cuadro de diálogo en el que puede cambiar el servidor y que enumera los cubos disponibles. Cambiar el cubo no cambia el cubo para las consultas que usan este código.
  12. El cuadro de diálogo a su vez se abre para cada una de las tablas dinámicas.
  13. Actualizar el nombre de tabla dinámica de su servidor.
  14. Guardar la hoja de cálculo. Puede que desee quitar la macro antes de distribuir la hoja de cálculo.
La información de este artículo se refiere a:
  • Microsoft Excel 2000 Standard Edition
  • Microsoft SQL Server 2000 Standard Edition
  • Microsoft SQL Server 2000 Analysis Services
Volver al principio
Palabras clave: 
kbmt kbprb KB327572 KbMtes
Traducción automáticaTraducción automática
IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.
Haga clic aquí para ver el artículo original (en inglés): 327572  (http://support.microsoft.com/kb/327572/en-us/ )
Volver al principio