Могу ли я сказать Excel VBA для поиска предложения в моем коде? - PullRequest
0 голосов
/ 09 марта 2019

Я допустил ошибку с моим кодом, и вместо .FormulaR1C1 = "" я написал .Value = 0.Я много писал в коде об ошибке и хочу ее исправить.Есть ли способ сказать Excel, что где бы он ни находил комбинацию .value = 0, чтобы изменить ее на .FormulaR1C1 = ""?end, если нет, есть ли способ поиска комбинации .value = 0, чтобы я мог вручную изменить ее?

1 Ответ

0 голосов
/ 09 марта 2019

Йони, как они сказали выше, вы заменяете 0 пустой строкой ...

Sub AdjustZeroCells()

Dim ws As Worksheet
Dim cell As Range

'sets worksheet variable
Set ws = ThisWorkbook.Worksheets("Sheet1")

'only loops through cells with formulas
For Each cell In ws.UsedRange.SpecialCells(xlCellTypeFormulas)
    If cell.Value = 0 Then: cell.Value = ""
Next cell

'cleanup
Set cell = Nothing: Set ws = Nothing

End Sub

Дэнни, ExcelVBADude

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...