Adiciona uma caixa de texto de desenho XLS clássica por meio de âncoras da planilha com base em 1 e retorna o objeto
TXLSTextBox criado
Sintaxe
function AddTextBox(AText: WideString; ARow1, ACol1, ARow2, ACol2: Integer): TXLSTextBox;
function AddTextBox(AText: WideString; ARange: WideString): TXLSTextBox;
Parâmetros
| AText |
O texto inicial armazenado na caixa de texto |
| ARow1, ACol1 |
O número da linha e da coluna da âncora do canto superior esquerdo com base em 1 |
| ARow2, ACol2 |
O número da linha e da coluna da âncora do canto inferior direito com base em 1 |
| ARange |
Intervalo da planilha no estilo A1, por exemplo C4:F8 |
Observações
AddTextBox é um método de atalho no nível da planilha usado para criar formas de desenho independentes por meio da coleção
Shapes da planilha
O método não cria uma anotação de célula, nem anexa o texto ao registro de nota da célula
Exemplo
var
TextBox: TXLSTextBox;
begin
TextBox := Workbook.Sheets[1].AddTextBox(
'Standalone note',
2, 3,
5, 7);
TextBox.Fill.ForeColor.RGB := $00FFFF;
TextBox := Workbook.Sheets[1].AddTextBox(
'Range note',
'C4:F8');
end;
Veja também