| | Post: 37 | Registrato il: 23/06/2015
| Città: TORINO | Età: 31 | Utente Junior | 2013 | | OFFLINE | |
|
  08/12/2017 14:35 | |
Ciao,
premesso che ho una tabella che ha già dei valori al suo interno, ho provato a cambiare la formattazione di una colonna dal formato "Numero" ad un formato "Personalizzato".
Purtroppo le singole celle non si aggiornano in automatico e devo entrare in ognuna di esse, singolarmente, e confermare il loro contenuto affinché la nuova formattazione venga applicata.
Qualcuno sa come poterlo fare in automatico?
PS Il formato Personalizzato non è nient'altro che "@ " |
|
| | Post: 2.594 | Registrato il: 03/04/2013
| Utente Veteran | Excel 2000 - 2013 | | OFFLINE | |
|
| 08/12/2017 23:38 | |
Buona sera, FlavioPietro; leggo solo ora. Ho selezionato tutte le Celle che ho voluto formattare e non ho riscontrato problemi. Invia il Tuo File, senza dati sensibili e vediamo quale può essere il problema. Buona serata. Giuseppe
Windows XP - Excel 2000
Windows 10 - Excel 2013 |
| | Post: 37 | Registrato il: 23/06/2015
| Città: TORINO | Età: 31 | Utente Junior | 2013 | | OFFLINE | |
|
| 09/12/2017 12:55 | |
GiuseppeMN, 08/12/2017 23.38:
Buona sera, FlavioPietro;
leggo solo ora.
Ho selezionato tutte le Celle che ho voluto formattare e non ho riscontrato problemi.
Invia il Tuo File, senza dati sensibili e vediamo quale può essere il problema.
Buona serata.
Giuseppe
Ciao, allego un file esempio. Grazie |
| | Post: 2.595 | Registrato il: 03/04/2013
| Utente Veteran | Excel 2000 - 2013 | | OFFLINE | |
|
| 09/12/2017 17:53 | |
Buona sera, FlavioPietro;
il formato deve essere definito prima di iniziare l'inserimento dei Valori.
Nel caso ci sia un "ripensamento" dopo aver inserito i Valori credo non rimanga che VBA.
Questo Codice VBA potrebbe esserti utile:
Sub Aggiorna()
Application.ScreenUpdating = False
Dim URc As Long, x As Long
Dim Vlr As String
URc = Range("B" & Rows.Count).End(xlUp).Row
For x = 12 To URc
Vlr = Cells(x, 2)
Cells(x, 2).FormulaR1C1 = Vlr
Next x
Application.ScreenUpdating = True
End Sub
A disposizione.
Buona serata.
Giuseppe
Windows XP - Excel 2000
Windows 10 - Excel 2013 |
| | Post: 38 | Registrato il: 23/06/2015
| Città: TORINO | Età: 31 | Utente Junior | 2013 | | OFFLINE | |
|
| 11/12/2017 14:14 | |
GiuseppeMN, 09/12/2017 17.53:
Buona sera, FlavioPietro;
il formato deve essere definito prima di iniziare l'inserimento dei Valori.
Nel caso ci sia un "ripensamento" dopo aver inserito i Valori credo non rimanga che VBA.
Questo Codice VBA potrebbe esserti utile:
Sub Aggiorna()
Application.ScreenUpdating = False
Dim URc As Long, x As Long
Dim Vlr As String
URc = Range("B" & Rows.Count).End(xlUp).Row
For x = 12 To URc
Vlr = Cells(x, 2)
Cells(x, 2).FormulaR1C1 = Vlr
Next x
Application.ScreenUpdating = True
End Sub
A disposizione.
Buona serata.
Giuseppe
Grazie mille!
Buona giornata =)
|
|
|
|
|