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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 146 След.
Как Excel возводит в степень отрицательное число?
 
#
19 Окт 2018 14:27:45
Александр,  никто ни на кого не нападал.
П. С. Если калькулятор (или другая прога) считает не так как эксель, это не значит что эксель не правильный, а скорее что автор который писал код калькулятора не учел все правила математики.
 
Перейти    
Как Excel возводит в степень отрицательное число?
 
#
19 Окт 2018 14:02:15
БМВ, а еще раньше придумали скобки. ;)
Код
=3-(-(2^2)+1)
 
Перейти    
Как Excel возводит в степень отрицательное число?
 
#
19 Окт 2018 13:58:16
Александр, у вас неправильный калькулятор. :)
 
Перейти    
Как Excel возводит в степень отрицательное число?
 
#
19 Окт 2018 13:12:54
Цитата
"=0-2^2" дает результат -4
все првильно.
математику учили? какое первое действие?
кирпичом тому кто не учил. :)
Изменено: V - 19 Окт 2018 13:14:34
 
Перейти    
Удалить левую часть текста после первого числа
 
#
17 Окт 2018 08:39:54
alex1210,  Андрей VG имел ввиду что формула изначально не может ничего удалить это не макрос, она может только что то показать на основании чего то. :)
Изменено: V - 17 Окт 2018 08:41:27
 
Перейти    
Копировать формулу, не изменяя ссылку
 
#
15 Окт 2018 10:51:10
Цитата
fixic написал:
и получается не =D3*B14, а =D4*B14
так и должно быть. Читайте про относительные и абсолютные ссылки.
 
Перейти    
Удаление всех символов до перовой буквы, Как удалить разное количество символов и разный тип символов до первой буквы
 
#
15 Окт 2018 10:49:52
вариант, массивная
Код
=ПСТР(A1;ПОИСКПОЗ(1;--(КОДСИМВ(ПСТР(A1;СТРОКА(1:99);1))>=192););99)
 
Перейти    
ComboBox выбор значений из списка соответствующих вводу
 
#
9 Окт 2018 17:08:32
Цитата
Artmasterpro написал:
но что-то не идет.
файл бы помог понять что не идет.
 
Перейти    
Формула INDIRECT (ДВССЫЛ) не работает... Почему?
 
#
9 Окт 2018 09:39:52
Шахин, к сведению ДВССЫЛ не лучший вариант.
вариант :)
формула для второго списка
Код
=ИНДЕКС($A$3:$B$4;;ПОИСКПОЗ($E$3;$A$2:$B$2;))
Изменено: V - 9 Окт 2018 09:42:35
 
Перейти    
Формула INDIRECT (ДВССЫЛ) не работает... Почему?
 
#
9 Окт 2018 09:33:59
ctrl+F3 там не списков, а должны быть.
 
Перейти    
Сравнение ячеек в столбце одного листа с ячейками столбца в другом листе, несовпадение выделить красным, Сравнить ячейки столбца, столбцы А и B на разных листах.
 
#
8 Окт 2018 16:06:48
в посте #9 вам давно об этом показали.
 
Перейти    
Сравнение ячеек в столбце одного листа с ячейками столбца в другом листе, несовпадение выделить красным, Сравнить ячейки столбца, столбцы А и B на разных листах.
 
#
8 Окт 2018 14:20:32
Код
For j = 3 To iLastRow
    For i = 2 To iLastRow1
        If Sheets("Sheet1").Range("G" & j) = Sheets("Êàòåãîðèÿ ÊÅ").Range("A" & i) Then n = 1: Exit For
    Next i
    Sheets("Sheet1").Range("G" & j).Interior.Color = IIf(n, vbYellow, vbRed)
    n = 0
Next j
 
Перейти    
Сравнение ячеек в столбце одного листа с ячейками столбца в другом листе, несовпадение выделить красным, Сравнить ячейки столбца, столбцы А и B на разных листах.
 
#
8 Окт 2018 13:47:37
Повторюсь. Файл показываем.
 
Перейти    
Сравнение ячеек в столбце одного листа с ячейками столбца в другом листе, несовпадение выделить красным, Сравнить ячейки столбца, столбцы А и B на разных листах.
 
#
8 Окт 2018 13:38:34
Цитата
Джек Восмеркин написал:
В листе Sheet1 надо перебрать ячейки столбца А, проверить каждую ячейку этого столбца на соответствие в листе "Категория КЕ" столбца G(G2:G100).
здесь все наоборот
If Sheets("Sheet1").Range("G" & j) = Sheets("Категория КЕ").Range("A" & i)
 
Перейти    
Сравнение ячеек в столбце одного листа с ячейками столбца в другом листе, несовпадение выделить красным, Сравнить ячейки столбца, столбцы А и B на разных листах.
 
#
8 Окт 2018 13:33:19
и что не так? что не получилось то?
по описанию закрашивать на главном листе в коде красите на вспомогательно. как всетаки нужно?
да и файл не помешает.
Изменено: V - 8 Окт 2018 13:35:10
 
Перейти    
таблица с автоскрываемыми строками
 
#
5 Окт 2018 16:05:43
вообще то для скрытия нужно  EntireRow.Hidden = True
да перед скрытием желательно все открыть сначала.
08 и 09 так не пишутся строки 8 и 9.
 
Перейти    
Отчетная дата месяца в формуле в виде текста., Добрый день, необходимо чтобы в тексте обновлялась дата.
 
#
1 Окт 2018 09:40:16
все равно не понятно. а после завтра откроете что будет? опять 01.10.2018
 
