Как запустить функцию VBA в фоновом режиме? - PullRequest
0 голосов
/ 15 ноября 2018

У меня есть функция VBA, которая отлично работает в Excel. Но я бы хотел запустить функцию из другого макроса и запустить марко в фоновом режиме ...

Функция stripHTML:

Public Function StripHTML(ActiveCell As Range) As String
Dim RegEx As Object
Set RegEx = CreateObject("vbscript.regexp")
Dim sInput As String
Dim sOut As String
sInput = ActiveCell.Text

sInput = Replace(sInput, "\x0D\x0A", Chr(10))
sInput = Replace(sInput, "\x00", Chr(10))
and a lot more replaces....

With RegEx
.Global = True
.IgnoreCase = True
.MultiLine = True

End With
sOut = RegEx.Replace(sInput, "")
StripHTML = sOut
Set RegEx = Nothing

End Function

Марко, который вызывает функцию:

Sub actual()
Call Module3.StripHTML(ActiveCell)
Range("C2").Select
ActiveCell.Formula = "=IFERROR(StripHTML(tablename[@[column *]]),"""")"
End Sub

Теперь, когда я использую формулу StripHTML в Excel, когда рабочая книга открыта, функция работает отлично. Но когда я использую макрос, функция не работает ... Есть идеи?

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