Como adicionar uma propriedade a um documento do Word no Visual Basic for Applications

Visual Basic for Applications (VBA) adiciona novas propriedades do documento através do método Add do objeto CustomDocumentProperties.

Cada documento do Microsoft Word contém mais informações do que o que um usuário explicitamente tipos ou pastas para ele. A informação extra aparece em propriedades do documento, que são um conjunto de campos que indicam as datas de criação e modificação do documento, título, comentários dos usuários e os dados administrativos. usuários do Word pode adicionar novas propriedades de documento com menus padrão do Word. Ou, eles podem usar linguagem de script do Word, Visual Basic for Applications (VBA). Usando VBA para adicionar uma propriedade torna possível adicionar automaticamente os dados relacionados com o conteúdo do documento. Por exemplo, o código VBA poderia destilar o conteúdo do documento em uma lista de palavras tag, para fazer encontrar o documento mais tarde mais fácil.

Adicionar uma nova propriedade

  • Abra o Word e prima "Alt-F11" para entrar no ambiente Visual Basic integrada de desenvolvimento (IDE).

  • Clique no "Inserir" menu de título, clique em "Módulo" para adicionar um novo módulo para que você digite o código do programa para a criação de uma nova propriedade.

  • Digite o seguinte código na janela do novo módulo:

    Public Sub AddProperty ()

    ActiveDocument.CustomDocumentProperties.Add _

    Nome: ="newproperty", LinkToContent: = False, Valor: ="SomeValue", _

    Tipo: = msoPropertyTypeString

    End Sub

    Este código de programa chama o "Adicionar" método da coleção de propriedades do documento existente para adicionar uma nova propriedade, "newproperty," a essa coleção.

  • Clique em qualquer lugar dentro da sub-rotina AddProperty, em seguida, pressione "F5" para executar o programa.

  • pressione "Alt-F11" para retornar ao Word. Clique no botão Microsoft Office no canto superior esquerdo da tela, em seguida, posicione o mouse sobre "Preparar."

  • Clique "propriedades," em seguida, clique no "personalizadas" guia para exibir a lista de propriedades personalizadas para o documento. o "propriedades" painel exibe as "newproperty" propriedade e seu valor associado, "SomeValue," qual você adicionou nas etapas 3 e 4.

Solicitar ao usuário um nome de propriedade



  • pressione "Alt-F8" para exibir uma lista de macros (ou seja, programas VBA). Clique no "AddProperty" item, em seguida, clique no "Editar" botão. Essa ação retorna para a sub-rotina que adiciona a propriedade personalizada.

  • Selecione as instruções entre o "Public Sub" e "End Sub" declarações, em seguida, pressione "Excluir" excluí-los.

  • Digite os seguintes novos declarações entre o "Public Sub" e "End Sub" declarações:

    dim PropertyName, PropertyValue as string

    PropertyName = InputBox ("Digite o nome para uma nova propriedade.")

    PropertyValue = InputBox ("Por favor insira um valor para a nova propriedade.")

    ActiveDocument.CustomDocumentProperties.Add _

    Nome: = PropertyName, LinkToContent: = False, _

    Valor: = PropertyValue, Tipo: = msoPropertyTypeString

    Estas declarações solicitar ao usuário uma nova propriedade e seu valor, em seguida, criar a nova propriedade a partir da entrada do usuário.

  • pressione "Alt-F8" para regressar ao documento do Word, em seguida, pressionar "Alt-F8" para exibir a lista de sub-rotinas do VBA.

  • Clique duas vezes no "AddProperty" item para executar o seu sub-rotina revista, que irá pedir-lhe o nome eo valor de um imóvel novo documento. Digitar qualquer texto para ambos os itens.

  • Verifique a criação do novo imóvel, olhando para ele na janela de propriedades do documento, como você fez na seção 1, etapa 6.

De esta maneira? Compartilhar em redes sociais:

LiveInternet