documentos viejos en word

Estoy tratando de abrir documentos creados en word en el año de 2003 y se
demora aproximadamente 6 minutos para abrir y algunos no abren y sale un
error. Ya monte todas las actualizaciones hasta el día de hoy y ya intente
abrir reparando pero no se me soluciona el problema y son muchos archivos
que
tienen este problema, mi version es 2003.

Muchas gracias a quien me pueda colaborar.

César

Hola:
Prueba con esta macro un poquillo modificada a ver si así:
Sub Test()
Dim strFilePath As String
Dim strPath As String
Dim intCounter As Integer
Dim strFileName As String
Dim objDoc As Document
Dim objTemplate As Template
Dim dlgTemplate As Dialog
Dim objWord As Word.Application


strFilePath = InputBox("Introduce la ruta de la carpeta donde están los
archivos a cambiar")
If Right(strFilePath, 1) <> "\" Then strFilePath = strFilePath & "\"
strFileName = Dir(strFilePath & "*.doc")
Application.ScreenUpdating = False
Do While strFileName <> ""
Set objDoc = Documents.Open(strFilePath & strFileName)
Set objTemplate = objDoc.AttachedTemplate
Set dlgTemplate = Dialogs(wdDialogToolsTemplates)
strPath = dlgTemplate.Template
With ActiveDocument
'En la siguiente línea ponemos la ruta a nuestra actual
plantilla Normal, por defecto _
en un Windows XP es la que te propongo
.AttachedTemplate = "J:\Documents and Settings\User\Application
Data\Microsoft\Templates\Normal.dotm"
End With
strFileName = Dir()
objDoc.Save
objDoc.Close
Loop
Application.ScreenUpdating = True
Set objDoc = Nothing
Set objTemplate = Nothing
Set dlgTemplate = Nothing
End Sub

La línea de AttachedTemplate se habrá cortado así que pon la ruta correcta
en una sola línea.
Marta
Saludos
www.fermu.com

"César" wrote in message
news:
> Buenos días Marta, quisiera hacerte una ultima pregunta y disculpame, es
> la
> siguiente:
>
> Para solucionar el problema de todos los archivos la opción correcta es
> utilizar el código que hay en el metodo 4 del articulo 830561 pero la
> verdad
> nose donde pegarlo y correrlo para que me haga la tarea, ya que lo que
> hice
> fue crear un documento nuevo en word, puse la opción de seguridad de
> macros a
> bajo y cree una macro y pegue este codigo, luego corri la macro, y aparte
> de
> que se demoro muchisimo varias horas, reviso los documentos y estan
> iguales.
> Como la ejecuto para que me corra de forma correcta?
>
> Muchas gracias de nuevo.
>
> "César" wrote:
>
>> Buenos días Marta,
>>
>> Muchas, Muchas gracias por su información, ese era mi problema y con tu
>> asistencia pude solucionarlo, precisamente ese era exactamente el
>> problema
>> que tenia, era un problema de plantilla en esos documentos.
>>
>> Que Dios la bendiga y le ayude en todas sus actividades.
>>
>>
>>
>> "Marta PM" wrote:
>>
>> > Revisa a ver si es esto: http://support.microsoft.com/kb/830561/
>> >
>> > Marta
>> > Saludos
>> > www.fermu.com
>> >
>> > "César" wrote in message
>> > news:
>> > > Hola Marta, muchas gracias por atender mi necesidad.
>> > >
>> > > Mira los que se demoran en abrir que es basicamente entre 6 y 9
>> > > minutos
>> > > asi
>> > > sean solo una pagina de contenido, si abren bien o les queda faltando
>> > > un
>> > > pedazo al final o abre con partes en lenguaje de maquina, pero la
>> > > mayoria
>> > > me
>> > > estan abriendo bien, ahora lo que me parece extraño es que se demora
>> > > demasiado ya que un archivo normalmente se demora menos de 10
>> > > segundos en
>> > > este equipo. Quisiera poder tener una solución porque son mas de 250
>> > > archivos
>> > > y la unica manera que tengo de arreglarlos es abrir de a uno,
>> > > seleccionar
>> > > todo y luego abrir un documento nuevo y pegar y guardarlo y ahi si
>> > > queda
>> > > bien.
>> > >
>> > > Por tu atención muchas gracias
>> > >
>> > >
>> > >
>> > > "Marta PM" wrote:
>> > >
>> > >> Hola:
>> > >> ¿Los que tardan en abrirse al final se abren bien?
>> > >> ¿Cuál es el error que te da?
>> > >>
>> > >> Marta
>> > >> Saludos
>> > >> www.fermu.com
>> > >>
>> > >> "César" <Cé wrote in message
>> > >> news:
>> > >> > Estoy tratando de abrir documentos creados en word en el año de
>> > >> > 2003 y
>> > >> > se
>> > >> > demora aproximadamente 6 minutos para abrir y algunos no abren y
>> > >> > sale
>> > >> > un
>> > >> > error. Ya monte todas las actualizaciones hasta el día de hoy y ya
>> > >> > intente
>> > >> > abrir reparando pero no se me soluciona el problema y son muchos
>> > >> > archivos
>> > >> > que
>> > >> > tienen este problema, mi version es 2003.
>> > >> >
>> > >> > Muchas gracias a quien me pueda colaborar.
>> > >> >
>> > >> > César
>> > >> >
>> > >>
>> > >>
>> > >>
>> >
>> >
>> >