Compartilhar via


NamedRange.NoteText(Object, Object, Object) Método

Definição

Obtém ou define a nota de célula associada à célula no canto superior esquerdo do controle NamedRange.

public string NoteText (object Text, object Start, object Length);
abstract member NoteText : obj * obj * obj -> string
Public Function NoteText (Optional Text As Object, Optional Start As Object, Optional Length As Object) As String

Parâmetros

Text
Object

O texto a ser adicionado à nota (até 255 caracteres). O texto é inserido começando na posição Start, substituindo Length os caracteres da nota existente. Se esse argumento for omitido, esse método retornará o texto atual da anotação começando na posição Start, para Length caracteres.

Start
Object

A posição inicial do texto que é definida ou retornada. Se esse argumento for omitido, esse método iniciará no primeiro caractere. Para acrescentar texto à nota, especifique um número maior que o número de caracteres na nota existente.

Length
Object

O número de caracteres a serem definidos ou retornados. Se esse argumento for omitido, o Microsoft Office Excel definirá ou retornará os caracteres da posição inicial até o final da nota (até 255 caracteres). Se houver mais de 255 caracteres de Start até o final da nota, esse método retornará apenas 255 caracteres.

Retornos

Exemplos

O exemplo de código a seguir demonstra como definir uma variedade de características de formatação e exibição de um controle NamedRange chamado NamedRange1. Em particular, este exemplo usa o NoteText método para adicionar uma anotação ao NamedRange1 com o texto This is a Formatting test.

Este exemplo destina-se a uma personalização no nível de documento.

private void SetRangeFormats()
{
    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", "A5"],
        "namedRange1");

    namedRange1.NoteText("This is a Formatting test");
    namedRange1.Value2 = "Martha";
    namedRange1.Font.Name = "Verdana";
    namedRange1.VerticalAlignment = Excel.XlVAlign.xlVAlignCenter;
    namedRange1.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter;
    namedRange1.BorderAround(missing, Excel.XlBorderWeight.xlThick, 
        Excel.XlColorIndex.xlColorIndexAutomatic);
    namedRange1.AutoFormat(Excel.XlRangeAutoFormat.xlRangeAutoFormat3DEffects1,
        true, false, true, false, true, true);

    if (MessageBox.Show("Clear the formatting and notes?", "Test",
        MessageBoxButtons.YesNo) == DialogResult.Yes)
    {
        namedRange1.ClearFormats();
        namedRange1.ClearNotes();
    }
}
Private Sub SetRangeFormats()
    Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
        = Me.Controls.AddNamedRange(Me.Range("A1", "A5"), _
        "namedRange1")

    namedRange1.NoteText("This is a Formatting test", , )
    namedRange1.Value2 = "Martha"
    namedRange1.Font.Name = "Verdana"
    namedRange1.VerticalAlignment = Excel.XlVAlign.xlVAlignCenter
    namedRange1.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter
    namedRange1.BorderAround(, Excel.XlBorderWeight.xlThick, _
        Excel.XlColorIndex.xlColorIndexAutomatic, )
    namedRange1.AutoFormat( _
        Excel.XlRangeAutoFormat.xlRangeAutoFormat3DEffects1, _
        True, False, True, False, True, True)

    If MessageBox.Show("Clear the formatting and notes?", _
        "Test", MessageBoxButtons.YesNo) = DialogResult.Yes Then
        namedRange1.ClearFormats()
        namedRange1.ClearNotes()
    End If
End Sub

Comentários

As anotações da célula foram substituídas por comentários de intervalo. Para obter mais informações, consulte o Comment objeto .

Para adicionar uma observação que contenha mais de 255 caracteres, use esse método uma vez para especificar os primeiros 255 caracteres e, em seguida, use-o novamente para acrescentar o restante da nota (não mais do que 255 caracteres de cada vez).

Parâmetros Opcionais

Para obter informações sobre parâmetros opcionais, consulte Parâmetros opcionais em soluções do Office.

Aplica-se a