关于vb控制excel问题
excelXLS = CreateObject("Excel.Application")
excelWK = excelXLS.Workbooks.Open(strFieldName)
// j = 0
excelWS = excelWK.Worksheets(j + 1) //选中sheet1 excelWK.Sheets.Add()
excelWK.Sheets("Sheet1").Select()
excelWS.Range("A1:Y10").Select()
excelWS.Range("A1:Y10").Copy()
excelWK.Sheets("Sheet" & (j + 2)).Select()
excelWK.ActiveSheet.Paste()
excelWS = excelWK.Worksheets(j + 2)
excelWS.Cells.Select()
'excelWS.Selection.ColumnWidth = 5
excelWS.Cells.ColumnWidth = 5
excelWS = excelWK.Worksheets(j + 1)
流程是 在sheet1后面新加一个sheet 然后复制sheet1的 A1:Y10 粘贴到sheet2 然后全选sheet2 把列宽改成5 我在excelWS.Cells.Select()
这里报错 说类range 的select无效,求各位帮忙看看
excelWK = excelXLS.Workbooks.Open(strFieldName)
// j = 0
excelWS = excelWK.Worksheets(j + 1) //选中sheet1 excelWK.Sheets.Add()
excelWK.Sheets("Sheet1").Select()
excelWS.Range("A1:Y10").Select()
excelWS.Range("A1:Y10").Copy()
excelWK.Sheets("Sheet" & (j + 2)).Select()
excelWK.ActiveSheet.Paste()
excelWS = excelWK.Worksheets(j + 2)
excelWS.Cells.Select()
'excelWS.Selection.ColumnWidth = 5
excelWS.Cells.ColumnWidth = 5
excelWS = excelWK.Worksheets(j + 1)
流程是 在sheet1后面新加一个sheet 然后复制sheet1的 A1:Y10 粘贴到sheet2 然后全选sheet2 把列宽改成5 我在excelWS.Cells.Select()
这里报错 说类range 的select无效,求各位帮忙看看
...全文
相关推荐
VB控制Excel的代码
描述中提到,VB程序员经常遇到的问题是报表格式更改需要修改程序,这增加了维护工作的复杂性。
掌握Interop.Office365.Excel:编程接口控制Excel实战
Interop.Office365.Excel是Microsoft提供的一个库,允许开发者利用.NET应用程序直接与Excel交互。它主要用于创建、修改以及自动化Excel文件,广泛应用于数据管理、报告生成以及数据分析等方面。
VB全面控制EXCEL
标题“VB全面控制EXCEL”指的是使用Visual Basic (VB)编程语言来操作和自动化Microsoft Excel应用程序。
实现VB对Excel的控制
本教程将深入探讨如何利用VB来实现对Excel的高级控制,包括读取、写入数据以及获取Excel工作表的记录数。
用VB控制EXCEL生成最复杂报表
"用VB控制EXCEL生成最复杂报表"本文主要介绍利用 VB 来生成复杂的报表,特别是使用 Excel 对象来生成报表。下面是相关的知识点:1.


