Ciao,
per la creazione di un report ho scelto la via (credo) più facile: preparo uno sheet dell'excel con "la faccia" da report e poi lo mando in stampa (ActiveSheet.PrintOut).
nella preparazione dello sheet-report, vorrei per i sub-totali e totali, cambiare l'allineamento e attivare il Bold.
per farlo uso:
Cells(riga,3).Select
With Selection
.HorizontalAlignment = xlRight
.Font.Bold = True
End With
Cells(riga, 4).Select
With Selection
.Font.Bold = True
End With
dove in Cella(riga,3) scrivo una stringa e in Cella(riga,4) un integer.
per far ritornare tutto come prima (allineamento a sinistra e no Bold), uso:
Cells(next riga, 3).Select
With Selection
.HorizontalAlignment = xlLeft
.Font.Bold = False
End With
Cells(next riga, 4).Select
With Selection
.Font.Bold = False
End With
ma il tutto non funziona alla perfezione nel senso che il secondo setting non fornisce il risultato atteso.
che fare ?
grazie.
ciao
Registrazione