Convertire un numero nel suo decimale

[lone wolf]

Buon giorno a tutti, avrei la necessità di trasformare un numero nel suo decimale esempio:
300 = 0.30
400 = 0.40
60 = 0.6
Ho provato con la funzione DECIMALE ma non va perché questa funzione necessita di un TESTO, esiste un’altra formula? Grazie e buona giornata a tutto il forum

[Anthony47]

Puoi trasformarli (probabilmente) come dici con una formula del tipo

Codice: Seleziona tutto

=A2/10^LUNGHEZZA(INT(A2))


Se invece vuoi farlo mentre digiti i valori, allora prova con questa macro di tipo Worksheet_Change:
Private Sub Worksheet_Change(ByVal Target As Range)

Codice: Seleziona tutto

Dim ckArea As String, powOff As Long
'
ckArea = "A2:A100"              '<<< L'area da manipolare
'
If Not Application.Intersect(Target.Cells(1, 1), Range(ckArea)) Is Nothing Then
    With Target.Cells(1, 1)
        If IsNumeric(.value) Then
            Application.EnableEvents = False
            If .value < 1 Then powOff = 1 Else powOff = 0
            .value = .value / (10 ^ (Len(Int(.value)) - powOff))
        Application.EnableEvents = True
        End If
    End With
End If
End Sub


Il codice va messo nel modulo vba del foglio su cui lavori:
-tasto dx sul tab con nome del Foglio; scegli Visualizza Codice; incolli il codice sul modulo vba che così è stato aperto

Prova..

[lone wolf]

Buongiorno, grazie Anthony la formula è perfetta proprio quello che volevo ottenere, grazie per l’aiuto e una buona giornata a tutto il forum