Foxtable(狐表)用户栏目专家坐堂 → VBA代码如何转狐表?


  共有576人关注过本帖树形打印复制链接

主题:VBA代码如何转狐表?

帅哥哟,离线,有人找我吗?
lgz518
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1271 积分:8670 威望:0 精华:0 注册:2019/6/13 9:57:00
VBA代码如何转狐表?  发帖心情 Post By:2024/11/4 10:38:00 [显示全部帖子]

''Sub A_Click()
''Sub combine()
'Application.ScreenUpdating = False
'For j = 1 To Sheets.Count
'If Sheets(j).Name <> ActiveSheet.Name Then
'x = Range("A").End(xlUp).Row + 1
'Sheets(j).UsedRange.Copy Cells(x, 1)
'End If
'Next
'Range("3").Select
'Application.ScreenUpdating = True

'End Sub
''End Sub

 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1271 积分:8670 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2024/11/4 11:22:00 [显示全部帖子]

不太理解
VBA代码转狐表,有没有一些较常用格式
比如VBA代码格式是
''Sub A_Click()
''Sub combine()

是说VBA代码转狐表只改哪些部分?哪些部分是可以直接抄?

 回到顶部