endeesfritpt

Word
Objetos de código de barras com VBA

Usando e automatizando códigos de barras com VBA em Word

1

Você pode usar o VisualBasic para Applications (VBA) para resolver muitas coisas no Word. Aqui vamos mostrar-lhe como incorporar, usar e excluir o controle ActiveBarcode com VBA:

Incorporando o controle ActiveBarcode em um documento:
Neste exemplo, um controle de código de barras será colocado na posição de cursores. Em seguida, você pode modificar o objeto usando a variável ' ab ':

Dim ab As Object
Set ab = Selection.InlineShapes.AddOLEObject(ClassType:="ACTIVEBARCODE.BarcodeCtrl.1",
FileName:="", LinkToFile:=False, DisplayAsIcon:=False)
Defina as propriedades padrão (altura, largura) do objeto usando a variável ' ab ':
ab.Width = 200
ab.Height = 120
Você pode acessar as Propriedades e métodos do objeto de código de barras usando a propriedade "OLEFormat. Object":
ab.OLEFormat.Object.Type = 6
ab.OLEFormat.Object.Text = "987698769812"
Você também pode usar uma maneira mais limpa para acessar as propriedades, criando e usando uma variável, por exemplo, chamado ' abObject ':
Dim abObject As Object
With ab.OLEFormat
.Activate
Set abObject = .Object
End With

abObject.Type = 6
abObject.Text = "987698769812"
Usando a chamada a seguir, você pode converter o objeto de código de barras em um InlineShape. Observe, no entanto, que você pode alterar o código de barras não mais após a conversão.
ab.ConvertToShape
Se você não precisar mais do controle, poderá excluí-lo do documento:
 ab.Delete
Dica: se for necessário que o Windows processe eventos futuros (geralmente denominados como "KeepWindowsAlive") em uma macro, você poderá forçá-lo usando a seguinte função VBA:
DoEvents
Isso pode ser necessário, por exemplo, se o controle deve desenhar-se de novo.


| Página inicial | Comprar | Baixar | Email | Política de privacidade | Impressão | Version 6.8.0
Copyright © Frank Horn & Lars Schenk
Todas as marcas registradas e nomes de produtos mencionados são de propriedade de seus respectivos proprietários.



Com a versão em Português do nosso site queremos facilitar-lhe o conhecimento do ActiveBarcode. No entanto, o nosso extenso website ainda não foi totalmente traduzido. Portanto, alguns conteúdos estão actualmente disponíveis apenas em inglês e não assumimos qualquer responsabilidade pela exactidão das traduções. Obrigado pela sua compreensão e paciência. Como referência confiável e completa, recomendamos o site em inglês ou alemão.
Utilizamos cookies para lhe proporcionar a melhor experiência e funcionalidade no nosso website. Ao utilizar o nosso site você concorda com isso. Leia mais >