Como configurar hoja con macro

Podrían ayudarme con esto

Necesito una macro para configurar hoja

Hoja 3

Alto de hoja: 21.59

Ancho de hoja: 33.02

Margen izquierdo: 0

Margen derecho: 0

Margen superior: 0

Margen inferior: 0

Orientación: horizontal

1 Respuesta

Respuesta
1

La siguiente macro configura los márgenes y otros aspectos de la página. Colocala en un módulo y llamala desde cualquier macro que tengas para Imprimir o en el evento BeforePrint.

Sub ConfHoja()
'x Elsamatilde  -extraída del manual 500Macros
Izq = 0
Der = 0
Sup = 0
Inf = 0
With ActiveSheet.PageSetup
    'Configuración de márgenes
    .LeftMargin = Application.CentimetersToPoints(Izq)
    .RightMargin = Application.CentimetersToPoints(Der)
    .TopMargin = Application.CentimetersToPoints(Sup)
    .BottomMargin = Application.CentimetersToPoints(Inf)
    'orientación
    .Orientation = xlLandscape   'horizontal
    'tamaño de papel
    .PaperSize = xlPaperA4         'A4
End With
End Sub

Para cambiar otros aspectos podes encender la grabadora de macros, ajustar la configuración y detener la grabadora. En un módulo encontrarás estas y otras instrucciones que quizás también quieras modificar.

El foro ya está activo nuevamente... si el tema quedó resuelto no olvides valorar la respuesta, sino comenta o solicita aclaraciones.

Sdos!

Te recuerdo que la consulta sigue como pendiente de valoración para darla por cerrada.

Sdos!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Recorrer una tabla de Access

Tengo un formulario de access en el que tengo un campo llamado importe y otros importe_1, importe_2, importe_3 y un campo llamado reg que lo que necesito es que si el valor del registro es 21 coloque el importe en importe_, si es 22 lo coloque en...
3 respuestas

Pagos múltiples de cuotas de asociados mediante un importe grande pagado y conforme a un rango de fecha ingresado..Ms access 365

Mediante un botón "Pagar Cuotas" Necesito ir descontando las cuotas de los asociados del importe pagado e ir controlando el saldo del mismo hasta quedar en 0, teniendo en cuenta el mes de vencimiento de las cuotas comparando entre Fecha Inicial,...
2 respuestas

Como pegar solamente valores de una celda a otra hoja

Sub CopiarImprimir() ' ' CopiarImprimir Macro ' Application.ScreenUpdating = False Sheets("Imprimir").Select Worksheets("Imprimir"). Range("A4:C50"). Clear Range("E4:J49"). Clear Sheets("Planillas").Select Sheets("Planillas"). Range("G4").Copy...
2 respuestas

Redondear decimales en números arábigos

Sres. T.E. La consulta es la siguiente, necesito una fórmula en excel para llevar los decimales a .00 y .50, ejemplo en una celda tengo el valor 45.12 levarlo a 45.00 en otra tengo 45.42 levarlo a 45.00.
2 respuestas

Mantener el color de un botón al salir de un módulo

Quisiera por favor me ayuden, estoy haciendo una aplicación en vba para un restaurante y necesito lo siguiente: tengo 20 mesas que al momento de abrir el modulo de venta selecciono la mesa y cambia de color y su estado pasa a ocupada la idea es...
2 respuestas

Cómo habilitar o deshabilitar (25) Grupo de opciones en formulario access

Tengo varias encuestas, cada una contiene de 5 a 30 preguntas y un formulario para llenado con 30 marcos de opciones numerados del 1 al 30. ¿Cómo podría habilitar o deshabilitar estos grupos de opciones de acuerdo al número de preguntas? Ejemplo:...
3 respuestas

Sumar dos filas distintas mayor a 0

Quiero sumar dos filas separadas por ejemplo fila 5 de A4 a J4 y fila 10 de A4 a J4, cada fila tiene resultados positivos o negativos, quiero que me sume en la celda B3 por ejemplo los datos positivos y en la celda C3 los datos negativos. Solo se...
2 respuestas

Filtrar ultima fecha según el criterio de una celda

Tengo una tabla de excel con la siguiente información Columna A el código del equipo. (Código único para cada equipo) Columna B la fecha en que se realizo la ultima revisión. Columna C el nombre del equipo. Columna D El tipo de revisión (preventivo,...
2 respuestas

Ocultar entorno access navegar por formularios e informes

Quiero ocultar el entorno de access pero que todo funcione tanto formulario como informes y que el icono salga en la barra de tareas
1 respuesta

Cómo hacer un filtro múltiple en formulario Excel?

Tengo un formulario en Excel con 5 combos combinado(Tipo, Año, Mes, servicio y Especialidad) y un cuadro de lista. La idea es que al seleccionar un valor en el cuadro combinado Tipo, en el cuadro de lista se me filtren los registros con ese valor,...
2 respuestas