С Новым годом! Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/4: Рейтинг темы: голосов - 4, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 29.11.2010
Сообщений: 42
1

Поиск 916222 в значениях вида 916000-916999, 917500-917599 ???

05.12.2010, 17:18. Показов 801. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Как наиболее правельнее решить такую задачу:
Есть база, в столбце А название операторов:
ОАО 'Мобильные ТелеСистемы'
В столбце B, в каждой ячейке, напротив названия оператора (столбец А) - коды,записанные столь оригинальном образом:
910000-910099, 910400-910499, 916000-916999, 917500-917599
В следующей ячейке, например:
ЗАО 'ПримТелефон' (столбец А) 914750-914769 (столбец B)
и так далее.

У нас есть, например, код 916222. Как сделать так, чтобы был найден оператор, соответствующий этому коду:

916222 ОАО 'Мобильные ТелеСистемы'
0
IT_Exp
Эксперт
8794 / 1073 / 104
Регистрация: 17.06.2006
Сообщений: 12,602
Блог
05.12.2010, 17:18
Ответы с готовыми решениями:

Построить три вида фигуры. На месте вида спереди и вида слева совместить часть вида с частью разреза

Построить три вида фигуры. На месте вида спереди и вида слева совместить часть вида с частью разреза - AutoCAD
Меня уже совсем выносит. Правильно ли я делаю?.. Не могу представить нормально вид слева. Что делаю...

Поиск совпадений в значениях массива
$array = ; $search = 'v2'; print_r $values; Как сделать так, что б в, к примеру, массиве...

Вывести на дисплей сообщения о значениях функции при различных значениях аргумента
Добрый вечер.Помогите пожалуйста разработать программу, которая выводит на экран дисплея сообщение...

2
Silver
05.12.2010, 17:45 2
SQL
1
2
3
SELECT A,B
FROM   TABLE
WHERE  '916222' BETWEEN LEFT(B,6) AND RIGHT(B,6)
14 / 14 / 2
Регистрация: 23.03.2010
Сообщений: 635
05.12.2010, 19:59 3
Как сделать запрос, выбирая в кач-ве источника данных книгу Excel, я представляю весьма смутно,
хотя в твоём случае, думаю, это оптимальный (правИльный) вариант (см. ответ выше)
Вот одно из альтернативных решений задачи
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Function FindOperator(OperCode As Long) As String
Dim astrCode() As String, lngRow  As Long
For lngRow = 2 To Cells(1, 2).CurrentRegion.Rows.Count
    astrCode = Split(ThisWorkbook.Sheets(1).Cells(lngRow, 2), '-')
    If OperCode > CLng(astrCode(0)) And OperCode < CLng(astrCode(1)) Then _
        FindOperator = Cells(lngRow, 1): Exit Function
    Erase astrCode
Next lngRow
End Function
Sub test()
Dim lngFind As Long
lngFind = InputBox('', '')
MsgBox FindOperator(lngFind)
End Sub
0
05.12.2010, 19:59
BasicMan
Эксперт
19315 / 2622 / 84
Регистрация: 17.02.2009
Сообщений: 10,364
Блог
05.12.2010, 19:59
Помогаю со студенческими работами здесь

Вывести на дисплей сообщения о значениях функции при различных значениях аргумента
Разработать программу, которая выводит на экран дисплея сообщения о значениях функции при различных...

Вывести на экран дисплея сообщения о значениях функции при различных значениях аргумента
помогите пожалуйста.. Разработать программу, которая выводит на экран дисплея сообщения о...

Поиск минимального элемента в массиве, который не меньше N, функция не работает при некоторых значениях
Функция должна находить минимальный элемент в массиве, который больше N. Допустим массив 6, 8, 3,...

Поиск по данным разного вида
Пытаюсь сделать многофакторный поиск на форме через макрос, который ищет по интервалу (стоимость и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Блоги программистов
Обновление сайта www.historian.b­y
Reglage 05.01.2025
Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .
Как использовать GraphQL в C# с HotChocolate
Programming 05.01.2025
GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .
Модель полного двоичного суматора с помощью логических операций (python)
AlexSky-coder 04.01.2025
def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()
Это мы не проходили, это нам не задавали...(аси­хронный счётчик с управляющим сигналом задержки).
Hrethgir 04.01.2025
Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .
Руководство по созданию бота для Телеграм на Python
IT_Exp 04.01.2025
Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .
Применение компонентов PrimeVue в Vue.js 3 на TypeScript
BasicMan 04.01.2025
Введение в PrimeVue и настройка окружения PrimeVue представляет собой мощную библиотеку компонентов пользовательского интерфейса для Vue. js 3, которая предоставляет разработчикам богатый набор. . .
Как стать Senior developer
cpp_developer 04.01.2025
В современной индустрии разработки программного обеспечения позиция Senior Developer представляет собой не просто следующую ступень карьерной лестницы, а качественно новый уровень профессионального. . .
Что известно о дате выхода Windows 12 и чего от нее ждать
IT_Exp 04.01.2025
В мире технологий постоянно происходят изменения, и операционные системы не являются исключением. Windows 11, выпущенная в октябре 2021 года, принесла множество инноваций и улучшений, но. . .
Что новенького в .NET Core 9
Programming 04.01.2025
Обзор ключевых изменений в . NET Core 9 Платформа . NET Core продолжает активно развиваться, и версия 9 представляет собой значительный шаг вперед в эволюции этой технологии. Новый релиз. . .
Инструкция по установке python3.13.1 в Debian 12
AlexSky-coder 03.01.2025
sudo apt update sudo apt install build-essential zlib1g-dev libncurses5-dev libgdbm-dev libnss3-dev libssl-dev libreadline-dev libffi-dev wget. . .
Затестил триггеры. архив проекта прилагаю с GOA файлами в настройках архиватора проектов.
Hrethgir 03.01.2025
В этот раз нет закольцованности, потому что от неё только глюки, как я понял, логика не вырезанная. Триггеры очень быстрые если верить измерениям с помощью анализатора от Gowin. Есть ещё регистры,. . .
Python в помощь DevOps
IT_Exp 03.01.2025
Причины использования Python в работе DevOps Python стал неотъемлемой частью мира DevOps, и это не случайно. Этот язык программирования обладает множеством преимуществ, которые делают его. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru