宋永健 2004-12-3 13:56
我写宏遇到问题,请帮我改一下!
void Macro2()
3tM`nv;b
{
Z+@u0N0q+W,A-K
/**
W)YmQT;s
*录制宏 日期:2004-12-2 作者:宋永健
YV!@*?4n+[o
*/
1Sr(zwi
Worksheet sheet = Application.getWorkbooks().getActiveWorkbook().getWorksheets().getActiveWorksheet();%~tQ/PRI&u6I#g
Cell cell = sheet.getActiveCell();'C|aJ7K/\e
int row = cell.getRow();@$p4d8`o.N$}
int column = cell.getColumn();n$E.[OsC1q
sheet.select(1,column,row,column);o:axGQR8VJ[
/**
B0Uz1hv\1T2D
*选择以上单元格/e-y0r7X3u;v
*/
^:m1T|7Ku@
ActiveRange.setBorderStyle(BorderAndShadingConstants.BOTTOM_BORDER);
M8c;E.]4xz
ActiveRange.setFontBold(true); k!v/F yhZ1KY"aLC
ActiveRange.setHorizonalAlignmentCenter();X
c
@KI;c\n:e
ActiveRange.setFontName("华文楷体");
D-x[AeU2k)`Tp
ActiveRange.setFontSize(72.0);R
z%MH@C
.\\*Q/WOb
)R gWZwj]
Range range = sheet.getActiveRange();
DDDk N8Q|
int startRow= range.getStartRow();
(i f/VPmp$@pm}G
int startColumn = range.getStartColumn();]Yyp zpm9_T
int endRow = range.getEndRow();#gk"~W%J0bUa-I-\z~
int endColumn = range.getEndColumn();S0U4zC/nx/p
7q0_O:^ T6U*[^)q
Rb'A!k6A*u
j!pi2Q
]*Bj CZ)E!A
QZ1XY;^
.In
Iz1I0u;LL
ActiveWorksheet.select(startRow:endRow);
%K9djz]vC&F*q
ActiveRows.setRowHeight(9.39);K)a
a!A'M&a,tO
ActiveWorksheet.select(startColumn:startColumn+1);z` X9b~
ActiveColumns.setColumnWidth(20.00);
*}KT0[&S
L!ogi
J,JN y
q-g$iS#oLN
上面加颜色的地方怎么改才对呢?我是菜鸟,请高手指教