关于VBA解决方法

fieldset{padding:10px;}

关于VBA大家好,我是VBA的新手,遇到些问题请大家指教。Subtest1()ActiveSheet.Range(“a1:a10”).Font.Bold=TrueDimiAsIntegeri=1DoUntili>10ActiveCell.Value=ii=i+1ActiveCell.Offset(0,1).SelectLoopEndSub如上:有两个问题:1.ActiveSheet.Range(“a1:a10”).Font.Bold=True是要让从a1到a10每个单元格中字体都为黑体,而运行结果只有a1是黑体,其它单元格都不是。2.我同时打开了两个excel,当选定excelworkbook1时,程序不报错。但当我选择excelworkbook2再运行时,程序运行到Cells(1,1).Select会报错。错误码1004,“应用程序定义或对象定义错误”。请问如上两个问题是什么原因呢?谢谢大家——解决方案——————————————————–第一个问题。语句没有错.Range(“a1:a10”).Font.Bold=True绝对没有问题。第二个问题,你开了两个excelworkbook,当你对单元格进行操作时,必须要指定是哪个工作簿的哪个工作表。躲在某一地点,想念一个站在来路,

关于VBA解决方法

相关文章:

你感兴趣的文章:

标签云: