tabla - Cómo convertir un rango de celdas de Dec a Hex en Excel

formula excel hexadecimal a decimal

Question

Me pregunto cómo voy a convertir un rango de celdas de decimal a hexadecimal sin hacer que la hoja de cálculo sea enorme y muy lenta. También me gustaría utilizar VBA para ello, ya que se usaría para el análisis.

La forma en que he pensado hacer esto sería convertir las celdas usando la fórmula DEC2HEX y luego ocultar todas las celdas decimales, pero obviamente esto hace que la hoja de cálculo sea bastante grande. Si hay una manera de simplemente convertir los valores y reemplazar esas celdas con el valor hexadecimal, sería muy útil.

Cualquier consejo sería muy apreciado. Gracias por adelantado.

Answer 1

Puede usar Dec2Hex en VBA a través de la clase WorksheetFunction :

Option Explicit

Sub Test()

    ConvertToHex Sheet1.Range("A1:A15")

End Sub

Sub ConvertToHex(rngData)

    Dim rngCell As Range

    For Each rngCell In rngData
        rngCell.Value = WorksheetFunction.Dec2Hex(rngCell.Value)
        rngCell.NumberFormat = "@" ''<-- tidies formatting of hex
    Next

End Sub

Answer 2

Una posible solución ->

Sub convertRangeToHex() 
Dim r As Range 
Dim myRange As Range: Set myRange = Application.Selection ''define your range

For Each r In myRange
    If IsNumeric(r.Value) Then
        r.Value = "0x" & WorksheetFunction.Dec2Hex(r.Value)
    End If 
Next 
End Sub