Главная » 2014 » Сентябрь » 10
1410330401
Заработали отступы в коде VBA
Просмотры: 2018 / Комментарии: 3

Наконец-то меня осенило, как можно обойти поведение хостинга при сохранении страниц, выпиливающее все символы табуляции, в том числе и в тегах, предназначенных для кода.
Это приводило к такой печальной картине:

Sub Handle_Cells_1(parRange As Range)
For i = 1 To parRange.Count
parRange(i, 5) = parRange(i).Address & " = " & parRange(i) 
Next 
End Sub
и до меня только что дошло, как сделать так:
 
Sub Handle_Cells_1(parRange As Range) 
  For i = 1 To parRange.Count 
    parRange(i, 5) = parRange(i).Address & " = " & parRange(i) 
  Next 
End Sub 
Я просто заменяю символы табуляции в коде на нужное мне количество неразрывных пробелов HTML. Так просто, но почему-то раньше мне это в голову не приходило...