Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Cria um atalho para o arquivo que contém a lista de destinatários ou produtos para uma publicação de mala direta por email.
Sintaxe
expressão. CreateShortcut (FileName)
expressão Uma variável que representa um objeto MailMerge .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| FileName | Obrigatório | String | O nome da lista de correio ou do ficheiro de lista de produtos para o qual o atalho deve ser criado. |
Comentários
O método CreateShortcut corresponde ao comando Guardar um atalho na lista de destinatários nos painéis de tarefas Impressão em Série eEmail Intercalar e o comando Guardar um atalho na lista de produtos no painel de tarefas Intercalar Catálogo na interface de utilizador do Microsoft Publisher.
Os arquivos de destinatário da lista de endereçamento têm a extensão .ols (para Atalho de Lista do Microsoft Office).
Exemplo
Os seguintes Microsoft Visual Basic for Applications (VBA) macro mostra como usar o método CreateShortcut para criar um atalho para uma lista de destinatários de mala direta. Antes de executar essa macro, certifique-se de que o documento ativo está conectado a uma fonte de dados. Se o documento ativo ainda não estiver ligado a uma origem de dados, pode utilizar o método OpenDataSource para estabelecer a ligação.
Além disso, antes de executar o código, substitua o nome de utilizador no caminho da pasta para o ficheiro guardado pelo nome de um utilizador válido no seu computador ou substitua o caminho da pasta e o nome do ficheiro por um caminho e nome de ficheiro à sua escolha.
Tenha em atenção que o caminho da pasta utilizado neste exemplo é típico dos caminhos de pastas no Windows. Tem de ter permissão para guardar ficheiros na pasta que designar.
Public Sub CreateShortcut_Example()
Dim pubMailMerge As Publisher.MailMerge
Set pubMailMerge = ThisDocument.MailMerge
pubMailMerge.CreateShortcut ("C:\Users\username\Documents\My Data Sources\MyRecipientList")
End Sub
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.