Allineament diversi nella stessa cella



  • Allineament diversi nella stessa cella
    di Santuberto (utente non iscritto) data: 15/12/2013 07:33:45

    Buongiorno a tutti. Posso approfittane ancora? Questa volta vorrei chiedere un aiuto per migliorare “l’aspetto” (ma anche la leggibilità) di una colonna di dati. Mi spiego. In una colonna inserisco dei dati tramite un concatena. Io vorrei che il primo valore inserito nella cella venisse allineato a sx, mentre gli altri valori dovrebbero apparire allineati a dx. Se necessario, posso allegare un file. Grazie mille a tutti. PS: non posso utilizzare due colonne e non capisco le macro.



  • di patel data: 15/12/2013 09:14:36

    anche io vorrei dimagrire, però non mi levate 1 chilo di pasta col ragù al giorno




  • Allineamenti diversi nella stessa cella
    di Santuberto (utente non iscritto) data: 15/12/2013 09:23:04

    Vabbè! Il fatto è che ho visto trovare tante “soluzioni impossibili”, che speravo si potesse fare anche questa. Con la macro, invece, si potrebbe fare? PS: ma veramente ti fai un chilo di pasta al giorno? Attento alla salute.



  • di patel data: 15/12/2013 09:30:07

    intanto allega un file di esempio con anche il risultato desiderato spiegando perché non puoi avere 2 colonne





  • di Santuberto (utente non iscritto) data: 15/12/2013 09:57:25

    Buongiorno Patel. Grazie per l’interessamento. La seconda colonna non la posso avere perché dovrei inserirla sotto a celle unite, e comunque mi creerebbe un po’ di caos. Il file che allego riporta dati puramente d’esempio. Grazie.



  • di patel data: 15/12/2013 12:09:45

    per file di esempio indendevo qualcosa che facesse capire il contesto e quindi le tue difficoltà ad avere 2 colonne.





  • di Raffaele_53 (utente non iscritto) data: 15/12/2013 13:34:20

    Desideri che i dati del foglio2 vengano scritti nel foglio1
    Leggendo la Tua formula (perdi sia l'anno di 4 cifre che i decimali della cifra)
    Che io sappia non si può formattare una cella con una parte alineata a sinistra e una parte a destra.
    Dovresti usare due colonne distinte.

    Al massimo credo che puoi ottenere una cosa simile nella stessa cella ex

    Pezzi ottenuti il giorno 12.11.09:
    969 a canicattì



  • di Santuberto (utente non iscritto) data: 15/12/2013 14:21:15

    cit: “perdi sia l'anno di 4 cifre che i decimali della cifra”
    La formattazione è quella che ho impostato: è voluta in questo modo.
    Cit: “Che io sappia non si può formattare una cella con una parte allineata a sinistra e una parte a destra”
    Un vero peccato.
    Grazie dell’esempio che hai fatto. Comunque, per fortuna, quello che ho chiesto non mi serviva per risolvere un problema d’analisi dei dati, ma solamente un modo migliore e più immediato di visualizzarli.
    Nel mio file, infatti, non ci sono solo due dati da visualizzare. Nella stessa cella ho concatenato una sigla (da 2 a 4 lettere), un nr (a volte unità, a volte migliaia) ed una percentuale. Averli posizionati nel modo corretto, renderebbe la lettura più semplice.
    A tutti e due, un ringraziamento ed un cordiale saluto.



  • di patel data: 15/12/2013 15:27:17

    Inutile mettere risolto, non è vero, risolto non serve per chiudere la discussione, ma per segnalare che chi apre la discussione troverà anche la soluzione





  • di Santuberto (utente non iscritto) data: 15/12/2013 15:55:37

    Ho chiesto un’informazione e l’informazione mi è stata data: formattare una cella come avevo chiesto non è possibile. Far sapere che è: “inutile perdere tempo perché non è possibile fare quanto chiesto”, leva ogni dubbio a chi si trova nella stessa condizione. Ritenevo fosse l’opzione corretta. Un cordiale saluto, Santuberto



  • di patel data: 15/12/2013 17:55:50

    Hai avuto troppa fretta ad arrenderti, una soluzione c'è, molto lenta ma c'è
     
    Sub Adatta()
    Dim nWidth As Single, nHeigth As Single, cell As Range
    nWidth = Columns("C").ColumnWidth
    For Each cell In Range("C6:C24") ' range da adattare alle esigenze
      With cell
        If cell <> "" Then
          .Columns.AutoFit
          Do While .ColumnWidth < nWidth
            cell.Value = Replace(cell, ": ", ":" & String(2, " "))
            .Columns.AutoFit
          Loop
        End If
      End With
    Next
    Columns("C").ColumnWidth = nWidth
    End Sub






  • di Santuberto (utente non iscritto) data: 15/12/2013 18:23:57

    Perfetta! Incredibile quello che si può fare con excel. Ora vedo di adattarla al mio file, ma già nell’esempio che ho postato, si può vedere il risultato. Complimenti e grazie mille da Santuberto.
    cit: "una soluzione c'è, molto lenta ma c'è"
    ... chi va piano, va sano e va lontano!