Sebas Torres

Con esta línea imprimes 1 copia del área seleccionada Selection.PrintOut Copies:=1, Collate:=True

Disculpa me respuesta sin relación a tu pregunta pero es una simple sugerencia ... Si abren varias personas el archivo desde diferentes equipos, porque no ponen en cada equipo la carpeta de imágenes en una dirección en común como...

No se bien que hace tu código porque no tengo una Pc en este momento para probarlo pero con esta línea dejas la hoja bien oculta y nadie puede verla Hoja1.Visible = xlSheetVeryHidden Y con esta la haces visible nuevamente Hoja1.Visible = xlSheetVisible

¿Algo así es lo que quieres hacer? Arma un formulario como lo ves en la imagen Dentro del mismo pega esto Private Sub ComboBox1_Change() selhoja = ComboBox1.Value Worksheets(selhoja).Select End Sub Private Sub CommandButton1_Click() inicio = Time Set...

Tu quieres copiar la celda B2 desde A3 hasta B21, ¿Y A21 hasta B41 es correcto? Ten en cuenta que si ejecutas la macro 2 veces seguidas desde la celda A3 hasta la celda B41 va ser todo igual, porque tu en la primer ejecucion remplazas el contenido de...

Para quitar el pantallazo usa Application.ScreenUpdating = False Application.ScreenUpdating = True Lo de que se vea al abrir otro archivo no debería pasar pero bue.. no sabría decirte con seguridad que hacer =/ lamento no poder ayudarte compañero ..

Coloca estas instrucciones en el evento Initialize del Userform. La 1er instrucción maximizará la aplicación Excel y tomará esas medidas para tu formulario. Private Sub UserForm_Initialize() Application.WindowState = xlMaximized Me.Width =...

Fíjate esta imagen si es algo así lo que tu quieres hacer Al seleccionar una celda te muestra dentro de un listbox los datos que están en determinado rango De no ser así el listbox se limpia =) no se si me explico bien je je Avisame y te mando el...

¿Compa cómo estas? ¿Lo qué quieres es crear botones para todas tus páginas? Simplemente agrega los botones que necesites en cada una de las hojas y en cada botón haz clic derecho/ver código y dentro del mismo pegas el siguiente código Sub unnombre()...

Ve a propiedades del Combobox donde dice "ListRows" y por defecto dice 8 Ahí cambialo por el valor de elementos que quieres mostrar =)