Compartir a través de


Evento BeforeDropOrPaste

Occurs when the user is about to drop or paste data onto an object.

Sintaxis

Para frame
Objeto Private Sub_BeforeDropOrPaste( ByValCancelAs MSForms.ReturnBoolean,
ctrlComo control,
Acción ByValcomo fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYAs Single,
Efecto ByValcomo MSForms.ReturnEffect,
ByValShiftAs fmShiftState)

Para MultiPage
Private Subobject _BeforeDropOrPaste(indexAs Long,
ByValCancelAs MSForms.ReturnBoolean,
ctrlComo control,
Acción ByValcomo fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYAs Single,
Efecto ByValcomo MSForms.ReturnEffect,
ByValShiftAs fmShiftState)

Para TabStrip
Private Subobject _BeforeDropOrPaste(indexAs Long,
ByValCancelAs MSForms.ReturnBoolean,
Acción ByValcomo fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYAs Single,
Efecto ByValcomo MSForms.ReturnEffect,
ByValShiftAs fmShiftState)

Para otros controles
Objeto Private Sub_BeforeDropOrPaste( ByValCancelAs MSForms.ReturnBoolean,
Acción ByValcomo fmAction,
ByValDataAs DataObject,
ByValXAs Single,
ByValYAs Single,
Efecto ByValcomo MSForms.ReturnEffect,
ByValShiftAs fmShiftState)

La sintaxis del evento BeforeDropOrPaste tiene estas partes:

Parte Descripción
object Obligatorio. Nombre de objeto válido.
index Obligatorio. Índice de la página en una multipágina a la que afectará la operación de colocar o pegar.
Cancel Obligatorio. Estado del evento. False indica que el control debe administrar el evento (predeterminado). True indica que la aplicación es la que controla el evento.
Ctrl Obligatorio. El control de destino.
Action Obligatorio. Indica el resultado, según la configuración actual del teclado, de la operación de arrastrar y colocar pendiente.
Datos Obligatorio. Datos que se arrastran en la operación de arrastrar y soltar. Los datos se empaquetan en un objeto DataObject.
X, Y Obligatorio. La posición horizontal y vertical del puntero del mouse cuando se produce la operación de colocar. Ambas coordenadas se miden en puntos. X se mide desde el borde izquierdo del control; Y se mide desde la parte superior del control.
Effect Obligatorio. Efecto de la operación arrastrar y colocar en el control de destino.
Shift Obligatorio. Especifica el estado de las teclas MAYÚS., CTRL y ALT.

Configuración

Los parámetros de configuración de Action son:

Constante Valor Descripción
fmActionPaste 2 Pega el objeto seleccionado en el destino de colocación.
fmActionDragDrop 3 Indica que el usuario ha arrastrado el objeto desde su origen hasta el destino de colocación y lo ha colocado en dicho destino.

Los parámetros de configuración de Effect son:

Constante Valor Descripción
fmDropEffectNone 0 No copia ni mueve el origen de colocación en el destino de colocación.
fmDropEffectCopy 1 Copia el origen de colocación en el destino de colocación.
fmDropEffectMove 2 Mueve el origen de colocación al destino de colocación.
fmDropEffectCopyOrMove 3 Copia o mueve el origen de colocación en el destino de colocación.

Los valores para Shift son los siguientes:

Constante Valor Descripción
fmShiftMask 1 Se presionó la tecla MAYÚS.
fmCtrlMask 2 Se presionó la tecla CTRL.
fmAltMask 4 Se presionó la tecla ALT.

Comentarios

Para un objeto MultiPage o TabStrip, Visual Basic para Aplicaciones inicia este evento cuando transfiere un objeto de datos al control.

Para otros controles, el sistema inicia este evento inmediatamente antes de la operación de arrastrar y colocar.

Cuando un control trata este evento, se puede actualizar el argumento Action para identificar la acción arrastrar y colocar que se va a realizar.

Cuando Effect está establecido en fmDropEffectCopyOrMove, se puede asignar Action a fmDropEffectNone, fmDropEffectCopy o fmDropEffectMove.

Cuando Effect está establecido en fmDropEffectCopy o fmDropEffectMove, se puede reasignar Action a fmDropEffectNone. No se puede reasignar Action cuando Effect está establecido en fmDropEffectNone.

Consulte también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.