Propriedade ItemDeOrigem

Aplica-se a

Objeto BoundObjectFrame

Objeto ObjectFrame

Pode utilizar a propriedade ItemDeOrigem para especificar que os dados de um ficheiro sejam ligados quando criar um objeto OLE ligado. Cadeia de leitura/escrita.

expressão.ItemDeOrigem

expressão Obrigatório. Uma expressão que devolve um dos objetos na lista Aplica-se a.

Observações

Pode definir a propriedade ItemDeOrigem ao especificar os dados em unidades reconhecidas pela aplicação que fornece o objeto. Por exemplo, quando se liga ao Microsoft Office Excel 2007, especifica a definição da propriedade ItemDeOrigem ao utilizar uma referência de célula ou de intervalos de células como R1C1 ou R3C4:R9C22, ou um intervalo com nome como Receita.

Nota: Para determinar a sintaxe de forma a descrever a unidade de dados de um objeto específico, consulte a documentação para a aplicação que foi utilizada para criar o objeto.

Pode definir esta propriedade ao utilizar a folha de propriedades do controlo, uma macro ou um código VBA (Visual Basic for Applications).

No Visual Basic, pode definir esta propriedade com uma expressão de cadeia.

A propriedade TipoOLEPermitido do controlo tem de ser definida como Ligado ou Ambos quando utiliza esta propriedade. Utilize a propriedade DocDeOrigem do controlo para especificar o ficheiro a ligar.

Exemplo

O seguinte exemplo cria um objeto OLE ligado através da moldura de um objeto desvinculado denominado OLE1 e redimensiona o controlo para mostrar os conteúdos totais do objeto quando o utilizador clica num botão de comando.

Sub Command1_Click
OLE1.Class = "Excel.Sheet" ' Set class name.
' Specify type of object.
OLE1.OLETypeAllowed = acOLELinked
' Specify source file.
OLE1.SourceDoc = "C:\Excel\Oletext.xls"
' Specify data to create link to.
OLE1.SourceItem = "R1C1:R5C5"
' Create linked object.
OLE1.Action = acOLECreateLink
' Adjust control size.
OLE1.SizeMode = acOLESizeZoom
End Sub
Aumente os seus conhecimentos do Office
Explore as formações
Seja o primeiro a obter novas funcionalidades
Adira ao Office Insider

As informações foram úteis?

Obrigado pelos seus comentários!

Obrigado pelo seu feedback! Parece que poderá ser benéfico reencaminhá-lo para um dos nossos agentes de suporte do Office.

×