Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти  
Форумы "Планета Excel" » Пользователи » V
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 151 След.
Определение названия той фигуры, по которой щелкнули
 
#
20 Мар 2019 08:21:09
Код
Sub Name_Shape()
Dim sShName As String
sShName = Application.Caller
MsgBox sShName
End Sub
 
Перейти    
Разбить текст из одной ячейки на несколько по условию
 
#
19 Мар 2019 14:16:19
для ИНН
Код
=ЛЕВСИМВ(ПСТР(A1;ПОИСК("ИНН: ";A1)+5;99);ПОИСК(",";ПСТР(A1;ПОИСК("ИНН: ";A1)+5;99))-1)
если длинна всегда 10 символов то можно так
=ЛЕВСИМВ(ПСТР(A1;ПОИСК("ИНН: ";A1)+5;99);10)

для огрн, кпп по аналогии
 
Перейти    
Обработчик текста в выделенных ячейках
 
#
19 Мар 2019 11:23:39
на много проще через регулярные выражения сделать (цикла не будет), но я с ними на ВЫ. :)
Изменено: V - 19 Мар 2019 11:24:23
 
Перейти    
Обработчик текста в выделенных ячейках
 
#
19 Мар 2019 11:21:11
по второму вопросу, вариант
Код
If UserForm1.symbols And InStr(1, "[*/,.~!@#$%^&(){}\¹;:?-=+']", s) Then s = ""
 
Перейти    
Обработчик текста в выделенных ячейках
 
#
19 Мар 2019 11:07:54
Цитата
borro написал:
почему при выбранной во всплывающей форме галке "Удалить буквы..." удаляются и пробелы
ексель воспринимает значение как число, а у числа нет пробелов.
поставте формат ячеек текстовый и пробелы останутся.
Изменено: V - 19 Мар 2019 11:10:24
 
Перейти    
Разбить текст на строки указанной длины без разрыва слов
 
#
19 Мар 2019 08:57:48
подправил
Код
=СЖПРОБЕЛЫ(ПСТР($A$1;СУММПРОИЗВ(ДЛСТР($A$6:A6))+СТРОКА(A1);ЕСЛИ(ДЛСТР($A$1)-СУММПРОИЗВ(ДЛСТР($A$6:A6))-СТРОКА(A1)<=69;69;ПРОСМОТР(999;ПОИСК(" ";ПСТР($A$1;СУММПРОИЗВ(ДЛСТР($A$6:A6))+СТРОКА(A1);70);СТРОКА($1:$999))))))
 
Перейти    
Разбить текст на строки указанной длины без разрыва слов
 
#
19 Мар 2019 08:17:58
Код
=ПСТР($A$1;СУММПРОИЗВ(ДЛСТР($A$6:A6))+1;ПРОСМОТР(999;ПОИСК(" ";ПСТР($A$1;СУММПРОИЗВ(ДЛСТР($A$6:A6))+1;69);СТРОКА($1:$999)))-1)

