Rank: Newbie
Iscritto dal : 10/7/2013 Posts: 3
|
Salve a tutti, utilizzo excel2003 da diversi anni e lo conosco abbastanza bene prò non riesco ad andare avanti in un progetto che sto realizzando. In sintesi vorrei scrivere una formula o una funzione o macro o quello che preferite, premettendo che ho creato una tabella dove nelle celle A1-A2-A3...etc ho scritto le ore 10,00-11,00-12,00...etc e nelle celle B1-C1-D1...etc i nomi dei colleghi Se nella cella A20 inserisco le ore 10,00 e nella cella B20 inserisco le ore 13,00 relativo ad un nome di un collega scritto nella cella a fianco, vorrei che in automatica le celle relative al nome B1, dalla cella relativa alle ore 10,00 (A1) alla cella relativa alle ore 13,00 (A4) (quindi anche quelle delle ore 11,00 (A2) e 12,00 (A3)) cambiassero colore di sfondo.
Con la sprùeranza di essere stato chiaro Vi ringrazio in anticipo e saluto.
Bye Bye By Giamp
|
Rank: AiutAmico
Iscritto dal : 5/29/2003 Posts: 1,694
|
salve se vuoi ottenere un risultato come quello in immagine: prova con questa: Sub test() nome = Range("C20").Value Set Rng = Range("b1", Range("b1").End(xlToRight)) For Each cl In Rng If cl.Value = nome Then col = cl.Column Exit For End If Next Set Rng = Nothing ore = ((Range("b20").Value - Range("a20").Value) * 24) + 1 Hpart = Range("a20").Value Set rng2 = Range("a2", Range("a2").End(xlDown)) For Each Hp In rng2 If Hp = Hpart Then riga = Hp.Row Exit For End If Next Set rng2 = Nothing For n = 0 To ore Cells(riga, col).Interior.ColorIndex = 3 riga = riga + 1 Next End Sub saluti Giap
|
Rank: Newbie
Iscritto dal : 10/7/2013 Posts: 3
|
Buonasera, grazie per la sua risposta tempestiva e precisa, ma, non riesco a farla funzionare nel mio progetto. Vorrei incollare l'immagine di quello che sto realizzando per essere più chiaro ma non ci riesco, pur cliccando sulla icona "Image".
provo a rifare la domanda:
nella colonna A1...A15 ci sono i nomi: pippo, pluto etc.;
nelle colonne C e D ci sono i "tempi" di permesso (col C "dalle ore" col D "alle ore" che le celle C3 e D3 corrispondono al nome della cella A3;
Dalla cella J1 ho costruito una tabella (detta tabella di riepilogo) con tutte le ore nella colonna J4...J28 et le celle K3, L3, M3,..etc ci sono i nomi: pippo, pluto etc...;
ora, se nelle celle C3 (dalle ore) e D3 (alle ore) scrivo 10,00 15,00 (riferente alle ore di permesso di pippo), vorrei che nella "tabella di riepilogo" si colorassero le celle della colonna relativa a pippo, che vanno dalle ore 10,00 alle ore 15,00.
Scusi la ripetizione della domanda che ho notato dalla sua risposta aveva capito egregiamente ma, ripeto, nel mio progetto non riesco a farla funzionare. Non riesco a far funzionare la funzione SE in una macro, con il ripettivo colore cella.
RingraziandoVi nuovamente per la vostra pazienza e professionalità.
Giampi.
|
Rank: AiutAmico
Iscritto dal : 5/29/2003 Posts: 1,694
|
salve guarda il file allegato. http://wikisend.com/download/404928/ore.zipimmettendo i dati in colonna C e colonna D viene lanciata in automatico la macro. La premessa è che debbano essere presenti valori in entrambe le colonne imputando per primo il valore in colonna C e successivamente in colonna D. saluti Giap
|
Rank: Newbie
Iscritto dal : 10/7/2013 Posts: 3
|
Ottimo, grazie.
|