Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Macro allinea testo destra, sinistra, centro

Ultimo Aggiornamento: 15/02/2018 19:16
Post: 654
Registrato il: 16/08/2015
Città: CORDENONS
Età: 67
Utente Senior
Excel 2016-32bit Win11
OFFLINE
13/02/2018 17:48

Un saluto a tutti.
Arrivo tardi ma ormai ho dedicato un po' di tempo così pubblico comunque la mia versione di macro che potrebbe bastare così (da mettere in un modulo vba, basta anche nel modulo del foglio interessato):

Option Explicit

Sub allinea()

    Dim x As Integer

    For x = 8 To 50
        If Range("E" & x) > 0 And Range("K" & x) > 0 Then
            Range("H" & x).HorizontalAlignment = xlCenter
        ElseIf Range("E" & x) > 0 Then Range("H" & x).HorizontalAlignment = xlLeft
        ElseIf Range("K" & x) > 0 Then Range("H" & x).HorizontalAlignment = xlRight
        End If
    Next x

End Sub
[Modificato da rollis13 13/02/2018 17:50]

______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto)
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
macro doppio click nascondi testo (10 messaggi, agg.: 15/10/2017 21:12)
Macro allinea testo (6 messaggi, agg.: 05/05/2017 13:50)
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 09:35. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com