Inserimento di Immagini da File

[A.Maurizio]

Ciao a Tutti
So da me che ora farò ridere un pochino di persone di questo forum , Per questa mia Domanda
Però pur essendo all'apparenza Banale ; Io non riesco proprio a trovare la soluzione , ecco spiegato il motivo
per qui mi rivolgo a voi.
Il mio problema e questo : Su di un Foglio di Excel , sono andato nella Sezione "Dati" e poi ho premuto il Tasto
"Dati Dal Web"
ho scaricato una pagina con i dati inerente alle previsioni del Tempo , Poi Sul Foglio 1 mi sono fatto la mia
bella maschera riassuntiva; E fin qui nulla di problematico.
Ora però : Mi servirebbe un codice (Penso) del tipo Array che mi sappia valutare le scritte inerente alle
Immagini ; E da queste sappia andare nella mia cartella di lavoro e Portare in tale cella L'immagine
Corrispondente .

Mi spiego meglio : Sul Foglio 3 una volta fatto l'aggiornamento dei dati inerente alle previsioni del tempo di
"torino" ; Nella Cella
("B6") viene riportata la Scritta ("Coperto, Lievi precipitazioni")
Ahora sapendo questo io vorrei che : si potesse andare a prelevare nella Cartella Immagini la suddetta immagine

che in questo caso e questa

[/IMG]

e Tale immagine dovrà essere posizionata nella cella (C7) del Foglio1

In oltre bisogna tenere presente che la Scritta posta nella Cella (B6) del Foglio 3 cambierà di volta in volta
Per qui la funzione dovrà essere in grado di saper valutare tali informazioni e il suddetto ripescaggio delle
relative Immagini.

(P.s) Io stavo pensando ad una forma di Array dove si potesse tenere in memoria tutte le scritte riportate dal
foglio 3 ; Però poi mi sono arenato perché non saprei come proseguire

[A.Maurizio]

Ciao a Tutti scusatemi tanto Ieri vi avevo chiesto delle cose inerente al mio progetto sulle Previsioni del tempo.
Ahora forse sarei arrivato ad una svolta decisiva ; Però avrei bisogno di sapere questo :
Sfruttando questo Codice che sappiamo tutti che serve per Valutare quanti numeri ci sono all'interno di una determinata area del Foglio di Excel che corrispondono ad dei nostri criteri inseriti in una Colonna o di una riga qual'si voglia.
Bene : Trattandosi di Numeri questo programmino non fà una piega ; per qui funziona Benissimo.

Però le cose si complicano quando al posto dei numeri subentrano delle parole con spazi trà l'una e l'altra , come ad esempio (Poco Nuvolo) ; (Parzialmente Sereno) ecc...!

Sub Trova_Corrispondenza_Dati()
For Each c In Foglio3.Range("B6:E12")
If Application.CountIf(Foglio3.Range("M3"), c) >= 1 Then c.Interior.ColorIndex = 6
Next
End Sub

Haora la mia Domada e questa : Sempre Per quanto rigurda le previsioni del tempo e ovio che i numeri non centrano nulla.
Per qui al loro posto si useranno le Parole di fatto compiute ; Come citato Prima.
Per qui provando qua e la questo tipo di codice ho trovato ché : Se la parola e unica o una sola del tipo "Sereno" ; "Soleggiato" ecc...!
Il Programma funziona benissimo.

Però al contrario sè si incontrano parole come "Provabili Precipitazioni" ; "Parzialmente Nuvoloso" ecc....! non funziona.

Voi per caso avreste una formula che io possa adattare per le parole anziché per i soli numeri che ricrei la stessa funzione.
Grazie .
Saluti da A.Maurizio

(P.s) In Quanto cosi facendo non è tanto per il colore della cella del foglio 3 che mi interessi molto .
Ma semplicemente per il fatto che cosi facendo potrei richiamare la Lettera (C) come nel mio caso riportato sopra.
Pre richiemare la suddetta immagine dalla Cartella e impostarle tante volte quante sono le parole trovate.
In caso Contrario voi come riuscireste a risolvere questo rompicapo,.
Nuovamente Grazie