Сравнение нескольких строк

[konstantin1990]

Почему то перестал работать фильтр на листе Database, не могу понять почему? вроде раньше делал все так же и работало просто еще решил добавить дополнительный столбец "доп информация". Есть идеи?(((

[kuklp]

If Target.Address <> "$w$2" Then Exit Sub

Адрес никогда не будет равен "$w$2". Но вполне может быть равен "$W$2".

[konstantin1990]

Сообщение от kuklp

If Target.Address <> "$w$2" Then Exit Sub

Адрес никогда не будет равен "$w$2". Но вполне может быть равен "$W$2".

Это не что!!! Спасибо!!!

[Hugo121]

Немного сгладить эффект могло

Option Compare Text

[kuklp]

Это целое предложение, а надо она буква Игорь, можно, если быть уверенным, что дальше не понадобится точное совпадение.

[konstantin1990]

With RW
.Clear
.ColumnCount = 8
.ColumnWidths = "70;50;50;50;55;50;50;500"
.ColumnHeads = True
.RowSource = "L2:S13" & CStr(Count + 1)
End With

Вот еще один вопрос как сделать так чтоб rowsource был привязан к конкретному листу? например к листу Database? у меня не получилось "моими" методами. Данный код находится в моем примере форма DataApt

[Hugo121]

            .RowSource = "Database!k2:R13" & CStr(Count + 1)