Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

[EXCEL] - Conversione ore

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] - Conversione ore

Postdi carmelo.nicita » 21/09/09 15:49

Ciao a tutti,

ho un problema niente male.
Allora... dovrei convertire un orario in formato h.mm (es. 8.30) in un numero con la virgola (es. 8,5), nel senso lo scopo è quello di esprimere in decimale le ore, quindi 8.30 vuol dire 8 ore e mezzo, cioè 8,5!!

Ho provato in tutti i modi con i formati ammessi da excel però non riesco proprio, alla fine ho pensato di trasfomarlo con qualche formula stramba, ma credo che il problema si possa risolvere in modo molto più semplice.

Grazie in anticipo per l'aiuto!!

Ciao
carmelo.nicita
Utente Junior
 
Post: 20
Iscritto il: 14/09/09 07:42

Sponsor
 

Re: [EXCEL] - Conversione ore

Postdi Flash30005 » 21/09/09 22:57

Prova questa macro
Codice: Seleziona tutto
Sub SostVal()
UR = Worksheets("Foglio1").Range("A" & Rows.Count).End(xlUp).Row  '<<< NomeFoglio e Colonna
Dim datov As Double
For Riga = 2 To UR
    For Each s In Worksheets("Foglio1").Range("A" & Riga & ":A" & Riga)  '<<< NomeFoglio e Colonna/ Colonne
        If s.Value <> "" Then
            datov = Range("A" & Riga).Value * 24     '<<< Colonna
            Range("A" & Riga).NumberFormat = "0.00"  '<<< Colonna
            Range("A" & Riga).Value = datov   '<<< Colonna
        End If
    Next s
Next Riga
End Sub


Ho considerato come nome foglio "Foglio1"
e colonna con i dati (hh:mm) la colonna A
Sostituisci questi riferimenti nella macro con quelli effettivi

Aggiungo che se hai un range di più colonne
puoi inserirlo nella riga:
Codice: Seleziona tutto
    For Each s In Worksheets("Foglio1").Range("A" & Riga & ":G" & Riga)
'<<< da A a G
Che ti permette con una unica macro di cambiare tutti gli orari che hai nel range An:Gn


Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: [EXCEL] - Conversione ore

Postdi Anthony47 » 22/09/09 01:48

Io pero' suggerirei non di "sostituire" gli attuali valori orari con nuovi valori decimali, come fa la macro ma il cui risultato e' non tracciabile, ma di inserire in una colonna aggiuntiva (o direttamente in una formula piu' complessa) la formula
Codice: Seleziona tutto
=CellaInFormatoOrario*24
che produce il risultato richiesto.

Ciao.
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: [EXCEL] - Conversione ore

Postdi carmelo.nicita » 22/09/09 07:45

Grazie ragazzi!!

La soluzione di Anthony47 sarebbe la più veloce però non mi funziona, mi da degli orari strampalati (es. da un orario di partenza di questo tipo 8.30 (h.mm) facendo *24 mi da 12.00) e pur provando con le funzioni ORA e MINUTO inserite nell'espressione seguente: ORA(num_seriale)+MINUTO(num_seriale)/60 non ottengo il risultato voluto.

Per quanto riguarda la macro indicata da Flash30005 il discorso invece è diverso e cioè in effetti questo è un metodo che mi fa ritornare ad es. 8,5 (formato numero) partendo da 8.30 (formato h.mm), quindi in sostanza quello che vorrei vedere io :).

Ho fatto diverse prove anche su altri pc e la procedura di Anthony47 effettivamente funziona... solo nel mio excel no... no so!!!

Questo per me è veramente inspiegabile e se ci saranno approfondimenti sarei contento.

Grazie mille ancora!!
carmelo.nicita
Utente Junior
 
Post: 20
Iscritto il: 14/09/09 07:42

Re: [EXCEL] - Conversione ore

Postdi Flash30005 » 22/09/09 09:24

carmelo.nicita ha scritto:...da un orario di partenza di questo tipo 8.30 (h.mm) facendo *24 mi da 12.00...

Devi formattare la cella convertita in formato numero e al posto di 12.00 avrai 8,50

Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-


Torna a Applicazioni Office Windows


Topic correlati a "[EXCEL] - Conversione ore":


Chi c’è in linea

Visitano il forum: Nessuno e 11 ospiti