lopezatienza.com

Buenas a todos.

Cuando os desaparzcan los menus de Excel y no podais reactivarlos, poneis los botones de las macros para poder ejecutar macros y ejecutais el siguiente código:




Sub recuperar()

Dim Tbar As CommandBar

On Error Resume Next

For Each Tbar In Application.CommandBars

Tbar.Reset

Tbar.Enabled = True

Next Tbar

Application.CommandBars(35).Enabled = True

Application.CommandBars("Cell").Enabled = True

CommandBars("ply").Enabled = True

End Sub




Un saludo y espero os sirva de ayuda.

Gracias a Javier Dominguez por la información.

Autor: Antonio Lopez Atienza

Hola a todos.

Después de investigar la forma de recuperar los correos de un archivo con extensión .pst, dí con la solución con un ejecutable que te trae el mismo paquete Office 2003.

Estos son los pasos a seguir:

1. En el menú Inicio, haga clic en Ejecutar.
2. En el cuadro Abrir, escriba unidad:\Archivos de programa\Archivos comunes\System\Mapi\LCID\scanpst.exe donde LCID es el identificador de configuración regional de la instalación de Microsoft Office. Por ejemplo, el LCID para inglés (EE.UU.) es 1033. Para obtener una lista de todos los LCID, vea la Ayuda de Microsoft Office.
3. Haga clic en Aceptar.
4. En el cuadro Escriba el nombre del archivo que desea analizar, escriba la ruta de acceso y el nombre del archivo que aparecen en el mensaje de error anterior.Nota  Quizás no pueda utilizar el botón Examinar para buscar este archivo ya que se ubica en una carpeta oculta.
5. Para cambiar las opciones de registro durante la exploración, haga clic en Opciones. Si elige Reemplazar registro o Anexar al registro, el archivo de registro se guarda en el mismo directorio que el archivo .pst.
6. Haga clic en Inicio.
7. Cuando haya finalizado la exploración del archivo, active la casilla de verificación Antes de reparar, hacer copia de seguridad del archivo analizado.
8. Haga clic en Reparar.

Si la reparación se ha realizado correctamente, aparecerá el mensaje Reparación completa. Si la Herramienta de reparación de la Bandeja de entrada no ha podido reparar el archivo, tendrá que utilizar la copia de seguridad.

Autor: Antonio Lopez Atienza