我有一个excel文档,它使用超链接从许多其他excel文件中提取数据。某些客户将其数据输入模板文件,我的文件通过超链接自动提取数据。例如
=' HTTP:// 超级链接 [文件名 .XLSM]数据' E50
现在不是每个人都填写所有字段我正在尝试编写一个宏,该宏将遍历文档并查找不包含数据的单元格或查找超链接未返回要清除和替换的值的单元格不适用。
Private Sub CommandButton21_Click()
Dim rng As Range, cell As Range
Set rng = Range("E47:H234")
For Each cell In rng
If (IsEmpty(cell)) Then
cell.Value = "N/A"
End If
Next cell
End Sub