Benvenuto Ospite Cerca | Topic Attivi | Utenti | | Log In | Registra

[EXCEL]Margini in celle Opzioni
dead
Inviato: Friday, September 10, 2010 9:47:01 AM

Rank: AiutAmico

Iscritto dal : 9/20/2004
Posts: 1,597
Ciao a tutti,
avendo bisogno di sviluppare della reportistica in excel, ho una colonna descrizione che contiene celle di testo con svariate righe di testo per ciascuna.
Per ottenere un impaginatura decente, avrei bisogno che il testo non si "appiccicasse" ai bordi superiore ed inferiore delle celle rendendo le varie descrizioni poco leggibili.
Nella formattazione celle non ho trovato nulla di adatto, ma solamente la possibilità di rientro da sinistra...
C'è qualche modo per ottenere un effetto simile al padding dell'html o alla spaziatura (prima e dopo) di word?

grazie.

EDIT: per il momento ho tamponato con questa macro, però non mi pare molto elegante e flessibile. Si può fare meglio forse?
Code:
Sub Spazia()
'
' Spazia Macro
' Macro registrata il 10/09/2010
'
For Each cell In Selection
    cell.FormulaR1C1 = cell.FormulaR1C1 + Chr(10)
Next
End Sub



Sono cosi avanti che quando guardo indietro vedo il futuro.
Sponsor
Inviato: Friday, September 10, 2010 9:47:01 AM

 
aetio
Inviato: Friday, September 10, 2010 11:35:51 AM

Rank: AiutAmico

Iscritto dal : 5/10/2010
Posts: 723
Ciao,
hai provato da: Formato> Formato celle> Allineamento-Allineamento testo> Allineamento verticale> Al centro ?
Buona giornata
eZio
dead
Inviato: Friday, September 10, 2010 11:55:09 AM

Rank: AiutAmico

Iscritto dal : 9/20/2004
Posts: 1,597
aetio ha scritto:
Ciao,
hai provato da: Formato> Formato celle> Allineamento-Allineamento testo> Allineamento verticale> Al centro ?
Buona giornata
eZio


si, ma tale scelta non lascia margini definiti, a meno che non si imposti a mano l'altezza riga (che è variabile da riga a riga), cosa improponibile per report di centinaia di voci...


Sono cosi avanti che quando guardo indietro vedo il futuro.
a10n11
Inviato: Friday, September 10, 2010 4:19:23 PM

Rank: AiutAmico

Iscritto dal : 5/29/2003
Posts: 1,694
salve
io eviterei di aggiungere un avanzamento riga al valore della cella.
Preferirei leggere l'altezza della riga ed aumentarla del valore che mi serve.
esempio:

Sub spazia2()
For Each cell In Selection
With cell
.RowHeight = .RowHeight + 10
.VerticalAlignment = xlCenter
End With
Next cell
End Sub

saluti
Giap

dead
Inviato: Saturday, September 11, 2010 8:11:24 PM

Rank: AiutAmico

Iscritto dal : 9/20/2004
Posts: 1,597
Ottimo Giap!
Come dici tu è decisamente meglio.

Grazie.


Sono cosi avanti che quando guardo indietro vedo il futuro.
Utenti presenti in questo topic
Guest


Salta al Forum
Aggiunta nuovi Topic disabilitata in questo forum.
Risposte disabilitate in questo forum.
Eliminazione tuoi Post disabilitata in questo forum.
Modifica dei tuoi post disabilitata in questo forum.
Creazione Sondaggi disabilitata in questo forum.
Voto ai sondaggi disabilitato in questo forum.

Main Forum RSS : RSS

Aiutamici Theme
Powered by Yet Another Forum.net versione 1.9.1.8 (NET v2.0) - 3/29/2008
Copyright © 2003-2008 Yet Another Forum.net. All rights reserved.