用jxl如何实现在已有的excel表中添加数据
2个回答
展开全部
工具-宏中的VB编辑器，插入－模块。复制下列程序
Sub test()
Dim r As Range
For Each r In ActiveSheet.UsedRange
r = "jxl" & r
Next
End Sub
关闭VB编辑器，在任一需要加单引号的工作表上，点工具-宏，找到test,点执行即可。
Sub test()
Dim r As Range
For Each r In ActiveSheet.UsedRange
r = "jxl" & r
Next
End Sub
关闭VB编辑器，在任一需要加单引号的工作表上，点工具-宏，找到test,点执行即可。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
直接输入
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
