Problema ejecutar macro

Hola Paolita,

En que se traduce que no funciona, da algún mensaje de error? o se queda sin
hacer nada?

Aparentemente el código supone que tienes abiertos dos hojas dentro de la
misma instancia de excel y que desde se llaman informe.txt e informe.xls.
Y que informe.xls es el libro que está activo al ejecutar la macro.
Si alguna condición de estas no se cumple la macro falla o no hará nada.

Un saludo,
Juan

"Paolita" escribió
Estimados trato de copisra datos desde un TXT a un Excel y la macro
me funciona en unos PC y entros no se queda en el excel, porque será
¿? el codigo es el siguiente:

'Windows("informe.xls").Activate
Cells.Select
Selection.ClearContents
Windows("informe.txt").Activate
Cells.Select
Selection.Copy
Windows("informe.xls").Activate
'Windows("informe.xls").Activate
ActiveSheet.Paste
Windows("informe.txt").Activate
ActiveWindow.Close

desde ya muchas gracias

On 3 nov, 14:06, "Juan M" wrote:

Hola Paolita,

En que se traduce que no funciona, da algún mensaje de error? o se queda sin
hacer nada?

Aparentemente el código supone que tienes abiertos dos hojas dentro de la
misma instancia de excel y que desde se llaman informe.txt e informe.xls.
Y que informe.xls es el libro que está activo al ejecutar la macro.
Si alguna condición de estas no se cumple la macro falla o no hará nada.

Un saludo,
Juan

"Paolita" escribió
  Estimados trato de copisra datos desde un TXT a un Excel y la macro
me funciona en unos PC y entros no se queda en el excel, porque será
¿? el codigo es el siguiente:

    'Windows("informe.xls").Activate
    Cells.Select
    Selection.ClearContents
    Windows("informe.txt").Activate
    Cells.Select
    Selection.Copy
    Windows("informe.xls").Activate
    'Windows("informe.xls").Activate
    ActiveSheet.Paste
    Windows("informe.txt").Activate
    ActiveWindow.Close

desde ya muchas gracias

No pega los datos desde el txt al xls y por tanto despues se cae
cuando trato de hacer un filtro, pero el problemas es en algunos pc no
mas y estan en la misma condicion con Windows XP Y Oficces 2003

hola, Paolita !

... trato de copisra datos desde un TXT a un Excel y la macro me funciona en unos PC
y entros no se queda en el excel, porque sera el codigo es el siguiente:

(probablemente) en las pc's donde falla se debe a que en el menu (ventana) se muestra SIN la EXTension (.xls, .txt, etc.)
y esto obedece a la configuracion de cada equipo donde...
se puede optar por NO mostrar las EXTensiones de los tipos de archivo de las aplicaciones registradas -?-

si te resuelve esta stuacion, procura usar en lugar de Windows("archivo.EXT") <-> Workbooks("archivo.EXT")

saludos,
hector.

__ el codigo expuesto __
'Windows("informe.xls").Activate
Cells.Select
Selection.ClearContents
Windows("informe.txt").Activate
Cells.Select
Selection.Copy
Windows("informe.xls").Activate
'Windows("informe.xls").Activate
ActiveSheet.Paste
Windows("informe.txt").Activate
ActiveWindow.Close