не до конца работает, в последней косяк. :(
Изменено: V - 19 Мар 2019 08:20:40
 
Перейти    
Максимальное в диапозоне с несколькими условиями
 
#
18 Мар 2019 15:17:33
Апельсины  - Январь почему не стоит ничего?
 
Перейти    
Atan. Поиск угла между (0;х) и гипотенузой треугольника
 
#
16 Мар 2019 10:58:32
интересно при х=40, y=40 какой должен быть ответ. 45 или 315
Изменено: V - 16 Мар 2019 11:08:27
 
Перейти    
добавление к дате одной цифры, добавление к дате одной цифры
 
#
14 Мар 2019 18:54:33
вместо K1;".";L1;".";M1 пропишите ТЕКСТ(расход!C4;"ДД.ММ.ГГГГ"). если вы об этом.
 
Перейти    
Суммирование текстовых ячеек до определенного момента, повторение цикла
 
#
13 Мар 2019 10:32:23
Цитата
Skachko написал:
Правила форума я читал.
про файл пример xls по ходу не прочли.
 
Перейти    
Подсчет количества элементов по параметру
 
#
13 Мар 2019 10:30:16
Код
=ЕСЛИ(E8>=9;МАКС($B$7:B7)+1;"")
Изменено: V - 13 Мар 2019 10:30:34
 
Перейти    
Суммирование текстовых ячеек до определенного момента, повторение цикла
 
#
13 Мар 2019 09:48:39
для полного ответа прочитайте ПРАВИЛА форума.
 
Перейти    
[ Закрыто] Нужна помощь в оптимизации кода
 
#
12 Мар 2019 15:49:28
12 сообщений, а правила так и не прочитали?
 
Перейти    
как обойти ошибку #Н/Д
 
#
12 Мар 2019 15:46:11
Цитата
Aprelskaya написал:
не прошел файл не знаю почему.
как вариант размер большой.
ЕСЛИОШИБКА работает в 2007 и выше, если что.
Изменено: V - 12 Мар 2019 15:46:54
 
Перейти    
как обойти ошибку #Н/Д
 
#
12 Мар 2019 15:19:17
файла не вижу.
=ЕСЛИОШИБКА(формула;"") подойдет?
 
Перейти    
Перенос строки по определенному условию
 
#
12 Мар 2019 10:58:01
например так - разнести данные ячейки по строкам
естественно полного совпадения наврятли найдете, придется подпиливать под себя.
Изменено: V - 12 Мар 2019 10:59:10
 
Перейти    
Перенос строки по определенному условию
 
#
12 Мар 2019 09:59:40
можно. макросом. поищите по форуму, было уже.
 
Перейти    
Переход в макросе на строку ниже
 
#
11 Мар 2019 18:09:52
скорее так
Код
Set d = Cells.Find(What:=Date, After:=ActiveCell, LookIn:=xlFormulas, _
       LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
       MatchCase:=False, SearchFormat:=False)
 If Not d Is Nothing Then d.Offset (1).Paste
 
Перейти    
Как задать массив в ИНДЕКС начиная с ячейки, определяемой формулой ?, Как задать массив через формулу?
 
#
11 Мар 2019 15:33:57
вариант
п.с. смотрим диспетчер имен (ctrl+F3)
Изменено: V - 11 Мар 2019 15:34:37
 
Перейти    
Подсчитать количество работаюших на полную ставку
 
#
7 Мар 2019 15:53:36
Dark1589, так про *1 и не понял.
 
Перейти    
Условное форматирование., Столбцы с данными в разных книгах
 
#
7 Мар 2019 15:50:35
правила изучаем.
 
Перейти    
Формула ВПР в VBA - где ошибка в коде?
 
#
6 Мар 2019 13:16:35
а почему она должна работать? VBA формула так не пишется. Для VBA fStr = WorksheetFunction.VLookup(тут разбирайтесь)
 
Перейти    
Как остаток от деления округлить до целого в большую сторону?
 
#
4 Мар 2019 11:14:00
Цитата
Жирный Тони написал:
Не подходит. На значении 10 выдаёт ноль.
странно, у меня 1 выдало
Изменено: V - 4 Мар 2019 11:17:19
 
Перейти    
Макрос для монтекарло симуляции
 
#
28 Фев 2019 09:42:06
Код
 Range("MC_EURJPY").Select

у вас нет такого.

П.С. Select-ы почистите.
Код
Sheets("Rates").Select
    Range("USDRUB_Link").Select
    Selection.Copy
можно записать так
Sheets("Rates").Range("USDRUB_Link").Copy
Изменено: V - 28 Фев 2019 09:45:10
 
Перейти    
Суммирование по нескольким условиям в разных диапазонах
 
#
28 Фев 2019 09:32:57
добавим универсальности для растягивания формулы и по столбцам.. :)
Код
=СУММПРОИЗВ((ИНДЕКС($D$11:$J$14;ПОИСКПОЗ($B27;$B$11:$B$14;);)>0)*ИНДЕКС($D$6:$J$9;ПОИСКПОЗ(D$26;$B$6:$B$9;);))
Изменено: V - 28 Фев 2019 09:33:43
 
Перейти    
Макрос для монтекарло симуляции
 
#
28 Фев 2019 08:56:10
Код
Call Calculation
???
 
Перейти    
Скрыть строки, чтобы числа меньше нуля остались на листе
 
#
27 Фев 2019 16:23:31
Фильтр не подходит?
 
Перейти    
Выбор значений из списка
 
#
27 Фев 2019 16:19:05
Код
=ВПР(D2&"*";$A$2:$B$4;2;)
 
Перейти    
Чередование цвета заливки, Чередование цвета заливки строк в зависимости от изменения значения в первом столбце.
 
#
27 Фев 2019 13:44:04
Это смотрели?
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 151 След.
Наверх