× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



This is from the following link to the POI FAQ:
http://poi.apache.org/faq.html#faq-N100E3

"Add blank cells around where the cells normally would have been and set the borders individually for each cell."

So, to put a border around columns 4-9, you'd do this (I'm blatantly stealing your code from the earlier message, but using the 'headstyle1' from your more recent post):

D Cell s like(HSSFCell)

row# = 2;
hssfrow = HSSFSheet_createRow(hssfsheet : row#);
mergerf = row#;
mergert = row#;
mergecf = 4;
mergect = 9;
hssf_merge( hssfsheet : mergerf : mergecf : mergert : mergect );

hssf_text( hssfrow : 4: 'Merged cells 1' : headstyle1);
for col = 5 to 9;
cell = HSSFRow_createCell(hssfrow: col);
HSSFCell_setCellStyle(cell: headstyle1);
HSSF_freeLocalRef(cell);
endfor;

Hope that helps


On 6/27/2013 12:13 PM, tim.dclinc@xxxxxxxxx wrote:
After getting the merged cells to work (thanks Scott), i added a style
to place border around new merged cell as follows:

headstyle1 = HSSFWorkbook_createCellStyle( HSSFWorkbook );
numfmt = 22;
HSSFCellStyle_setFillForegroundColor(headstyle1: numfmt);
HSSFCellStyle_setFillPattern(headstyle1 : PATTERN_1);
currentFont = HSSFWorkbook_createFont( HSSFWorkbook );
HSSFFont_setBoldweight(currentfont:BOLDWEIGHT_BOLD);
HSSFCellStyle_setFont(headStyle1:currentFont);
HSSFCellStyle_setAlignment( headStyle1: ALIGN_center);
HSSFCellStyle_setBordertop(headStyle1 :border_thin);
HSSFCellStyle_setBorderleft(headStyle1 :border_thin);
HSSFCellStyle_setBorderright(headStyle1 :border_thin);
HSSFCellStyle_setBorderBottom(headStyle1 :border_thin);

When i look at sheet, only the first cell of the merged cells is bordered...



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.