Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

INSERIMENTO IMMAGINI

Ultimo Aggiornamento: 06/06/2018 21:33
Post: 6
Registrato il: 29/11/2013
Città: MINERBIO
Età: 36
Utente Junior
2013
OFFLINE
05/06/2018 18:10

Buonasera a tutti, avrei un quesito da sottoporre.
Ho una serie di immagini, una per ogni riga, rinominate Image1, Image2, Image3 ecc...
Nella colonna A ho una serie di nomi di nazioni (Italia, Francia, Germania, ecc...) che corrispondono al numero della mia Image.
Nella cartella BANDIERE sono presenti i relativi file jpg rinominati "nome della nazione".jpg

Vorrei creare una routine con vba di questo genere


for x = 1 to n

Worksheets("NAZIONI").Image X .Picture = LoadPicture("C:\BANDIERE\" & Worksheets("NAZIONI").Cells(x, 1).Value & ".jpg")

next x


dove al posto della X appaia il nome progressivo dell'immagine.

Spero di essermi spiegato al meglio.

Grazie in anticipo
Post: 3.519
Registrato il: 28/06/2011
Città: AGORDO
Età: 70
Utente Master
2013
OFFLINE
05/06/2018 19:00

Dovrei ritrovare il file
Comunque serve un'esempio. Quando si dice "esempio", si itende in quale colonna/cella e "quali dati da valutare", dovrà finire la foto. Credo che dopo, se avrai ulteriori modifiche..., nessuno Ti darà altre soluzioni (fai un buon allegato).
http://www.freeforumzone.com/d/9837363/-/discussione.aspx
Excel 2013
Post: 3.765
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
OFFLINE
05/06/2018 19:08

Alla cieca Io proverei con

Worksheets("Nazioni").Shapes("Image" & x).Picture = LoadPicture..........

Alfredo
Post: 6
Registrato il: 29/11/2013
Città: MINERBIO
Età: 36
Utente Junior
2013
OFFLINE
06/06/2018 17:12

Il codice proposto non funziona, purtroppo.
Allego file con immagini, lavorateci pure su.

Grazie ad entrambi per le risposte!
[Modificato da Rabif 06/06/2018 17:14]
Post: 3.524
Registrato il: 28/06/2011
Città: AGORDO
Età: 70
Utente Master
2013
OFFLINE
06/06/2018 21:33

1) Non c'è bisogno di mettere la cartella delle foto in C:\ (basta che sia insieme, dove è il files excel)
2) Decidi Tu se mettere un bottone per Elimina_Foto, oppure togli la spunta alla riga 'Call Elimina_Foto
Excel 2013
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Errore su nuovo inserimento (5 messaggi, agg.: 04/10/2021 12:48)
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 21:22. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com