Tabelas são uma característica essencial da Palavra. Eles aparecem em todos os tipos de documentos para ajudar os usuários do Word organizar visualmente dados. Ele pode ser a criação de tabelas ao seu gosto demorado, mas se você sabe algo sobre o Visual Basic, linguagem de script do Word, você pode obter mais rapidamente criar, popular e formatar tabelas . Estudando o seguinte programa Visual Basic lhe dará uma vantagem inicial em manipular tabelas do Word através de código. Digite o código para criar uma tabela

Sub mac () Dim onde Como RangeDim nuTab Como a Tabela

Definir onde = Selection.RangeSet nuTab = ActiveDocument.Tables.Add (onde , NumRows : = 7 , NumColumns : . . . . = 3)

nuTab.Columns ( 1 ) células (1) Faixa = " algumas coisas " nuTab.Columns ( 2 ) células (2) Intervalo = " mais algumas coisas "

nuTab.AutoFormat wdTableFormatClassic1

Com nuTab.Columns (2). Células (2) With. Fronteiras ( wdBorderTop ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd WithWith . Fronteiras ( wdBorderBottom ) . LineStyle = wdLineStyleSingle.LineWidth = wdLineWidth300pt.ColorIndex = wdYellowEnd comend Com

End Sub ------------------------- ------------- Digite o código anterior no IDE do Visual Basic ( ambiente de desenvolvimento integrado ), que você pode entrar a partir do Word dentro pressionando alt -F11 , e garantir que você está na janela de código (Exibir> Código).

Execute o script , retornando para o Word, selecionando " desenvolvedor> Macros ", selecionando " mac " da lista e pressionar " Executar". Visual Basic cria uma nova tabela no ponto de inserção atual, acrescenta alguns dados a ele e formatos de uma das células.
Saiba como funciona o Script

Regresso ao IDE para estudar o código . A instrução SET onde = Selection.Range define uma variável que representa o local atual do cursor. Este é o lugar onde você está instalando uma nova tabela. A segunda linha (Set nuTab = ... ) na verdade, cria a tabela, usando o objeto ActiveDocument a fazê-lo .

O par de declarações após a instrução Set nuTable adiciona conteúdo para as mesas , através das Colunas e Células propriedades do objeto Table.
Localizar membros objeto com o Object Browser

Se você está preocupado em não conhecer as funções e propriedades (por exemplo, colunas específicas , células ) de um objeto, você pode facilmente obter uma lista descritiva de los pressionando F2 , que chama o navegador de objeto. Na caixa de busca do navegador de objeto , você pode digitar o termo " Tabelas " e pressione "Enter ", selecione "Tabela" no painel de resultados na direita , e obter uma lista de todos os membros da Mesa .

Voltando ao código, consulte a declaração "Com nuTab.Columns (2) . células ... " A palavra-chave diz Com Visual Basic que você não deseja digitar uma longa seqüência de palavras pontilhadas para se referir várias vezes para um método ou propriedade de objeto do (por exemplo Object1.Object2.Object3.doThis ()). Em vez disso, que deseja ampliar direto em membros de um objeto em particular na cadeia . Por exemplo :

Com Object1.Object2.Object3.doThis ( ) End With
aplicar formatação

O nuTab.AutoFormat declaração ... aplica-se um regime de fronteira para a tabela completa , enquanto que a primeira instrução com começa a formatar uma célula individual . A formatação do seu código está aplicando não é específica para as células da tabela , mas pode trabalhar com qualquer objeto Range. Os nuTab.Columns (2) . Cells ( 2) objeto passa a ser o objeto de intervalo neste caso.

Experimente com diferentes opções de formatação que o Word oferece. Use o localizador de objectos para encontrá-los . Comece com a procura de uma opção conhecida (por exemplo, wdLineStyleSingle ) e perceber a coleção de opções semelhantes de que ele é uma parte .