Procedura: applicare stili agli intervalli nei fogli di lavoro a livello di codice

Articolo
02/19/2013

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

Si applica a: le informazioni fornite in questo argomento sono valide per i progetti a livello di documento e di applicazione per Excel 2013 ed Excel 2010. Per ulteriori informazioni, vedere Funzionalità disponibili in base ai tipi di progetto e applicazioni di Office.

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

Creare un nuovo stile e impostarne gli attributi.

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");

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;

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"], "rangeStyles");

rangeStyles.Value2 = "'Style Test";
rangeStyles.Style = "NewStyle";
rangeStyles.Columns.AutoFit();

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

Applicare lo stile Normal all'intervallo.Il codice deve essere inserito in una classe Sheet e non nella classe ThisWorkbook.
```
Me.rangeStyles.Style = "Normal"
```
```
this.rangeStyles.Style = "Normal";
```

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

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");

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;

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");

rangeStyles.Value2 = "'Style Test";
rangeStyles.Style = "NewStyle";
rangeStyles.Columns.AutoFit();

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

Applicare lo stile Normal all'intervallo.

Dim rng As Excel.Range = Me.Application.Range("A1")
rng.Style = "Normal"

Excel.Range rng = this.Application.get_Range("A1");
rng.Style = "Normal";

Vedere anche

Concetti

Utilizzo degli intervalli

Controllo NamedRange

Accesso globale a oggetti nei progetti di Office

Parametri facoltativi nelle soluzioni Office

Condividi tramite