Evento BeforeDropOrPaste

Ocorre quando o usuário está prestes a soltar ou colar dados em um objeto.

Sintaxe

Para Quadro
Subobjeto privado _BeforeDropOrPaste( ByValCancelarComo MSForms.ReturnBoolean,
ctrlAs Control,
ByValActionAs fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYComo Solteiro,
Efeito ByValComo MSForms.ReturnEffect,
ByValShiftAs fmShiftState)

Para MultiPage
Subobjeto privado _BeforeDropOrPaste(indexAs Long,
ByValCancelar ComoMSForms.ReturnBoolean,
ctrlAs Control,
ByValActionAs fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYComo Solteiro,
Efeito ByValComo MSForms.ReturnEffect,
ByValShiftAs fmShiftState)

para TabStrip
Subobjeto privado _BeforeDropOrPaste(indexAs Long,
ByValCancelar ComoMSForms.ReturnBoolean,
ByValActionAs fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYComo Solteiro,
Efeito ByValComo MSForms.ReturnEffect,
ByValShiftAs fmShiftState)

Para outros controles
Subobjeto privado _BeforeDropOrPaste( ByValCancelarComo MSForms.ReturnBoolean,
ByValActionAs fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYComo Solteiro,
Efeito ByValComo MSForms.ReturnEffect,
ByValShiftAs fmShiftState)

A sintaxe do evento BeforeDropOrPaste tem estas partes:

Sair Descrição
objeto Obrigatório. Um nome de objeto válido.
índice Obrigatório. O índice da página em um MultiPage que a operação de soltar ou colar afetará.
Cancel Obrigatório. Status do evento. Falso indica que o controle deve manipular o evento (padrão). True indica que o aplicativo manipula o evento.
Ctrl Obrigatório. O controle de destino.
Action Obrigatório. Indica o resultado, com base nas configurações atuais do teclado, da operação pendente de arrastar e soltar.
Dados Obrigatório. Dados que são arrastados em uma operação de arrastar e soltar. Os dados são empacotados em um DataObject.
X, Y Obrigatório. A posição horizontal e vertical do ponteiro do mouse quando a queda ocorre. Ambas as coordenadas são medidas em pontos. X é medido a partir da borda esquerda do controle; Y é medido a partir da parte superior do controle.
Effect Obrigatório. Efeito da operação arrastar e soltar no controle de destino.
Shift Obrigatório. Especifica o estado de SHIFT, CTRL e ALT.

Configurações

As configurações de Ação são:

Constant Valor Descrição
fmActionPaste 2 Cola o objeto selecionado no destino de soltar.
fmActionDragDrop 3 Indica que o usuário arrastou o objeto de sua origem para o destino de soltar e o soltou no destino de soltura.

As configurações para o efeito são:

Constant Valor Descrição
fmDropEffectNone 0 Não copia nem move a origem de soltar para o destino de soltar.
fmDropEffectCopy 1 Copia a origem de soltar para o destino de soltar.
fmDropEffectMove 2 Move a origem de soltar para o destino de soltar.
fmDropEffectCopyOrMove 3 Copia ou move a origem de soltar para o destino de soltar.

As configurações de Shift são:

Constant Valor Descrição
fmShiftMask 1 SHIFT foi pressionada.
fmCtrlMask 2 CTRL foi pressionada.
fmAltMask 4 ALT foi pressionada.

Comentários

Para um MultiPage ou TabStrip, o Visual Basic for Applications inicia esse evento quando transfere um objeto de dados para o controle.

Para outros controles, o sistema inicia esse evento imediatamente antes da operação soltar ou colar.

Quando um controle manipula esse evento, você pode atualizar o argumento Action para identificar a ação de arrastar e soltar a ser executada.

Quando Efeito é definido como fmDropEffectCopyOrMove, é possível atribuir Ação a fmDropEffectNone, fmDropEffectCopy ou fmDropEffectMove.

Quando Effect é definido como fmDropEffectCopy ou fmDropEffectMove, é possível reatribuir Action a fmDropEffectNone. Não é possível reatribuir Action quando Effect está definido como fmDropEffectNone.

Confira também

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.