Автофильтр Excel в VB.NET

В моем приложении я экспортирую файл Excel, получая макет HTML-страницы. Итак, в моем отделенном коде я изменяю макет HTML и вставляю в него элементы, как если бы это была веб-страница. Делая это таким образом, мне не нужно использовать какую-либо внешнюю библиотеку, и, поскольку данные, которые я экспортирую, представляют собой просто таблицу, мне не нужно ничего сложного для их обработки. Мой вопрос: есть ли способ создать автофильтр, просто изменив теги HTML? Я имею в виду, например, если поставить ‹ b>Имя столбца в HTML, при экспорте в Excel оно станет жирным, можно ли сделать то же самое с автофильтром?


person Fabri    schedule 13.11.2009    source источник


Ответы (1)


Такой макрос может вам помочь. Извините за форматирование.

Sub HTMLConvert()

Dim X As Integer
Dim Y As Integer

'Make your range of rows here
For X = 1 To 50

'Make your range of columns here
For Y = 1 To 10

'Each tag that you want to look for needs one of these if statements
If InStr(1, Cells(X, 1), "<b>") > 0 Then

'Keep in mind this solution will only bold the whole cell, not part of one.

Cells(X, 1).Font.Bold = True
Cells(X, 1) = Replace(Cells(X, 1), "<b>", "")

'If you have a closing tag, like </b>, make sure you clear it too

End If

Next

Next

End Sub
person NoAlias    schedule 22.05.2010
comment
Имейте в виду, что этот макрос представляет собой макрос VBA, который будет использоваться внутри Excel после того, как вы импортируете текст. - person NoAlias; 22.05.2010