Sostituzione Temperatura formattazione



  • Sostituzione Temperatura (formattazione)
    di Francesco86 (utente non iscritto) data: 13/10/2014 19:16:37

    Salve ragazzi,
    avrei bisogno del vostro aiuto per risolvere un problema con la gestione di alcuni dati che ho importato da un data logger per il monitoraggio della temperatura negli ambienti. Il problema è che il file creato dal datalogger non ha una formattazione corretta.

    Le temperature mi vengono riportate come date. Ad esempio: 24,3 (gradi Celsius) vengono riportati come 24,03,00

    Potreste gentilmente aiutarmi? Utilizzo Excel 2010. Grazie mille per la vostra collaborazione!



  • di Zer0Kelvin data: 13/10/2014 19:30:57

    Ciao.
    Prima alcuni consigli... non per gli acquisti, ma per il futuro (se ti dovesse ricapitare di rivolgerti a forum simili a questo):
    1) oltre a descrivere il problema, cerca di dare più informazioni possibile.
    2) ove possibile allega il file (o uno simile, eventualmente privato di dati sensibili) che presenta il problema.

    Nel tuo caso, in base a quanto esposto, si è indotti a credere che sia un semplice problema di formattazione delle celle; eventualmente prova a cembiare il formato cella in "Numero".
    Se così non fosse, dovresti specificare in che modo i dati vengono importati ed allegare una copia dei files coinvolti.
    Per allegare un file puoi usare il tasto [Allega un file] che trovi ad inizio e a fine pagina.



  • di Lucas87 data: 13/10/2014 19:34:23

    Hai provato a selezionare la colonna e a impostare il formato come Generale o come Numero?



  • di Lucas87 data: 13/10/2014 19:35:09

    Ops



  • di Francesco86 (utente non iscritto) data: 13/10/2014 19:38:10

    Grazie per i consigli, li terrò presenti per il futuro. Allego subito il file. Si ho provato a cambiare la formattazione della cella da Generale a Numero, ma non ho ottenuto alcun risultato



  • di Lucas87 data: 13/10/2014 19:44:06

    Non hai spiegato come importi il file con le temperature sul foglio
    Non sono date...è testo



  • di Francesco86 (utente non iscritto) data: 13/10/2014 19:59:33

    Il software del datalogger che utilizzo per scaricare i dati registrati mi crea direttamente il file Excel senza darmi la possibilità di alcuna modifica, io posso solo rinominarlo.



  • di Mister_x (utente non iscritto) data: 14/10/2014 00:49:49

    ciao

    riallego il tuo file dove nel tuo foglio ho inserito con delle colonne di appoggio le formule di trasformazione
    ho aggiunto un secondo foglio e copiato i valori di quelli proposti da te,
    ho trosformato questo con una sub() inserita in questi

    vedi se puo' funzionare uno o l'altro metodo

    ciao

     
    Option Explicit
    Sub aggiorna()
    Dim celle As Range
    Dim cella As Variant
    Set celle = Range("B2:D" & Cells(Rows.Count, "D").End(xlUp).Row)
    celle.NumberFormat = "0.0"
    On Error Resume Next
    For Each cella In celle
     If Len(cella) > 4 Then
      Cells(cella.Row, cella.Column) = --(Mid(cella, 1, 2) & "," & Mid(cella, 5, 1))
      ElseIf Len(cella) < 3 Then
      Cells(cella.Row, cella.Column) = --(Mid(cella, 1, 2) & "," & "0")
     End If
    Next
    Set celle = Nothing
    End Sub
    






  • di Francesco86 (utente non iscritto) data: 14/10/2014 11:19:57

    Ti ringrazio infinitamente, cercherò di comprendere la logica del tuo listato di comandi! Grazie ancora!



  • di Francesco86 (utente non iscritto) data: 16/10/2014 09:16:29

    Ciao mister x, sto cercando di capire dove inserire il listato dei comandi per poter effettuare le operazioni necessarie sulle celle, non sono molto esperto. Devo svolgere lo stesso tipo di operazione sull'ultimo file che mi è rimasto da modificare e che ho appena allegato in questa discussione. Grazie!!!



  • di Mister_x (utente non iscritto) data: 16/10/2014 13:12:56

    ciao

    come mai questo file tutti i dati sono in formato Data e non in formato Testo?

    comunque con le colonne di appoggio
    F2=GIORNO(B2)*24+ORA(B2)+MINUTO(B2)/100
    G2=GIORNO(C2)*24+ORA(C2)+MINUTO(C2)/100
    H2=GIORNO(D2)*24+ORA(D2)+MINUTO(D2)/100
    poi trascini in basso

    con la sub() da mettere nel foglio specifico dove ci sono i dati
    vedi file tuo con modifica
    foglio1 formule
    foglio2 VBA

    ciao
     
    Option Explicit
    Sub aggiorna()
    Dim celle As Range
    Dim cella As Variant
    Set celle = Range("B2:D" & Cells(Rows.Count, "D").End(xlUp).Row)
    celle.NumberFormat = "0.00"
    On Error Resume Next
    For Each cella In celle
       Cells(cella.Row, cella.Column) = (Fix(cella) * 24) + Hour(cella) + (Minute(cella) / 100)
    Next
    Set celle = Nothing
    End Sub






  • di Francesco86 (utente non iscritto) data: 16/10/2014 14:29:31

    Scusa mister x, ti disturbo per l'ultima volta. Ho aperto il nuovo file che mi hai allegato ed ho visto che c'è la necessità di eliminare gli zeri dopo la virgola, cioè 62.03 devo trasformarlo in 62.3 e questa modifica devo effettuarla per tutte le tre colonne. Potresti darmi una mano??



  • di Mister_x (utente non iscritto) data: 16/10/2014 14:44:02

    ciao

    al posto di dividere per 100 dividi per 10
    formattazione celle un solo decimale

    F2=GIORNO(B2)*24+ORA(B2)+MINUTO(B2)/10
    anche in G2 e H2

    la sub() idem
    celle.NumberFormat = "0.0"
    Cells(cella.Row, cella.Column) = (Fix(cella) * 24) + Hour(cella) + (Minute(cella) / 10)
    ciao