Export immagini

Hai un problema con Excel?

Nuova discussione

Export immagini
di LanelloMancante data: 23/11/2013 20:46:31
Un saluto a tutti, ho un problema che:
ho una cartella chiamata "Prod" che contiene immagini di prodotti e ho un file exel chiamato "listino".
All'interno del file listino ce la colonna "BL" che contiene il percorso di dove si trovano le immagini.

C:UsersAntonioDocumentsDanea EasyfattArchiviL_M - AllegatiProdI-SWHUB 16GP -- 000 (1230).jpg

Naturalmente l'immagine ha lo stesso nome es. I-SWHUB 16GP -- 000 (1230).jpg

il problema qual'è: voglio estrapolare le immagine dalla cartella "Prod" ed importarli in un'altra cartella chiamata "Prodexport" solo di alcuni articoli del foglio exel aggiungendo la lettera "E" alla colonna "A"

Vi ringrazio di cuore
Claudia
di patel data: 23/11/2013 20:58:42
non ho capito, allega un file di esempio con pochi dati ed anche il risultato desiderato
di Vecchio Frac data: 24/11/2013 09:58:22
Questa discussione è identica ad altra che Lanellomancante (aka Claudia) ha aperto nell'altro forum, quindi per evitare confusioni sarà chiusa.
Chiedo a tutti di proseguire nell'altro forum.
Grazie.
Export immagini
di LanelloMancante data: 23/11/2013 20:16:02
Un saluto a tutti, ho un problema che:
ho una cartella chiamata "Prod" che contiene immagini di prodotti e ho un file exel chiamato "listino".
All'interno del file listino ce la colonna "BL" che contiene il percorso di dove si trovano le immagini.

C:UsersAntonioDocumentsDanea EasyfattArchiviL_M - AllegatiProdI-SWHUB 16GP -- 000 (1230).jpg

Naturalmente l'immagine ha lo stesso nome es. I-SWHUB 16GP -- 000 (1230).jpg

il problema qual'è: voglio estrapolare le immagine dalla cartella "Prod" ed importarli in un'altra cartella chiamata "??" solo di alcuni articoli del foglio exel.

Vi ringrazio di cuore
Claudia
di Vecchio Frac data: 23/11/2013 20:28:49
Con che criterio "estrapoli le immagini" dall'elenco del listino? a caso? ogni dieci? tutte quelle che iniziano per A?
Quando hai stabilito un criterio metti una "x" nella colonna a fianco di quella che contiene i nomi dei file (BM).
Poi con un ciclo scorri la colonna con le x, quando ne trovi una, leggi dalla colonna precedente il percorso e copi il file da una cartella all'altra (mi pare che il comando sia FileCopy o CopyFile, adesso non ricordo, vedi sulla Guida). Naturalmente dovrà esserti noto anche il percorso di destinazione. Non mi pare che Windows accetti "??" come nome di cartella ^_^
Export immagini
di LanelloMancante data: 23/11/2013 20:41:25
Un saluto a tutti, ho un problema che:
ho una cartella chiamata "Prod" che contiene immagini di prodotti e ho un file exel chiamato "listino".
All'interno del file listino ce la colonna "BL" che contiene il percorso di dove si trovano le immagini.

C:UsersAntonioDocumentsDanea EasyfattArchiviL_M - AllegatiProdI-SWHUB 16GP -- 000 (1230).jpg

Naturalmente l'immagine ha lo stesso nome es. I-SWHUB 16GP -- 000 (1230).jpg

il problema qual'è: voglio estrapolare le immagine dalla cartella "Prod" ed importarli in un'altra cartella chiamata "Prodexport" solo di alcuni articoli del foglio exel aggiungendo la lettera "E" alla colonna "A"

Vi ringrazio di cuore
Claudia
di LanelloMancante data: 23/11/2013 20:44:40
Ho corretto il testo,
GRAZIE.
leggete l'altro inserivento.
di Vecchio Frac data: 23/11/2013 20:45:10
Forse hai qualche problema col pc.
Hai scritto lo stesso post dopo la mia risposta e hai iniziato una discussione identica che son costretto a eliminare.
Dai al server il tempo di elaborare gli inserimenti o controlla la tua casella email.
di Vecchio Frac data: 23/11/2013 20:46:05
Ok, ho visto adesso la tua precisazione (non era necessario riportare tutto, bastava la precisazione).

di patel data: 24/11/2013 10:43:11
prova questa macro

Sub copyfiles()
destpath = "C:UsersAntonioDesktop"
LR = Cells(Rows.Count, "B").End(xlUp).Row
For j = 2 To LR
  If Range("A" & j) = "E" Then
    fname1 = Range("BL" & j).Value
    fname2 = Right(fname1, Len(fname1) - InStrRev(fname1, ""))
'    MsgBox fname1 & vbLf & destpath & fname2
    FileCopy fname1, destpath & fname2
  End If
Next
End Sub

di Claudia (utente non iscritto) data: 24/11/2013 11:02:34
Non riesco a fare la macro mi si blocca office e si chiude,
se la macro la fai sul file allegato faccio un prova.

grazie
di patel data: 24/11/2013 11:17:38
allegato file con macro, ovviamente non posso testarlo.
di Claudia (utente non iscritto) data: 24/11/2013 11:41:51
Grazie mille problema risolto sembra che funzioni tutto.

Vuoi Approfondire?