Удалить все гиперссылки, картинки из Эксель excel код макроса

Перед любым действием рекомендуется обязательно сделать архивную копию вашего файла, чтобы при необходимость восстановиться с нее, а не создавать файл заново.

1) Удалить все гиперссылки из Эксель excel:
— создать макрос с кодом:
For Each sh In ThisWorkbook.Worksheets
sh.Hyperlinks.Delete
Next
— Выполнить макрос.

2) Удалить все картинки на активном листе из Эксель excel, код макроса:

For Each pic In ActiveSheet.Shapes
If pic.Type = msoPicture Then pic.Delete
Next pic

3) Цикл по ячейкам колонки листа Эксель, пример:
Можно выделить часть текста из ячейки, например удалить пробелы в нужном месте и т.д.
Пример (просто алгоритм, для конкретной реализации подставлять ваши функции):
ncol = 7
For i = 3 To 100
‘cells(i, ncol) = функция(cells(i, ncol))
Next

Где функция — нужная в данный момент операция над ячейкой, например
Left, Mid, Right, Len
Пример:
ncol = 3NumbDelSymFromLeft = 1 ‘сколько удалить слева
NumbDelSymFromRight = 3 ‘сколько удалить справа
For i = 1 To 50
‘Cells(i, ncol) = Right(Cells(i, ncol), Len(Cells(i, ncol)) — NumbDelSymFromLeft)     ‘удаляем СЛЕВА
Cells(i, ncol) = Left(Cells(i, ncol), Len(Cells(i, ncol)) — NumbDelSymFromRight)      ‘удаляем СПРАВА
Next

4) Процент в эксель:
ИЗМЕНЕНИЕ В ПРОЦЕНТАХ (ПРИРОСТ/УМЕНЬШЕНИЕ)
100 * (Новое значение – Старое значение) / Старое значение = Изменение в процентах
100*(B-A)/A = Изменение в процентах