说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

各位兄弟帮忙看一下一小段代码?尽分报答

编辑:说三道四文库 发布时间:2017-12-18 07:42
HTML文档下载 WORD文档下载 PDF文档下载

代码如下:
Private xlApp As Object
Private xlBook As Object
Private xlSheet As Object
Private Sub InitXlAPP()
On Error Resume Next
Set xlApp = GetObject(, "Excel.Application")
  If Err.Number = 429 Then
      Set xlApp = CreateObject("Excel.Application")
      Err.Clear
  End If
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlApp.Worksheets.Add

xlApp.Visible = True
End Sub
Private Sub MakeStyle_XJ()
With xlApp
    '设置整体格式
    .Cells.Select
    
    .Selection.VerticalAlignment = xlCenter/这里出错,提示不能设置类Range的VerticalAlignment属性。

    .Columns("A:A").ColumnWidth = 4.1
    .Columns("B:B").ColumnWidth = 8
    .Columns("C:C").ColumnWidth = 27.7
    .........
End with
End Sub
  
可能是没有选中任何内容,所以Selection为Nothing,建议在调用Selection.VerticalAlignment 前先判断Selection是否为Nothing
[对话CTO]甲骨文熊光樑:全球研发模式开发出接地气产品 GitHub中国游记之长城——跨越那堵看不见的墙 IE11开发人员工具:UI响应工具详解 2013 Linux领域年终盘点 腾讯云俱乐部深圳站成功落幕 开创移动开发新篇章 解读云计算、大数据、物联网等九大IT技术发展趋势 苹果已证实收购Topsy或将涉足社交领域 触摸未来:Tactus微流体技术2014年来袭 Windows的未来:一个核心 多个版本 Github项目中使用率最高的Java/Ruby/JS库 2013中国大数据技术大会盛大开幕 从黑色星期五找到的六个规则 帮助网站转化 移动开发者的自学宝典:十大在线编程学习网站 MIT新技术:远程触摸和操纵实物 创新人机交互 中国移动研究院业务支撑研究所所长孙少陵:大数据实时处理技术发展趋势及中国移动实践和展望 “第一届中国大数据技术创新与创业大赛”主办方发言及创新分赛颁奖 中国移动研究院业务支撑研究所所长孙少陵:大会及与会嘉宾介绍 中国工程院院士、大数据专家委员会主任李国杰:能挖掘出价值的数据就是好数据 阿里飞天平台总架构师唐洪:飞天开放平台 百度大数据首席架构师林仕鼎:新计算时代 金山发布全系列IaaS平台 Google无人驾驶汽车与机器人组合,秒杀无人机 Google欲推新Chrome应用:适用于Android、iOS平台 comScore:美国市场苹果手机独占鳌头 Android和iOS双寡头垄断 一周消息树:新技术实现远程触摸和操纵实物 创新人机交互 研发周报:帮助网站转换的六大黑色星期五规则 【开源专访】JFinal作者詹波:以极简方式实现Web项目的极速开发 2013中国智能交通与大数据技术峰会:迎接交通大数据新时代 大数据应用技术(上):加速创新,重塑世界 英特尔百度携手推出首个跨平台应用商店 12月9日:计算机软件第一夫人Grace Hopper出生 换工作了,散分!!! 大家来看看[CSDN总版主的立法和执法],就会知道为什么水园的执法者如此猖狂了 请用这则给下面这个替换字符 局域网2000系统如何设置计算机描述(50分)? 强答题:请听好题"请问如何在可编辑的列表框中显示你想输入的字符串,而且可以输入多行?",开始! 下面两个操作,哪种效率高一些?或者还有什么更好的方法,谢谢! 简单问题,马上结账 ^在Delphi中是什么操作符? 各们兄台,小弟有急事相求,在线等~~~~~~~~~~~~~~~~~ 关于新闻发布时内容显示的问题 请教Tab Control的使用 microsoft jdbc for sqlserver2000 result 如何将指针移到首位!!在线等急!!! 谁有CVS下载?我去官方网站的下载,根本没有安装文件。 JSP中新建文件夹的问题 关于地图的问题,谁能解决啊? 怎样获取点击或按下winform上 [×]按钮时的事件 在服务器端执行一个 在客户端弹出对话框的程序? 如何不让局域网上的其他机用二级代理上网. oracle 表空间问题 哪位老大知道DBF的格式。 新手想请问关于刚学图象处理先学哪些?即先从哪入手? 请问关于函数挂接的问题 学习中的、已经学好的、准备学习java的朋友来看看 如何在一个线程里创建一个窗体? 难题,,,,(马上结) 怎样使windows service能接受其他程序的调用? ADO+ACCESS问题 十万火急!怎样在ASP.net(C#)中调用OCX对象 如何填充一个封闭的区域 吉林延边发生多起朝鲜警备队员越境抢劫杀人案件 perl有比较好的ide吗????? FilenameFilter用声明吗?? 怎样将两张表中相关数据绑定到DropDownList 请问java 中如何实现大小写不敏感的字符串替换???谢谢 超级头痛:如何找到DataList里的RadioButton? 权限设定时奇怪问题? 200分相送,如何写一个divx的编码过滤器 求一 SQL 语句的写法 高手来看!!!!如何在BCB程序中打开Oracle数据库 在串口通信中怎样解除waitcommevent()的等待 快三十岁了,适合再当程序员么? 小弟急着连数据库,搞不明白怎样连,拜托 怎么得到一个进程的句柄 ADO+ACCESS问题 谁能告诉我windows server 2003的显卡驱动到哪里下载 用DataOutPutStram的writeUTF写文件时开头总出现两个字符的乱码? 关于IMAIL6.0外发邮件问题 是个关于表单的问题? 小问题,在线等 谁能告诉我windows server 2003的显卡驱动到哪里下载 global文件竟然没有,为何???---waiting!!! Direct3D中关于渲染(render)的问题? 我认为有时光机就有共产主义社会, intimidate是什么意思 为什么逆变器空载或短路会烧功率管 自制逆变器空载开机电流大1A多,功率管IRF1010发烫什么原因自制逆变器空载开机电流大1A多,前级驱动没问题功率管IRF1010发烫,频率有五六十HZ开始用的黑白电视机电源变压器不知是何原因场效 三棱锥o-abc三条棱OA-OB-OC两两相互垂直,且有OA=OB=OC=1 M是AB边的中点,则OM与平面ABC所构成的角的大小____(用反三角函数表示)acttan根号2由题意这个三棱锥为正三棱锥,不难得出角OMC就是OM与平面ABC 高中数学问题 数学高手看下面的图 会加辶是什么字? 平面α‖平面β,△ABC,△A1B1C1分别在α、β内,线段AA1、BB1、CC1交于点O,O在α、β之间,若AB=2AC=2,∠BAC=60°,OA:OA1=3:2.求△A1B1C1的面积. 重加辶是什么字 辶加小是什么字 灵、魄、魂有什么区别吗? 普京称苏联共青团不仅是政治还是友谊和联合国证实叙利亚14年来首次出现小儿卜拉希米称叙过渡进程由叙有关各方决定法国宣布4名在尼日尔被绑架法国人获释美国将继续对中日消毒剂进行贸易救济调美政府官员首度为医改网站故障道歉欧盟多瑙河战略年度论坛在罗马尼亚落幕美国得州一男子五地疯狂射杀 致其母在北京“最牛违建”拆除进度缓慢 房主称中央巡视组年底前对军队巡查 在武警设民警枪击米粉店主 传因“不卖奶茶”美国高速两货车相撞引烈火 速冻鸡肉瞬渤海湾“黄金水道”春运开启“只许州官放火 不许百姓点灯”源于避伊春老人来哈急救 两地交警齐力护送谁选2016? 李登辉:蔡赖协调一下魏应充接风宴被曝充斥朱立伦人马轿车先和货车相撞 又刮上出租车轿车猛调头 撞翻环卫车 带倒环卫工 面包车刚停下 蹿出大火苗微面“打滚”撞烂护栏热身赛-巴西外援献世界波 贵州人和2老姑娘的春天来了不落日战纪网游之育兽师奉魔网游之重返荣耀电影少女识宝天堂小区的诡异故事风流司机天元真迹轮之序章军旅人生十里琅珰旅游黄鹤楼公园旅游珠海市博物馆旅游宁海森林温泉旅游泰山公园旅游宝岩生态观光园旅游烈士墓旅游兴坪渔村景区旅游嘻哈包袱铺旅游石门河景区旅游渠洋湖旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