Visualizzare larghezza colonna nella cella

Rollis13, grazie per la tua risposta.
Ho copiato il codice che mi hai inviato in un modulo e, all'atto dell'esecuzione della macro mi restituisce, nelle celle in riga 1, il valore della relativa colonna, ma moltiplicato per 5-6 volte
Cioè:
A1 mi dà 48,00 invece che 8,43
B1 mi dà 84,00 invece che 15,29
C1 mi dà 19,50 invece che 3,00
D1 mi dà 243,75 invece che 45,71
E1 mi dà 72,25 invece che 13,14
e così via

rollis13, 27/10/2023 09:20:

---

Probabilmente basta una macro così:

Option Explicit
Sub LarghezzaColonne()
    Dim x As Integer
    For x = 1 To 52
        Cells(1, x) = Columns(x).Width
    Next x
End Sub

---