Public Function mystr(s As Variant) As String
mystr = CStr(s)
End Function
XL: автофильтр по последним цифрам числа
V Exele u menya est stolbik kotoriy soderji cifri
kotorie konchayutsya na 2001, 2002, 2003
na primer 12102003,5092003,04022001 ....
kak mne sdelat filtr chtobi ostalis tolko te kotorie konchayutsya na 2003
obichnim filtrom porboval ne poluchaetsya
zaranie spasibo!
kotorie konchayutsya na 2001, 2002, 2003
na primer 12102003,5092003,04022001 ....
kak mne sdelat filtr chtobi ostalis tolko te kotorie konchayutsya na 2003
obichnim filtrom porboval ne poluchaetsya
zaranie spasibo!
Цитата:
Originally posted by MisterFix
V Exele u menya est stolbik kotoriy soderji cifri
kotorie konchayutsya na 2001, 2002, 2003
na primer 12102003,5092003,04022001 ....
kak mne sdelat filtr chtobi ostalis tolko te kotorie konchayutsya na 2003
obichnim filtrom porboval ne poluchaetsya
zaranie spasibo!
V Exele u menya est stolbik kotoriy soderji cifri
kotorie konchayutsya na 2001, 2002, 2003
na primer 12102003,5092003,04022001 ....
kak mne sdelat filtr chtobi ostalis tolko te kotorie konchayutsya na 2003
obichnim filtrom porboval ne poluchaetsya
zaranie spasibo!
Можно разными путями, например так:
1. переведи числа в текстовый формат, а потом уже к ним применяй фильтр - "кончается на" 2001 и т.д.
(чтобы пеевести числа в текстовый формат, просто создай столбец, задай для него текстовый формат и скопируй туда значения твоих ячеек с числами)
ne poluchaetsya
mojet podskajesh kak napisat makros kotoriy delaet eto?
mojet podskajesh kak napisat makros kotoriy delaet eto?
Цитата:
Originally posted by MisterFix
ne poluchaetsya
mojet podskajesh kak napisat makros kotoriy delaet eto?
ne poluchaetsya
mojet podskajesh kak napisat makros kotoriy delaet eto?
Мдаа, действительно не хочет, токо если заранее сделать столбец текстовым и потом уже вручную забивать туда значения, тоды пойдет.
Тогда так, добавь в модуль такую функцию:
Код:
столбец соответственно вычисляй через эту функцию, ну а к ней уже применяй фильтр - у меня заработало.
Цитата:
Originally posted by SergeySV
Мдаа, действительно не хочет, токо если заранее сделать столбец текстовым и потом уже вручную забивать туда значения, тоды пойдет.
Тогда так, добавь в модуль такую функцию:
столбец соответственно вычисляй через эту функцию, ну а к ней уже применяй фильтр - у меня заработало.
Мдаа, действительно не хочет, токо если заранее сделать столбец текстовым и потом уже вручную забивать туда значения, тоды пойдет.
Тогда так, добавь в модуль такую функцию:
Код:
Public Function mystr(s As Variant) As String
mystr = CStr(s)
End Function
mystr = CStr(s)
End Function
столбец соответственно вычисляй через эту функцию, ну а к ней уже применяй фильтр - у меня заработало.
CStr - только в .NET, вроде, поддерживается...
Цитата:
Originally posted by xelos
CStr - только в .NET, вроде, поддерживается...
CStr - только в .NET, вроде, поддерживается...
Слава бога, нет :)
Цитата:
Originally posted by SergeySV
Слава бога, нет :)
Слава бога, нет :)
А ещё можно было столбец с функцией вида
=ОСТАТ(твои_числа;10000), тогда там как раз последние 4 цифры получились бы...
Цитата:
Originally posted by Cutty Sark
А ещё можно было столбец с функцией вида
=ОСТАТ(твои_числа;10000), тогда там как раз последние 4 цифры получились бы...
А ещё можно было столбец с функцией вида
=ОСТАТ(твои_числа;10000), тогда там как раз последние 4 цифры получились бы...
Можно еще добавить столбец, в нем формулу =ПРАВСИМВ(твои_цифры;4), а потом фильтровать этот столбец