Application.CutCopyMode de VBA = Falso
Si ha grabado macros mientras copia y pega, probablemente haya visto la siguiente línea de código:
| 1 | Application.CutCopyMode = False |
Esta línea de código "borra" el portapapeles *. Si ha copiado una celda de Excel, ejecutar esta línea de código eliminará la animación alrededor de la celda copiada:
CutCopyMode es una propiedad a nivel de aplicación que indica si un programa de Microsoft Office (por ejemplo, Excel) está en modo Cortar o Copiar. Mientras está en modo copiar (o cortar), Excel tiene algo almacenado en su portapapeles que se puede pegar.
No estoy al tanto de un momento en el que alguna vez necesite establecer Application.CutCopyMode en True.
Evitando CutCopyMode = False
Por lo general, puede evitar la necesidad de configurar Application CutCopyMode = False utilizando las mejores prácticas de VBA Copiar + Pegar. Como ejemplo, la siguiente línea de código copia y pega una celda en una sola línea, eliminando la necesidad de establecer CutCopyMode en False:
| 123 | Copia secundariaPaste_OneLine ()Rango ("a1"). Rango de copia ("b1")End Sub |
Obtener el estado de Application.CutCopyMode
De vez en cuando, es posible que desee obtener el estado de Application.CutCopyMode. Potencialmente para evitar errores al intentar Pegar cuando no hay nada en el portapapeles. Para obtener el estado, utilice el siguiente código:
| 123456789101112 | Sub Get_Application_CutCopyMode_Status ()Seleccione Aplicación de caso.El caso es = xlCopyMsgBox "Modo de copia"Caso es = xlCutMsgBox "Modo de corte"El caso es = falsoMsgBox "No en modo Cortar o Copiar"Finalizar SeleccionarEnd Sub |
* Application.CutCopyMode solo borrará el portapapeles de la aplicación Microsoft Office (por ejemplo, Excel). No borrará el portapapeles de Window. Haga clic en el enlace para obtener más información sobre cómo borrar el portapapeles de Windows usando VBA.
