1
Descargue el archivo de ejemplo de VBA expreso para que el proyecto xlDelCharts . Este proyecto ayudará a eliminar todas las cartas en su hoja de trabajo .
2
Copia el siguiente código para utilizar más tarde para eliminar todas las cartas que usted no necesita.
Option Explicit
Sub xlDelCharts (_
xlBookName Opcional As String , _
xlSheetName Opcional As String , _
InformUser Opcional As Boolean = Elimina todas las funciones gráficos incrustados en la hoja de trabajo de destino
' valores pasados :
' xlBookName [in, string, opcional ] libro de destino , por defecto = ActiveWorkbook
' xlSheetName [ en , string, opcional ] hoja de trabajo de destino , por defecto ' InformUser [in, bandera booleana , OPCIONAL] para indicar si el usuario ha de ser
' = ActiveSheet
informado de los progresos {default = I As Integer
MsgBxTitle dévil como secuencia
NumCharts Dim As Integer Dim
Rtn Como VbMsgBoxResult
xlBook As Workbook
Dim xlSheet como hoja de trabajo
... End Sub
el guión se trunca porque supera la capacidad límite de caracteres para este paso . Consulte el archivo de ejemplo para la estructura de codificación completa .
Página 3
Abra cualquier libro de Excel y ejecute el Editor de Visual Basic (VBE ) pulsando Alt + F11. Vaya a la ventana de la izquierda , y luego seleccione la hoja de cálculo , que es probable que llamó VBAProject ( filename.xls ) . Vuelva a colocar la última parte con el nombre real de la hoja de cálculo .
4
Elija "Insertar" y luego " módulo " en el menú Insertar para seleccionar un módulo de código existente para la hoja de trabajo de destino. Pega el código de ejemplo que copió anteriormente en la ventana de código de la derecha . Terminar VBE y guarde el archivo , si lo desea.
5
Abra el archivo de ejemplo para probar el proyecto xlDelCharts . debe borrar todas las listas como se indica en el código
.