Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » Riccoromeo
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Присваивание имени картинке при переносе ее в ячейку
 
#
04.04.2016 17:14:07
Всем привет, очень нужна помощь.

Необходим макрос, чтобы при переносе его в ячейку  в столбце "B" картинке автоматически присваивалось имя из столбца  "D"
 
Перейти    
Макрос для сортировки в убывающем порядке выдает пустые ячейки сверху., Выдает пустые ячейки вверху
 
#
13.01.2016 15:16:56
Ребята нужна помощь, делаю сортировку макросом по столбцу "К" в убывающем порядке, выдает пустые строки вверху.
Необходимо их отображать внизу, не знаю как сделать.
Плиз Хелп исправить код!!! Не могу в интернете нигде найти как сделать их снизу, везде варианты с неотображением их.


Код
Sub Sorting_201411D()
Application.ScreenUpdating = False
    With ActiveWorkbook.ActiveSheet.AutoFilter.sort
        .SortFields.Clear
        .SortFields.Add Key:=Range("K5"), SortOn:=xlSortOnValues, _
        Order:=xlDescending, DataOption:=xlSortNormal
        .Apply
    End With
End Sub
 
Перейти    
Формула Суммеслимн с подфункцией Если
 
#
15.05.2015 10:15:21
Ребят привет, делаю dashboard, не могу разобраться помогите пожалуйста.

Есть база данных на 1 листе на другом делаю dashboard. Данные из базы данных подтягиваю функцией суммеслимн. Пользователь из списка выбирает позицию, она автоматически находится в бд по указанным критериям.

Не знаю как учесть значение если пользователь не выберет значение. Как это можно учесть? попробовал вводить подфункцию Если выбор = "Не выбрано" то из массива пустого он выбирает другое пустое значение. Не прохляло... какая логика должна быть, не подскажете?
Изменено: Riccoromeo - 15.05.2015 10:15:59
 
Перейти    
Макрос для подтягивания данных по ИПЦ c Интернета
 
#
07.05.2015 18:47:27
Ребят, не подскажите, как прописать макрос, чтобы подтягивал по регионам по месяцам данные по Индексу потребительских цен отсюда.
Для подтягивания курсов сделал, а с сайтом статистики не могу разобраться.

Вот что для курсов сделал с ЦБР:
Код
Function GetRate(ByVal CurrencyName As String, ByVal RateDate As Date) As Double
   On Error Resume Next
    CurrencyName = UCase(CurrencyName): If Len(CurrencyName) <> 3 Then Exit Function
    Set xmldoc = CreateObject("Msxml.DOMDocument";): xmldoc.async = False
    url_request = "[URL=http://www.cbr.ru/scripts/XML_daily.asp?date_req=]http://www.cbr.ru/scripts/XML_daily.asp?date_req=[/URL]" + Format(RateDate, "dd\/mm\/yyyy";)

    If xmldoc.Load(url_request) <> True Then Exit Function 

   Set nodeList = xmldoc.selectNodes("ValCurs";): Set xmlNode = nodeList.Item(0).CloneNode(True)
    Set node_attr = xmlNode.Attributes(0): strDate = node_attr.Value
    Set nodeList = xmldoc.selectNodes("*/Valute";)
    For i = 0 To nodeList.Length - 1    ' поиск нужной валюты
       Set xmlNode = nodeList.Item(i).CloneNode(True)
        If xmlNode.childNodes(1).Text = CurrencyName Then
            CurrencyRate = CDbl(xmlNode.childNodes(4).Text)
            divisor = Val(xmlNode.childNodes(2).Text)
            GetRate = CurrencyRate / divisor
            Exit Function
        End If
    Next
End Function

Помогите плз с ИПЦ разобраться. Вещь нужная для многих.
Изменено: Riccoromeo - 08.05.2015 09:56:36
 
Перейти    
Макрос для очистки данных массива начиная с пустого ряда
 
#
28.04.2015 11:00:41
Ребят не подскажете как правильно написать  макрос для удаления значений в массиве ("C4-U48") начиная с пустого ряда в колонке C? Я нуб пока.  

Range("C4-U48").Select    
Selection.ClearContents
 
Перейти    
Макрос, чтобы вводимое в ячейку значение автоматически перемножалось на другое значение.
 
#
20.04.2015 09:56:01
Ребят не подскажете, можно ли сделать такой макрос, чтобы при вводе в ячейку А1 например значения 50, оно автоматом умножалось на ячейку А2. И в ячейке А1 отображалось не 50, а 50*A2
 
Перейти    
Изменение вычислений в зависимости от цвета шрифта
 
#
15.04.2015 12:15:14
Ребят, помогите если не сложно,
Как это лучше сделать макросом или можно формулой.
Надо как-то прописать условие, что если значение в колонке (T) красного цвета, то (W) считается как (S)/(M)-1, если нет, то так как сейчас
 
Перейти    
Макрос для переноса данных со смещением
 
#
14.04.2015 09:20:02
Всем привет, ребят, помогите если не сложно.
Хочу, чтобы по нажатии кнопки "загрузка в реестр" на листе "Аллокатор" в Лист "Input" загружались данные из листа  "Аллокатор". Причем чтобы подтягивалось после существующих уже записей (с оффсетом то есть).
"C11-С172" в колонку F, "D11-D172" в M, "K11-K172" в колонку I, "L11-L172" в G, "M11-M172" в A, "N11-N172" в колонку C
Я нуб, только начинаю учиться ВБА, помогите плз.
Изменено: Riccoromeo - 14.04.2015 11:12:13
 
Перейти    
Страницы: 1
Наверх