Excel下拉框(200分)

生成表格后，我如何控制一列除标题外全部有下拉框情况，如性别 ： 男 ，女。
还有个引申问题，我能否生成级联下拉框。如第一列 ：国家 第二列 ：省份 第三列：地区。并且不用宏控制

可能是没说清楚吧。竟然都没得回帖滴。郁闷偶死哒
我自己写了个程序，用的是delphi 7。想生成一个EXCEL表格，表格的字段由用户定义生成，这个可以实现。但是，如果用户生成了一个性别字段的话，我想控制，将性别这一列除了标题外，可以实现每个单元用户无需输入“男”“女”，让用户通过下拉框自行选择。
引申的问题是一个极联情况，也是通过DELPHI程序生成，当用户在第一列选择了字段名“国家名”中的“中国”后，第二列字段名“省份”中，会过滤国外的省份，只出现中国的省级行政区，如“湖南”，用户在选择“湖南”后，第三列字段名“城市”中，过滤其他省份的名称，只留下，湖南所辖各县市，如“长沙市”，不用宏进行控制，到底能否实现啊
晕~~~~~~~~~~~~

写了个控制一列成下拉的程序
至于级联....不太会用excel，似乎只能写程序来控制
uses ComObj, Excel97;
var
Excel, workbook,sheet,sel: Variant;
begin
Excel := CreateOleObject( 'Excel.Application' );
workbook:=Excel.WorkBooks.Add;
sheet:=workbook.Sheets.Add;
sheet.columns[1].Select;
sel:=Excel.Selection;
sel.Validation.Delete;
sel.Validation.Add(xlValidateList,xlValidAlertStop,xlBetween, '1,2,3,4');
sel.Validation.IgnoreBlank:= True;
sel.Validation.InCellDropdown:= True;
sel.Validation.IMEMode:= xlIMEModeNoControl;
sel.Validation.ShowInput:= True;
sel.Validation.ShowError:= True;
workbook.SaveAs('d:/test.xls');
workbook.Close;
Excel.quit;
end;

谢谢，不过我主要是想看那个引申的问题如何解决，先分分给你吧