Actividad pública reciente
Ha respondido en
Microsoft Excel
Selección de Impresora
Tuve el mismo problema y lo solucione de la siguiente manera Sub ImprimeGastos() x = Application.Dialogs(xlDialogPrinterSetup).Show If x = True Then ActiveWindow.SelectedSheets.PrintOut Copies:=1 ActiveSheet.PageSetup.PrintArea = "$k$1:$Q$103" End If...