No requiere software.
Eliminamos N líneas en blanco a la vez
Descargamos datos de Internet. Cuando usamos Word para organizar, archivar e imprimir, a menudo encontramos que hay muchas líneas en blanco en el documento. La impresión afecta directamente la lectura y desperdicia papel. Entonces, cómo eliminar varios párrafos en blanco es muy problemático. ¿al mismo tiempo? Escribamos un pequeño módulo funcional y convirtámoslo en un menú para resolver el problema por usted
1 Haga clic en "Herramientas--Macro--Macro" (o presione la tecla de acceso directo Alt + F8) Abra ". Cuadro de diálogo "Macro", ingrese "DelBlank" en la columna debajo de "Nombre de macro" y haga clic en el botón "Crear".
2. Después de abrir el editor de Visual Basic, ingrese el siguiente fragmento de código entre sub DelBlank() y End Sub en la ventana de código de la derecha.
Atenuar i como párrafo, n mientras
Application.ScreenUpdating = False
Para cada i en ActiveDocument.Paragraphs
Si Len (i.Range) = 1 Entonces
i.Range.Delete
n = n + 1
Finalizar si
Siguiente
MsgBox "***Eliminar párrafos en blanco" & n & "¡Uno!"
Application.ScreenUpdating = True
Haga clic en "Archivo 1 Guardar normal" para guardar el código actual y luego cierre el editor visual Basic.
Agregue este comando macro al menú de palabras. Haga clic derecho en la barra de menú, haga clic en "Personalizar" en el menú emergente. y seleccione la opción "Comando", busque "Macro" en el cuadro de lista "Categoría" a la izquierda, arrastre "Normal.NewMacros.DelBlank" desde el cuadro de lista "Comando" a la derecha a la barra de menú "Herramientas". Haga clic derecho en el comando y seleccione esto. El menú cambia de nombre a "Eliminar líneas en blanco (& D)". En este punto, el menú que puede eliminar N líneas en blanco a la vez se crea correctamente. Abra el documento de Word y seleccione. "Herramientas: eliminar líneas en blanco" (o presione la tecla de método abreviado "Ctrl + D") para eliminar líneas en blanco y finalmente informarle los resultados de la eliminación. ¿Qué estás esperando?