Procedura: applicare stili agli intervalli nei fogli di lavoro

Aggiornamento: Luglio 2008

Si applica a
Le informazioni contenute in questo argomento riguardano solo i progetti Visual Studio Tools per Office e le versioni di Microsoft Office specificati. Tipo di progetto Progetti a livello di documento Progetti a livello di applicazione Versione Microsoft Office Excel 2003 Excel 2007 Per ulteriori informazioni, vedere Funzionalità disponibili in base ai tipi di progetto e applicazione.

È possibile applicare degli stili denominati alle aree delle cartelle di lavoro. In Excel sono disponibili diversi stili predefiniti.

Nella finestra di dialogo Formato celle sono visualizzate tutte le opzioni che è possibile utilizzare per la formattazione delle celle, disponibili tramite codice. Per visualizzare questa finestra di dialogo in Excel, fare clic su Celle dal menu Formato.

Per applicare uno stile a un intervallo denominato in una personalizzazione a livello di documento

1. Creare un nuovo stile e impostarne gli attributi. Il codice deve essere inserito in una classe Sheet e non nella classe ThisWorkbook.

   Dim style As Excel.Style = Globals.ThisWorkbook.Styles.Add("NewStyle")
   
   style.Font.Name = "Verdana"
   style.Font.Size = 12
   style.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red)
   style.Interior.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Gray)
   style.Interior.Pattern = Excel.XlPattern.xlPatternSolid
   

   Excel.Style style = Globals.ThisWorkbook.Styles.Add("NewStyle", missing);
   
   style.Font.Name = "Verdana";
   style.Font.Size = 12;
   style.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red);
   style.Interior.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Gray);
   style.Interior.Pattern = Excel.XlPattern.xlPatternSolid;
   

2. Creare un controllo NamedRange, assegnare testo al controllo, quindi applicare il nuovo stile. Il codice deve essere inserito in una classe Sheet e non nella classe ThisWorkbook.

   Dim rangeStyles As Microsoft.Office.Tools.Excel.NamedRange = _
       Me.Controls.AddNamedRange(Me.Range("A1"), "rangeStyles")
   
   rangeStyles.Value2 = "'Style Test"
   rangeStyles.Style = "NewStyle"
   rangeStyles.Columns.AutoFit()
   

   Microsoft.Office.Tools.Excel.NamedRange rangeStyles =
       this.Controls.AddNamedRange(this.Range["A1", missing], "rangeStyles");
   
   rangeStyles.Value2 = "'Style Test";
   rangeStyles.Style = "NewStyle";
   rangeStyles.Columns.AutoFit();
   

Per applicare uno stile a un intervallo denominato in un componente aggiuntivo a livello di applicazione

1. Creare un nuovo stile e impostarne gli attributi.

   Dim style As Excel.Style = Me.Application.ActiveWorkbook.Styles.Add("NewStyle")
   
   style.Font.Name = "Verdana"
   style.Font.Size = 12
   style.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red)
   style.Interior.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Gray)
   style.Interior.Pattern = Excel.XlPattern.xlPatternSolid
   

   Excel.Style style = this.Application.ActiveWorkbook.Styles.Add("NewStyle", missing);
   
   style.Font.Name = "Verdana";
   style.Font.Size = 12;
   style.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red);
   style.Interior.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Gray);
   style.Interior.Pattern = Excel.XlPattern.xlPatternSolid;
   

2. Creare un oggetto Microsoft.Office.Interop.Excel.Range, assegnare testo all'oggetto creato e applicare quindi il nuovo stile.

   Dim rangeStyles As Excel.Range = Me.Application.Range("A1")
   
   rangeStyles.Value2 = "'Style Test"
   rangeStyles.Style = "NewStyle"
   rangeStyles.Columns.AutoFit()
   

   Excel.Range rangeStyles = this.Application.get_Range("A1", missing);
   
   rangeStyles.Value2 = "'Style Test";
   rangeStyles.Style = "NewStyle";
   rangeStyles.Columns.AutoFit();
   

Vedere anche

Attività

Procedura: cancellare stili dagli intervalli nelle cartelle di lavoro

Concetti

Utilizzo degli intervalli

Controllo NamedRange

Accesso globale agli oggetti nei progetti Visual Studio Tools per Office

Informazioni sui parametri facoltativi nelle soluzioni Office

Cronologia delle modifiche

Date	History	Motivo
Luglio 2008	Aggiunto un esempio di codice utilizzabile in un componente aggiuntivo a livello di applicazione.	Commenti e suggerimenti dei clienti.