NamedRange.NoteText(Object, Object, Object) Método
Definição
Importante
Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.
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.