Evento BeforeDropOrPaste
Ocorre quando o usuário está prestes a soltar ou colar dados em um objeto.
Sintaxe
Para Quadro
Objeto Sub privado_BeforeDropOrPaste( ByValCancelAs MSForms.ReturnBoolean,
ctrlcomo controle,
ByVal ActionAs fmAction,
ByValDataAs DataObject,
ByValXComo Único,
ByValYcomo single,
Efeito ByValcomo MSForms.ReturnEffect,
ByValShiftComo fmShiftState)
Para MultiPage
Objeto Sub privado_BeforeDropOrPaste(indexAs Long,
ByValCancelAs MSForms.ReturnBoolean,
ctrlcomo controle,
ByVal ActionAs fmAction,
ByValDataAs DataObject,
ByValXComo Único,
ByValYcomo single,
Efeito ByValcomo MSForms.ReturnEffect,
ByValShiftComo fmShiftState)
Para TabStrip
Objeto Sub privado_BeforeDropOrPaste(indexAs Long,
ByValCancelAs MSForms.ReturnBoolean,
ByVal ActionAs fmAction,
ByValDataAs DataObject,
ByValXComo Único,
ByValYcomo single,
Efeito ByValcomo MSForms.ReturnEffect,
ByValShiftComo fmShiftState)
Para outros controles
Objeto Sub privado_BeforeDropOrPaste( ByValCancelAs MSForms.ReturnBoolean,
ByVal ActionAs fmAction,
ByValDataAs DataObject,
ByValXComo Único,
ByValYcomo single,
Efeito ByValcomo MSForms.ReturnEffect,
ByValShiftComo fmShiftState)
A sintaxe de 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 uma MultiPage que a operação de soltar ou colar afetará. |
| Cancel | Obrigatório. Status do evento. False indica que o controle deve lidar com 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 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 da borda esquerda do controle; Y é medido da parte superior do controle.. |
| Effect | Obrigatório. Efeito da operação de 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 suspenso. |
| fmActionDragDrop | 3 | Indica que o usuário arrastou o objeto de sua origem para o destino suspenso e o derrubou no destino suspenso. |
As configurações para Efeito são:
| Constant | Valor | Descrição |
|---|---|---|
| fmDropEffectNone | 0 | Não copia nem move a origem de drop para o destino suspenso. |
| fmDropEffectCopy | 1 | Copia a fonte de entrega para o destino de queda. |
| fmDropEffectMove | 2 | Move a fonte de queda para o destino de queda. |
| fmDropEffectCopyOrMove | 3 | Copia ou move a fonte de entrega para o destino suspenso. |
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 uma MultiPage ou TabStrip, 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 de soltar ou colar.
Quando um controle manipula esse evento, você pode atualizar o argumento Ação para identificar a ação de arrastar e soltar a ser executada.
Quando Effect é definido como fmDropEffectCopyOrMove, você pode atribuir Action a fmDropEffectNone, fmDropEffectCopy ou fmDropEffectMove.
Quando Effect é definido como fmDropEffectCopy ou fmDropEffectMove, você pode reatribuir Ação para fmDropEffectNone. Você não pode reatribuir a ação quando o Efeito é 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.