使用vba生成汇总多个工作簿的多工作表数据透视表SQL命令文本[46楼有更新]

zhang139 · 发表于 2012-8-9 22:22

很佩服vba用的好的人

笨笨哥哥1 · 发表于 2012-8-10 07:23

看到你们很精通，羡慕。我真的不知如何下手

再见大学时代 · 发表于 2012-8-22 09:26

这个主题在工作中很有实用价值

zzdbsl · 发表于 2012-9-13 21:11

老师帮忙看下这是怎么回事，我试了下，显示错误：运行时错误 '9' 下标越界
调试指向： s1 = Split(s, ",")(0)

春晓-Flora · 发表于 2012-9-29 10:45

慢慢学，谢谢

学不完用不尽 · 发表于 2012-9-29 16:05

谢谢老师的分享。

xxxer383 · 发表于 2012-10-19 21:26

谢谢老师的分享。

win2009 · 发表于 2012-10-26 20:41

正在学习，希望能会用，谢谢

win2009 · 发表于 2012-10-26 21:19

能否把文件路径用变量代替，现在代码太长，请版主看看

win2009 · 发表于 2012-10-27 14:07

请问版主，我这个复选框全选全清代码通不过，为什么，模仿你的那个做的
下面是爱歌版主做的加载宏，我想改一下，方便全选列表框里的复选框

汇总-查询-分表-合表.rar (59.87 KB, 下载次数: 30)
Private Sub CheckBox1_Click() '全选CheckBox
With ListBox_Sum
      If CheckBox1.Value Then
         For i = 1 To .ListItems.Count
            .ListItems(i).Checked = True
         Next
      Else
         For i = 1 To .ListItems.Count
            .ListItems(i).Checked = False
         Next
      End If
End With
End Sub

		自动登录	找回密码
密码			免费注册

[原创] 使用vba生成汇总多个工作簿的多工作表数据透视表SQL命令文本[46楼有更新]

点评