Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

cambiare l'allineamento in 1 cella in base al valore

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

cambiare l'allineamento in 1 cella in base al valore

Postdi KingAnto » 19/05/12 15:52

Salve a tutti
il mio problema con excel è il seguente:
ho una colonna di numeri che vanno da 0 a 20 tutti con allineamento a sinistra

vorrei se possibile, far spostare in automatico a destra tutti i testi 0 ........ è possibile?
non sono riuscito a trovare niente a riguardo.......

GRAZIE A TUTTI COLORO CHE POTRANNO DARE UNA MANO
KingAnto
Newbie
 
Post: 2
Iscritto il: 16/05/12 18:47

Sponsor
 

Re: cambiare l'allineamento in 1 cella in base al valore

Postdi Zer0Kelvin » 19/05/12 17:08

Ciao.
Sarebbe semplice se tu volessi fare il contrario, cioè tutto a destra e gli zeri a sinistra.
Si può fare togliendo l'allineamento e formattando le celle come numeri; poi con formattazione condizionale formatti come testo le celle che contengono lo zero.
In questo modo avrai gli zeri allineati a sinistra(come il testo) e gli altri numeri allineati a destra.
Per qualche motivo provando a fare il contrario non funziona; se io formatto le celle come testo e poi assegno il formato numero alle celle con lo 0 i numeri rimangono tutti a sinistra... :eeh:

Magari si può fare usando un formato personalizzato. :?:
[Win7,Office2010]
Condividere la conoscenza aumenta la ricchezza di tutti(Z0°K)
Dai ad un uomo un pesce e lo avrai sfamato per un giorno;insegnagli a pescare e lo avrai sfamato per sempre(Confucio)
Il sonno della ragione genera mostri(Francisco Goya)
Avatar utente
Zer0Kelvin
Utente Senior
 
Post: 303
Iscritto il: 08/04/12 11:23

Re: cambiare l'allineamento in 1 cella in base al valore

Postdi KingAnto » 19/05/12 17:29

l'idea sarebbe quella di fare meno passaggi possibili
cioè nella tabella in oggetto i numeri arrivano in automatico da altre schede............
a me serve un modo ke con un semplice comando o automaticamente tutti gli 0 passino da un lato all'altro della cella (indifferentemente destra o sinistra)
KingAnto
Newbie
 
Post: 2
Iscritto il: 16/05/12 18:47

Re: cambiare l'allineamento in 1 cella in base al valore

Postdi Flash30005 » 19/05/12 19:54

Ciao KingAnto e benvenuto nel Forum

Ho considerato la colonna "A" come colonna con dati se non è così cambia il nome alla colonna nella macro
in un modulo inserisci questo codice
Codice: Seleziona tutto
Sub AllineaD()
UR = Range("A" & Rows.Count).End(xlUp).Row  '<<<< cambiare qui il nome colonna
Columns("A:A").HorizontalAlignment = xlLeft '<<<< cambiare qui il nome colonna
    For RR = 1 To UR
        If Range("A" & RR).Value = 0 And Val("A" & RR) = 0 Then Range("A" & RR).HorizontalAlignment = xlRight '<<<< cambiare qui il nome colonna
    Next RR
End Sub


e nel vba del foglio inserisci questo codice
Codice: Seleziona tutto
Private Sub Worksheet_Change(ByVal Target As Range)
UR = Range("A" & Rows.Count).End(xlUp).Row  '<<<< cambiare qui il nome colonna
CheckArea = "A1:A" & UR    '<<<< cambiare qui il nome colonna
If Application.Intersect(Target, Range(CheckArea)) Is Nothing Then Exit Sub
AllineaD
End Sub

Al variare di un dato nella colonna "A" avrai gli zero a destra e tutto il resto a sinistra
Con aggiornamenti automatici non saprei se la macro si attiva (dipende dal tipo di aggiornamento dat)
nel caso abbina la macro ad un tasto di scelta rapida (opzioni macro)

Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: cambiare l'allineamento in 1 cella in base al valore

Postdi Zer0Kelvin » 19/05/12 20:35

KingAnto ha scritto:l'idea sarebbe quella di fare meno passaggi possibili
cioè nella tabella in oggetto i numeri arrivano in automatico da altre schede............
a me serve un modo ke con un semplice comando o automaticamente tutti gli 0 passino da un lato all'altro della cella (indifferentemente destra o sinistra)

Come ho detto puoi fare in modo di avere automaticamente allineati gli altri numeri a sinistra e gli zeri a destra usando la formattazione condizionale (sai come fare?).
Devi formattare come testo tutte le celle ( o l'intera colonna) che contengono i valori, poi in formattazione condizionale devi selezionare "formatta solo le celle che contengono.." e imposti "valore uguale a" =0, dopodichè imposti il formato a "numero" e 0 come posizione dei decimali.
L'operazione và fatta una sola volta.
[Win7,Office2010]
Condividere la conoscenza aumenta la ricchezza di tutti(Z0°K)
Dai ad un uomo un pesce e lo avrai sfamato per un giorno;insegnagli a pescare e lo avrai sfamato per sempre(Confucio)
Il sonno della ragione genera mostri(Francisco Goya)
Avatar utente
Zer0Kelvin
Utente Senior
 
Post: 303
Iscritto il: 08/04/12 11:23


Torna a Applicazioni Office Windows


Topic correlati a "cambiare l'allineamento in 1 cella in base al valore":


Chi c’è in linea

Visitano il forum: Nessuno e 14 ospiti