作者：乔山办公网日期：
返回目录：excel表格制作
创建一个新的EXCEL文件
my $workbook = Spreadsheet::WriteExcel->new('test.xls');
# 添加一个工作表
$worksheet = $workbook->add_worksheet();
# 新建一个样式
$format = $workbook->add_format(); # Add a format
$format->set_bold();#设置字体为粗体
$format->set_color('red');#设置单元e79fa5e98193e58685e5aeb9361格前景色为红色
$format->set_align('center');#设置单元格居中
#使用行号及列号，向单元格写入一个格式化和末格式化的字符串
$col = 1;
$row = 2;
$worksheet->write($row, $col, 'Hi Excel!', $format);
$worksheet->write( $col-1, $row-1 , 'Hi Excel!');
$worksheet->write(1, $col, 'Hi Excel!');
#使用单元格名称（例：A1），向单元格中写一个数字。
$worksheet->write('A3', 1.2345);
$worksheet->write('A4', '=SIN(PI()/4)');
exit;
在网上找到了demo代码，需要安装相关的包，在winddows下，
cmd模式，ppm,安装Spreadsheet-WriteExcel包。
PS：如果碰到中文写入时乱码问题，要ppm 安装Unicode_Map包，按照如下方法使用
use Unicode::Map();
my $Map = new Unicode::Map("GB2312");
my $abc='你好！';
$worksheet->write_unicode($LineCount, 1, $Map->to_unicode( $abc));
这样就可以了。
Excel表格缺省情况下每个单元格的属性都是“锁定百”，这时你如果用“工具/保护”（2003版）或“审阅/保护工作表”“审阅/保护工作簿”把表格或工作簿保护起来，度还可以加密码。如此单元格就不能做任何改动了，如果要改动，必须先解除保护，如果有密码知就要输入密码。
可以对表格进行部分锁定道，方法是选择需要变更内容的格子，右键选择单元格格式，在“保护”页把“锁定”复选框清空（如果复选框不是对勾而是个方点，说明选中的区域有部分锁定版、部分未锁定）这时再保护表格就只能修改未锁定的格子，比如需要手工输入的地方解除锁定，权公式部分锁定防止误删除。
锁定时还有些选项可选，看你的需要了。总之，必须保护工作表单元格的锁定才会起作用，否则无论是否锁定，都可以任意修改。
hell是无法对EXCEl文件进行处理的，PERL和抄JAVA则可以利用对应的对象或袭函数对EXCEL文件进行各类操作，当然了，期待知SHeLL能发展这项功能。道 用 perl 的 module 才可读写 MS excel 的 xls 格式, Spreadsheet::WriteExcel Spreadsheet::ParseExcel Wi...
$src_excel->Worksheets(5)->Cells(8,'A')->{Value}="2";
$src_excel->Save;
print "$File::Find::name\n";
$excel_ap->{DisplayAlerts} = 'True'; #恢复提示抄这个之后应该增加关闭进程的百代码，否则会不断的打开许多EXCEL进程，你用进程管理器可以查看。需度要增加的语句可能是：
$src_excel->Close;
$excel_ap->Close; #不知道是否问quit或者exit，这个你答查查资料试试看。