problema ejecucion de macro

sven · 5 Oct 2018

tengo la siguiente macro:

Sub MoverArchivos()
Dim i, j As Integer
Dim fn As Integer
Dim cadena As String
Dim ruta As String
Dim arr

fn = FreeFile
archi = ThisWorkbook.Path
ChDir archi
ruta1 =...

Cacho R · 5 Oct 2018

.
Hola! sven. Dos preguntas:

- ¿Qué se supone que tienes?... ¿Y dónde?...

- ¿Qué se supone que quieres hacer?... ¿Y hacia que carpeta?...

Saludos, Cacho R.
.

sven · 8 Oct 2018

¿Qué se supone que tienes?: esto es una macro que forma parte de una cadena de macros que se inician al abrir el excel.

¿Y dónde? : en un modulo todas menos esta :
Private Sub Workbook_Open()...

Cacho R · 8 Oct 2018

.

Código:

Sub moverArchivos()
Dim iFile$, pathDesde$, pathHacia$

pathDesde = ThisWorkbook.Path

Do
  iFile = Dir(pathDesde & "\*.txt")
  If iFile = "" Then Exit Do
  pathHacia = pathDesde & "\" &...

sven · 8 Oct 2018

la macro hace lo mismo y falla en el mismo sitio, si lo ejecuto manualmente va, si lo abre el excel iniciarse falla.
se me ocurre... ¿puede ser que como la macro toma datos del txt considera que...

Cacho R · 8 Oct 2018

.

sven dijo:
la macro hace lo mismo y falla en el mismo sitio..

Claro que no hace lo mismo... puesto que no tenías previsto que -a veces- hay que dar tiempo al SO para que cree una nueva...

sven · 9 Oct 2018

XD Holas atrasadas.
Te comento el txt no lo abre ningún programa mas que el excel que en los pasos anteriores de la macro esta toma datos de el asi que no puedo cerrar nada, no paso el excel...

Bienvenido a la mayor comunidad de usuarios EXCEL

problema ejecucion de macro

sven

New member

Cacho R

Moderator

sven

New member

Cacho R

Moderator

sven

New member

Cacho R

Moderator

sven

New member

Temas similares