У меня есть лист с набором строк, извлеченных из текста, хранящегося в различных ячейках, и мне нужно удалить последний символ из каждой из этих строк, если это запятая или точка.
У меня естьпытался перебрать ячейки и использовать функцию Right, чтобы проверить, является ли последний символ точкой или запятой, но это вызывает ошибку: «Ошибка компиляции: ожидаемый массив».
Dim i As Integer, j As Integer
Dim cellValue As String
Dim wsFiltro2 As Worksheet
Set wsFiltro2 = Worksheets("SegundoFiltro")
For j = 1 To 10
For i = 1 To 33
cellValue = wsFiltro2.Cells(j, i).Value
If right(cellValue, 1) = "," Or right(cellValue, 1) = "." Then
wsFiltro2.Cells(j, i).Value = left(cellValue, Len(cellValue) - 1)
End If
Next i
Next j
РЕДАКТИРОВАТЬУ меня изначально был этот цикл внутри другого Sub, который сначала записывал эти строки на лист.Когда я проверял это в новом Sub после записи значений, он работал нормально ... Тем не менее, не понимаю, почему он не работал внутри другого Sub, хотя