Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Larghezza colonne in cm. Si può fare?

10,779 views
Skip to first unread message

gimart

unread,
Jan 9, 2009, 1:05:00 AM1/9/09
to
Ciao a tutti. Vorrei sapere se, in Excel 2003, è possibile fare in modo che
la larghezza delle colonne venga impostata in cm anzicchè in pixel. Ho
trovato qualche post sull'argomento, ma si riferiscono tutti all'impostazione
di una stessa larghezza per un certo numero di colonne contigue.
Io vorrei, invece, poterlo fare per singola colonna in modo da poter
facilmente controllare quello che mi verrà compreso in un foglio A4 senza
andare per tentativi come faccio ora. Grosso modo vorrei poter fare quello
che è possibile con le tabelle di Word. Grazie

paoloard

unread,
Jan 9, 2009, 3:52:09 AM1/9/09
to

"gimart" <gim...@discussions.microsoft.com> ha scritto nel messaggio
news:58A78BC2-F9B0-42CF...@microsoft.com...

Non avendo la versione 2003 ma la 2007 posso suggerirti come fare per
quest'ultima versione, vedi può servire anche per la tua versione
individuando i relativi comandi tramite menu.
Con il pulsante "Layout di pagina" che si trova nella barra multifunzione
"Visualizza-->Gruppo Visualizzazioni cartella di lavoro-->Pulsante Layout di
pagina), è possibile specificare la larghezza di una colonna o l'altezza di
una riga in centimetri, l'unità di misura predefinita in tale
visualizzazione, ma è anche possibile impostare i millimetri o i pollici
(pulsante Microsoft Office , Opzioni di Excel, categoria Impostazioni
avanzate).
--
"Fai sapere se e come hai risolto. Grazie"

Ciao paoloard
http://www.riolab.org


gimart

unread,
Jan 9, 2009, 6:12:01 AM1/9/09
to

"paoloard" wrote:

Purtroppo queste opzioni in Excel 2003 non ci sono. Allora, per il momento,
sono andato per tentativi: se si clicca sul delimitatore di destra di una
colonna (nella riga dei nomi di colonna), appare la larghezza della colonna
in pixel; da qui sono risalito a quanti pixel ci sono nella larghezza di 1cm,
2cm, 3cm ecc. e ho creato una tabella. Con la tabella posso impostare la
larghezza desiderata in cm. E, per il momento, andrò avanti così.......
Grazie, comunque, per la risposta.

paoloard

unread,
Jan 9, 2009, 11:22:14 AM1/9/09
to

"gimart" <gim...@discussions.microsoft.com> ha scritto nel messaggio
news:1B59FF55-8030-493F...@microsoft.com...
>
cut

> Purtroppo queste opzioni in Excel 2003 non ci sono. Allora, per il
> momento,
> sono andato per tentativi: se si clicca sul delimitatore di destra di una
> colonna (nella riga dei nomi di colonna), appare la larghezza della
> colonna
> in pixel; da qui sono risalito a quanti pixel ci sono nella larghezza di
> 1cm,
> 2cm, 3cm ecc. e ho creato una tabella. Con la tabella posso impostare la
> larghezza desiderata in cm. E, per il momento, andrò avanti così.......
> Grazie, comunque, per la risposta.

Anche questa è una soluzione. Infatti me l'ero riservata come alternativa ma
vedo che mi hai preceduto.
--
Ciao paoloard
http://www.riolab.org

Mauro Gamberini

unread,
Jan 9, 2009, 11:46:32 AM1/9/09
to

r

unread,
Jan 9, 2009, 6:13:02 PM1/9/09
to

"gimart" ha scritto:

se ne è già parlato quindi se cerchi nell'NG
troverai qualcosa ...
la soluzione che posto è un palliativo visto che
per quanto ne so non esiste il modo di fare questa
trasformazione realmente ... ci si può avvicinare
al risultato atteso.
ho già che c'ero previsto anche che si voglia
convertire anche l'altezza della cella ...
word ha due funzioni che convertono punti in cm
e viceversa ... ed è facile usarle anche in excel:

Sub test()
'adatta la cella [a1] a 5 cm di base per 1 cm di altezza
Adatta [a1], 5, 1
End Sub

Function CmToPoints(Cm As Single) As Single
Dim W As Object
Set W = CreateObject("Word.Application")
CmToPoints = W.CentimetersToPoints(Cm)
End Function

Function Adatta( _
rng As Excel.Range, _
bCm As Single, _
hCm As Single)

Dim p As Single
rng.RowHeight = CmToPoints(hCm)

p = CmToPoints(bCm)

If rng.Width = p Then
Exit Function
ElseIf rng.Width > p Then
Do Until rng.Width > p
rng.ColumnWidth = rng.ColumnWidth + 1
Loop
Else
Do Until rng.Width < p
rng.ColumnWidth = rng.ColumnWidth - 1
Loop
End If
Debug.Print rng.Height
Debug.Print rng.Width
End Function

0 new messages