# setZeroByVba

**Repository Path**: bufubaoni/set-zero-by-vba

## Basic Information

- **Project Name**: setZeroByVba
- **Description**: No description available
- **Primary Language**: Unknown
- **License**: Not specified
- **Default Branch**: master
- **Homepage**: None
- **GVP Project**: No

## Statistics

- **Stars**: 0
- **Forks**: 0
- **Created**: 2021-05-20
- **Last Updated**: 2021-05-20

## Categories & Tags

**Categories**: Uncategorized

**Tags**: None

## README

# 批量设置excel文件所有sheet不显示0值

## 函数说明
1. `subWalkPath` 遍历文件夹及其子文件，并获取所有子文件
2. `getSubFile` 封装`subWalkPath`, 返回所有文件
3. `setZero` 设置当前文件得所有`sheet`不显示0值
4. `isExcel` 是否是excel

## vba语法
### 调用过程函数
```vb
Function getSubFile(path) As Object
    Dim files As Object
    Set files = CreateObject("System.Collections.ArrayList")
    subWalkPath path, files ' 调用过程函数，不能使用括号，应该直接空格 第一个参数，第二个参数
    set getSubFile = files ' vb 使用 函数名作为返回值，如果是简单类型的返回值 直接等于即可，如果是object则需要试用他 set关键字
End Function
```

### sub和function区别
1. `sub`不能有返回值,`function`可以有返回值
2. `sub`可以直接执行,`function`需要调用才能执行