BookmarkSubscribeRSS Feed
Seabird
Calcite | Level 5

Is there a setting I can change in the Properties so that when I export my SAS results into Excel (simply using the Export button), it opens in Calibri font size 10 instead of Calibri font size 11?

 

Thank you.

5 REPLIES 5
ballardw
Super User

Export creates data for interchange and as such provides no font information.

Options would be to set in Excel, possibly as your default, or to use another procedure, possibly a report and a method ODS Excel or ODS tagsets.excelxp that can provide font information.

 

 

Seabird
Calcite | Level 5

Thank you, ballardw.  I was afraid that might be the case, since I hadn't found the answer in the Community posts.  My Excel is set up to create new files in my preferred font, so that wouldn't be the solution.  If I get annoyed enough with having to manually change the font, I'll consider your ODS solutions.

ballardw
Super User

Perhaps set up a Excel VB macro to select all cells and set the font. Then at least the process could be a single key stroke.

 

Of course one could also wonder about the concern over any font at all. Reports are the only thing I would spend any time on text appearance. If the "data" is supposed to be a report then one of the SAS Report procedures and ODS would likely be a better approach in general.

Seabird
Calcite | Level 5

I obtain data from SAS then manipulate it in Excel, often comparing with data from other sources, and I simply prefer the smaller font size.  Since the workbook created when exporting from SAS is set for a larger font, any other sheets added to the workbook will be in that font.  Although it only takes a few seconds to adjust the workbook to the new font, I find it annoying and was hoping to find a quick solution in SAS.

rogerjdeangelis
Barite | Level 11
%let pgm=utl_excel_default_font;

HAVE CLASS DATASET

Up to 40 obs SD1.CLASS total obs=19

Obs    NAME       SEX    AGE    HEIGHT    WEIGHT

  1    Alfred      M      14     69.0      112.5
  2    Alice       F      13     56.5       84.0
  3    Barbara     F      13     65.3       98.0
  4    Carol       F      14     62.8      102.5
  5    Henry       M      14     63.5      102.5
  6    James       M      12     57.3       83.0

WANT

 1.  Workbook default font aria1 narrow and font_size=10
 2.  Start report at column 3 row 2

EXCEL EXCEL  EXCEL  EXCEL
ROW   COL 1  COL 2  COL 3

1                   NAME       SEX    AGE    HEIGHT    WEIGHT
2                    1    Alfred      M      14     69.0      112.5
3                    2    Alice       F      13     56.5       84.0
4                    3    Barbara     F      13     65.3       98.0
5                    4    Carol       F      14     62.8      102.5
6                    5    Henry       M      14     63.5      102.5


SOLUTION

* SAS data for excel;

data "d:/sd1/class.sas7bdat";
  set sashelp.class;
run;quit;

* the zip command was not in my path so I set it;

%utl_submit_r64(
library(openxlsx);
library(haven);
Sys.setenv('R_ZIPCMD' = 'd:/Rtools/bin/zip.exe');
class<-read_sas('d:/sd1/class.sas7bdat');
class;
wb <- createWorkbook();
addWorksheet(wb, 'S1');
modifyBaseFont(wb, fontSize = 10, fontName = 'Arial Narrow');
writeDataTable(wb, 'S1', x = class, startCol = 3, startRow=2);
saveWorkbook(wb, 'd:/xls/modifyBaseFontExample.xlsx', overwrite = TRUE);
);

* Output from R;

> library(openxlsx);
library(haven);
Sys.setenv('R_ZIPCMD' = 'd:/Rtools/bin/zip.exe');
class<-read_sas('d:/sd1/class.sas7bdat');
class;
wb <- createWorkbook(); addWorksheet(wb, 'S1');
modifyBaseFont(wb, fontSize = 10, fontName = 'Arial Narrow');
writeDataTable(wb, 'S1', x = class, startCol = 3, startRow=2);
saveWorkbook(wb, 'd:/xls/modifyBaseFontExample.xlsx', overwrite = TRUE);

      NAME SEX AGE HEIGHT WEIGHT
1   Alfred   M  14   69.0  112.5
2    Alice   F  13   56.5   84.0
3  Barbara   F  13   65.3   98.0
4    Carol   F  14   62.8  102.5
5    Henry   M  14   63.5  102.5



%macro utl_submit_R64(pgmx)/des="Semi colon separated set of R commands";
  * write the program to a temporary file;
  filename r_pgm temp lrecl=32766 recfm=v;
  data _null_;
    file r_pgm;
    pgm=compbl("&pgmx");
    put pgm;
    putlog pgm;
  run;
  %let __loc=%sysfunc(pathname(r_pgm));
  * pipe file through R;
  filename rut pipe "c:\Progra~1\R\R-3.2.4\bin\x64\R.exe --vanilla --quiet --no-save < &__loc";
  data _null_;
    file print;
    infile rut;
    input;
    put _infile_;
    putlog _infile_;
  run;
  filename rut clear;
  filename r_pgm clear;
%mend utl_submit_r64;


sas-innovate-2024.png

Join us for SAS Innovate April 16-19 at the Aria in Las Vegas. Bring the team and save big with our group pricing for a limited time only.

Pre-conference courses and tutorials are filling up fast and are always a sellout. Register today to reserve your seat.

 

Register now!

How to Concatenate Values

Learn how use the CAT functions in SAS to join values from multiple variables into a single value.

Find more tutorials on the SAS Users YouTube channel.

Click image to register for webinarClick image to register for webinar

Classroom Training Available!

Select SAS Training centers are offering in-person courses. View upcoming courses for:

View all other training opportunities.

Discussion stats
  • 5 replies
  • 3429 views
  • 0 likes
  • 3 in conversation