crear carpetas y mover archivos

13/08/2008 - 19:07 por cesss215 | Informe spam

Deseo saber como puedo crear carpetas en un directorio con el mismo nombre de
los archivos que tengo en el (por ejemplo en un c:\imagenes, tengo varias
imagenes *.jpg, lo que quiero es tener una carpeta por cada una de las
imagenes) eso por un lado y por otro que esas imagenes se muevan despues a la
carpeta correspondiente con su nombre.
He encontrado una pagina en internet con un codigo para resolver lo anterior
pero solo me funciona el crear carpetas y no el de move los archivos a sus
carpetas. La pagina es la siguiente:

http://www.teladearana.es/content/view/91/118/

lo unico que he cambiado es en una linea lo de *.rtf por *.jpg

"=files(""" & Base & "*.rtf"")": Erase sFolders

pero aun asi no funciona. Quisiera que alguien que entienda de esto me diera
una solucion, igual es mucho pedir en estas fechas pero me urge un poco para
resolve unos problemas en el trabajo

gracias anticipadas, espero noticias vuestras
MARIA JESUS

Siga el debate

3 respuestas

Tengo una respuesta

DRAGON AGE™: INQUISITION – Matadragones

Leer las respuestas

#1 cesss215

14/08/2008 - 10:04 | Informe spam

Primero lo hago desde excel-2003. Me funciona crear_carpeta, pero una vez
creada si hago el siguiente paso no me mueve los ficheros a la carpeta
correspondiente, es decir no le hace nada, en el directorio ves los ficheros
y su carpteras y estas estan vacias, no lleva el archivo a su carpeta, esto
es lo que me falla igual es que no hago algo bien, no se de programacion pero
si el otro modulo me ha funcionado entiendo que el siguente me tendria que
funcionar, primero pense que era por lo del *.rt y como yo utilizaba *.jpg,
cambie en esa linea lo de la extension del archivo pero aun asi no me
funciona. A ti si?? dime algo por favor.
GRACIAS por responderme.
maria jesus

"Héctor Miguel" wrote:

hola, Maria Jesus !

el ejemplo de la pagina debe funcionar en cualquier entorno de vba6 PERO... desde la aplicacion EXCEL (2000 en adelante)
(utiliza caracteristicas disponibles solamente en excel, como la definicion de un nombre temporal)

de hecho, al inicio del articulo hay dos comentarios que "rezan" +/- asi:
- Nota: Codigos realizados en este articulo para una version superior o igual a Microsoft Office Excel XP
- Abrimos un archivo de Excel y le damos a las teclas [Alt + F11] de esta manera abrimos el Editor de Codigo de VBA de Excel.

comentas si lo estas tratando de ejecutar NO desde excel ?

saludos,
hector.

__ OP __
> Deseo saber como puedo crear carpetas en un directorio con el mismo nombre de los archivos que tengo en el
> (por ejemplo en un c:\imagenes, tengo varias imagenes *.jpg, lo que quiero es tener una carpeta por cada una de las imagenes)
> eso por un lado y por otro que esas imagenes se muevan despues a la carpeta correspondiente con su nombre.
> He encontrado una pagina en internet con un codigo para resolver lo anterior pero solo me funciona el crear carpetas
> y no el de move los archivos a sus carpetas. La pagina es la siguiente: http://www.teladearana.es/content/view/91/118/
> lo unico que he cambiado es en una linea lo de *.rtf por *.jpg
> "=files(""" & Base & "*.rtf"")": Erase sFolders
> pero aun asi no funciona...

Leer las otras respuestas

Preguntas similares

Busqueda sugerida :