Condividi:        

[Excel] macro trova temperature

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

[Excel] macro trova temperature

Postdi macio66 » 31/07/13 18:10

Ciao a tutti
Avrei bisogno di creare un macro che, partendo da una tabella generata da un file txt dove:
nella colonna A e presente l'orario
nelle colonne b-c-d-e-f-g è presente la temperatura
nella cella "h1" è presente la temperatura di riferimento
Il numero di righe da controllare sono le prime 16
Quando la prima cella di una delle colonne "b-c-d-e-f-g" raggiunge la temperatura in "h1" dovrebbe colorare la cella dell'orario e poi quando tutte le celle sempre delle colonne "b-c-d-e-f-g" raggiungono la temperatura in "h1" dovrebbe colorare la cella dell'orario dell'ultima cella arrivata alla temperatura.
Spero di essere stato il più chiaro possibile
macio66
Utente Senior
 
Post: 147
Iscritto il: 13/06/13 14:59

Sponsor
 

Re: [Excel] macro trova temperature

Postdi Flash30005 » 01/08/13 00:37

Non mi è molto chiara la distinzione della colorazione cella orario che è una e si trova nella colonna A
hai scritto che se una cella delle colonne b,c,d,e,f,g giunge (credo o supera) il valore della temperatura in h1 si deve colorare l'orario (in colonna A) ma la stessa cella dovrà essere colorata se anche tutte le celle in b,c,d,e,f,g raggiungono la temperatura in h1
Non capisco
macio66 ha scritto:dovrebbe colorare la cella dell'orario dell'ultima cella arrivata alla temperatura


puoi spiegare meglio magari con l'ausilio di uno screenshot?

ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [Excel] macro trova temperature

Postdi macio66 » 01/08/13 16:56

Ciao
Provo a spiegarmi meglio.
Quando la prima cella delle colonne b,c,d,e,f,g (per esempio cella della colonna "b") supera la temperatura in h1, la cella dell'orario (colonna A) che si trova sulla stessa riga, si deve colorare (inizio controllo). Ammettiamo che la cella della colonna "c" superi per seconda la temperatura in h1, la cella della colonna "d" superi per terza la temperatura in h1, la cella della colonna "e" superi per quarta la temperatura in h1, la cella della colonna f superi per quinta la temperatura in h1. A questo punto quando anche la cella della colonna "g" supera la temperatura in h1, la cella dell'orario nella colonna A che si trova nella stessa riga della cella della colonna "g", deve colorarsi (fine controllo).
Alla fine le celle colorate devono essere 2
macio66
Utente Senior
 
Post: 147
Iscritto il: 13/06/13 14:59

Re: [Excel] macro trova temperature

Postdi Flash30005 » 01/08/13 22:52

ma perché b,c,d,e,f,g, non stanno sulla stessa riga?
Ripeto che è opportuno un'immagine del foglio se non è possibile il file stesso

ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [Excel] macro trova temperature

Postdi macio66 » 02/08/13 15:33

Ciao
Scusa la mia ignoranza, ma come devo fare per mandarti un'immagine
macio66
Utente Senior
 
Post: 147
Iscritto il: 13/06/13 14:59

Re: [Excel] macro trova temperature

Postdi macio66 » 02/08/13 15:58

ciao
spero di essere riuscito a inviare un esempio: http://wikisend.com/download/118140/esempio.xls
- Dove in F3 la prima temperatura supera il set point e la cella B3 viene colorata.
- E in G5 l'ultima temperatura supera il set point e la cella B5 viene colorata.
macio66
Utente Senior
 
Post: 147
Iscritto il: 13/06/13 14:59

Re: [Excel] macro trova temperature

Postdi Flash30005 » 03/08/13 00:01

Inserisci questa macro in un modulo
e avviala con tasti scelta rapida (opzioni macro) o un pulsante, figura o altro al quale assegnerai la macro
Codice: Seleziona tutto
Sub Temp()
UR = Worksheets("Foglio1").Range("A" & Rows.Count).End(xlUp).Row
Worksheets("Foglio1").Range("B2:B" & UR).Interior.ColorIndex = xlNone
RR2 = 0
For RR1 = 2 To UR
MyC = Evaluate("=SUM(COUNTIF(Foglio1!C" & RR1 & ":K" & RR1 & ","">="" & Foglio1!M2))")
If MyC > 1 And MyC < 9 Then
    Range("B" & RR1).Interior.ColorIndex = 36
    RR2 = RR1 + 1
    Exit For
End If
Next RR1
If RR2 > 0 Then
For RR3 = RR2 To UR
MyC = Evaluate("=SUM(COUNTIF(Foglio1!C" & RR3 & ":K" & RR3 & ","">="" & Foglio1!M2))")
If MyC = 9 Then
    Range("B" & RR3).Interior.ColorIndex = 36
    Exit For
End If
Next RR3
End If
End Sub


Ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [Excel] macro trova temperature

Postdi macio66 » 03/08/13 14:58

Ciao
Ho inserito la macro in un modulo come mi hai detto e il risultato è perfetto.
Grazie mille
macio66
Utente Senior
 
Post: 147
Iscritto il: 13/06/13 14:59


Torna a Applicazioni Office Windows


Topic correlati a "[Excel] macro trova temperature":


Chi c’è in linea

Visitano il forum: Nessuno e 41 ospiti