Перейти    
Отчетная дата месяца в формуле в виде текста., Добрый день, необходимо чтобы в тексте обновлялась дата.
 
#
1 Окт 2018 09:33:51
Код
="Факт "&ТЕКСТ(СЕГОДНЯ();"ДД.ММ.ГГГГ")&" (Капитал)"
 
Перейти    
Excel не видит числа, вместо суммы - количество
 
#
1 Окт 2018 09:30:04
обратите внимание на ссылку в посте #2 если еще не обратили. Там все есть.
Изменено: V - 1 Окт 2018 09:30:26
 
Перейти    
макрос не подставляет курсы валют при корректной ссылке на веб-сервис
 
#
28 Сен 2018 16:07:43
Андрей VG, знания VBA поверхностные. Ждал что асы ответят, но т.к. ответа не было решил соорудить кое что. :)
 
Перейти    
макрос не подставляет курсы валют при корректной ссылке на веб-сервис
 
#
28 Сен 2018 15:13:29
проверяйте.
вместо этих двух строчек вставьте это
Код
Set regEx = CreateObject("VBScript.RegExp")
    regEx.Pattern = "\d+.\d+"
    regEx.Global = True
    sDollarRate = Mid(sHtmlCode, InStr(1, sHtmlCode, "USD"), 50)
    sEuroRate = Mid(sHtmlCode, InStr(1, sHtmlCode, "EUR"), 50)
    If regEx.Test(sDollarRate) Then Set matches = regEx.Execute(sDollarRate): sDollarRate = matches.Item(0)
    If regEx.Test(sEuroRate) Then Set matches = regEx.Execute(sEuroRate): sEuroRate = matches.Item(0)

и вверху объявите переменные
Dim matches As Object
Dim regEx As Object
 
Перейти    
Удалить все, кроме слов, в которых есть нужный символ, Прошу вашей помощи
 
#
28 Сен 2018 11:46:57
выделяете формулу в окне редактирования и жмете F9
 
Перейти    
макрос не подставляет курсы валют при корректной ссылке на веб-сервис
 
#
28 Сен 2018 11:31:08
Код
sDollarRate = Mid(sHtmlCode, InStr(InStr(1, sHtmlCode, "USD"), sHtmlCode, "</description>") - 6, 6)
sEuroRate = Mid(sHtmlCode, InStr(InStr(1, sHtmlCode, "EUR"), sHtmlCode, "</description>") - 6, 6)

но со временем возможно придется менять 6 на другое число. сейчас там число из 6 символов.
почитайте про ф-цию InStr (в экселе ф-ция ПОИСК)
Изменено: V - 28 Сен 2018 11:32:18
 
Перейти    
Удалить все, кроме слов, в которых есть нужный символ, Прошу вашей помощи
 
#
28 Сен 2018 11:26:34
вариант:
1. в соседнем столбце вставляем формулу
Код
=ПОИСК("@";A1)
и растягиваем вниз.
2. выделяем столбец с формулой
3. Главная - Найти и выделить - Выделение группы ячеек - ставим галку "формула", убираем "число". Ок
4. Удаляем строки.
Изменено: V - 28 Сен 2018 11:27:31
 
Перейти    
Поиск даты в диапазонах дата/время
 
#
28 Сен 2018 10:24:14
проверяйте
Код
=ИНДЕКС(C4:C14;ПОИСКПОЗ(H4;E4:E14;1)+1)
Изменено: V - 28 Сен 2018 10:25:54
 
Перейти    
Заливка ячейки, если в В стоит #Н/Д
 
#
28 Сен 2018 09:55:28
Код
=ЕОШИБКА($B2)
 
Перейти    
макрос не подставляет курсы валют при корректной ссылке на веб-сервис
 
#
28 Сен 2018 09:47:05
Цитата
adike написал: Подскажите где содержи(а)тся ошибка(и)?
Здесь
Код
sDollarRate = Mid(sHtmlCode, InStr(InStr(1, sHtmlCode, "USD"), sHtmlCode, "</td></tr>") - 7, 7)
sEuroRate = Mid(sHtmlCode, InStr(InStr(1, sHtmlCode, "EUR"), sHtmlCode, "</td></tr>") - 7, 7)

откройте XML валют из кода
там нет искомого "[/td][/tr]" после USD, евро это тоже касается.
 
Перейти    
Как объединить несколько макросов в один или выполнить их последовательно?
 
#
20 Сен 2018 13:23:36
последние 3 как то так
Код
Application.ScreenUpdating = False
   For Each Sh In ThisWorkbook.Worksheets
       lR = Sh.UsedRange.Rows.Count + Sh.UsedRange.Row - 1
       For i = lR To 1 Step -1
           If Sh.Rows(i).Hidden Then Rows(i).Delete
       Next
       For i = 256 To 1 Step -1
          If Sh.Columns(i).EntireColumn.Hidden Then
              Sh.Columns(i).EntireColumn.Delete
          End If
       Next
      Sh. SpecialCells(xlCellTypeComments).ClearComments
   Next
   Application.ScreenUpdating = True
 
Перейти    
Как текст сделать ссылкой
 
#
18 Сен 2018 10:11:12
_Vadim_, ДВССЫЛ не лучший вариант, если подходит формула от kalmar, то лучше используйте её.
 
Перейти    
Формула для возвращения значения строки ячейки (из массива данных)
 
#
18 Сен 2018 09:58:48
утверждение "не работает" желательно подтверждать файлом. Люди которые дают формулы в 80% проверяют её и она у них работает.
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 146 След.
Наверх