Office及VBA技术交流

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 1473|回复: 0

[分享]excel vba如何自动添加筛选

[复制链接]

该用户从未签到

55

主题

83

帖子

259

积分

中级会员

Rank: 3Rank: 3

积分
259
发表于 2015-12-17 16:32:19 | 显示全部楼层 |阅读模式
Sub AutoFill(sht As Worksheet, formularRange As String, wholeRange As String)
    With sht
        .Range(formularRange).AutoFill Destination:=.Range(wholeRange), Type:=xlFillDefault
    End With
End Sub
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|Office Master ( 蜀ICP备16003423号 )

GMT+8, 2019-7-18 12:53 , Processed in 0.303200 second(s), 24 queries .

Office Master

快速回复 返回顶部 返回列表