Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Анимамция на листе. Использование рисунка gif
 
Всем огромное спасибо.
Казанский - супер. Получилось.
Анимамция на листе. Использование рисунка gif
 
Огромное спасибо, Игорь
Супер. Но есть одно но....
На работе нет доступа к интернету, соответсвенно WebBrowser1 и ссылка на сайт не работает.
Возможно есть еще какой-то путь для анимирования рисунка не используя WebBrowser1 . Очень и очень благодарен.
Анимамция на листе. Использование рисунка gif
 
А Вот и сам рисунок gif,что я использовал для вставки в эксель через Вставка - рисунок
Анимамция на листе. Использование рисунка gif
 
Добрый вечер, уважаемые форумчане. Подскажите пожалуйста есть ли такая возможность в Ексель, чтобы рисунок gears-anim.gif на листе (лист1) был анимированный. В данном случае это движение шестерни.
Заранее благодарен.
Полный путь к книге в ячейке. Макрос, Версия 2003
 
Kuzmich Огромное спасибо. То, что и нужно.
Полный путь к книге в ячейке. Макрос, Версия 2003
 
Добрый вечер. Уважаемые форумчане. Помогите пожалуйста с макросом, чтобы в ячейку С4 выводил полный путь к книге.
Например; D:\DSA\ОТЧЕТ.XLS
Заранее огромное спасибо.
Запустить на принтер окошко ListBox2 со всеми значениями в нем
 
Спасибо Казанский.
Цитата
на форме нет "ListBox2"
Да есть lbx02. :)
Интересует именно распечатка окна lbx02 с значениями. На форумах в сети такого вопроса нет, а здесь уверен, что Вы знаете как такое сделать.
Запустить на принтер окошко ListBox2 со всеми значениями в нем
 
Здравствуйте. Очень прошу Вашей помощи. Помогите пожалуйста прописать макрос печати с Userform только ListBox2 со всеми значениями в нем
Заранее огровное спасибо
Извлечение элементов из диапазона, удовлетворяющих условию, сейчас макрос выбирает все уникальные значения
 
Юрий М Спасибо огромное. Супер. Всех благ Вам.
Извлечение элементов из диапазона, удовлетворяющих условию, сейчас макрос выбирает все уникальные значения
 
Здравствуйте уважаемые.
Последняя просьба о помощи и супер файлик готов. Часы ручной работы сокращены в несколько раз.
Помогите пожалуйста усовершенствовать макрос Extract таким образом, чтобы он забрасывал все значения в "СВОД." А20 и далее из листа "ОСН" А2:А5000 при условии, что в D2:D5000 = 0 или ""
Заранее огромное спасибо.
Сумма значений в ячейке при двух условиях
 
Спасибо Вам огромное. Всего Вам самого лучшего за то, что помогаете неукам :(
Сумма значений в ячейке при двух условиях
 
Catboyun Спасибо огромное. Очень помогли.
vikttur Спасибо. Формула Catboyun работает :) Вашу я точно у себя не внесу :( (рисунок)
Сумма значений в ячейке при двух условиях
 
Здравствуйте, уважаемые. Не примите пожалуйста за наглость. Пересмотрел темы на форумах, приемы, но исправить формулу без Вашей помощи не удается.
На листе "СВОД." в D15 - я поставил формулу массива:
=СУММПРОИЗВ((ОСН!A2:A5000>1)*(ОСН!D2:D5000="")*(ОСН!E2:E5000))
Согласно ей надо суммировать значения в ячейках в диапазоне ОСН!E2:E5000 при условии, что значения в ячейках ОСН!A2:A5000 больше 1 и значения в ячейках ОСН!D2:D5000 равны нулю или пустые.
К сожалению формула выбивает #ЗНАЧ!
Подскажите пожалуйста что я неправильно внес в формулу.
Добавить в MsgBox результат (значение) формул =СУММ()
 
Казанский Спасибо огроменное. Супер.
Добавить в MsgBox результат (значение) формул =СУММ()
 
Уважаемые форумчане. Спасибо Вам за ответы и помощь в предыдущем вопросе.
Прошу в данной теме Вашей помощи в добавлении в MsgBox  результата (значенй)  формул: =СУММ(C3:С10) и  =СУММ(D3:D10) из листа "Свод."
Так, чтобы в сообщении говорилось:
Код
MsgBox "Перенос в значения успешен. Перенесено 5,718 кг и 12 шт", vbInformation, "Импорт..."
Где 5,718 кг -  ето формула  =СУММ(C3:С10) из листа "Свод.", а 12 шт - ето формула  =СУММ(D3:D10) из листа "Свод."
Огромное спасибо Вам за труды.
Перенос результата формул из одного листа в их значения на другой лист при условии
 
vikttur Спасибо огромное
Перенос результата формул из одного листа в их значения на другой лист при условии
 
vikttur Спасибо. Понял с вашей помощью. Ето диапазон 7 (G3:G14, I3:I14,K3:K14 и так до 19 (S3:S14) )
А ету строку помогите пожалуйста перевести:
Код
Range(Cells(3, Col), Cells(6, Col)).Value = .Range(.Cells(3, 4), .Cells(6, 4)).Value
Перенос результата формул из одного листа в их значения на другой лист при условии
 
Юрий М Я очень извиняюсь перед Вами.
Помогите мне пожалуйста расшифровать Ваш макрос, чтобы я его смог использовать для большого файла.
Заранее огромное спасибо.
Код
Sub Macro1()
Dim i As Long, Col As Long
    With Sheets("СВОД.") ' Переходим на лист СВОД.
        dDate = .Cells(1, 3) ' Тут ячейка С1
        Set Rng = Rows(1).Find(what:=dDate, LookIn:=xlFormulas, lookAt:=xlWhole)
        For i = 7 To 19 Step 2  ' Тут и далее не могу понять никак
            If Cells(1, i) = dDate Then
                Col = i
                Exit For
            End If
        Next
        Range(Cells(3, Col), Cells(6, Col)).Value = .Range(.Cells(3, 4), .Cells(6, 4)).Value
        Range(Cells(9, Col), Cells(11, Col)).Value = .Range(.Cells(7, 4), .Cells(9, 4)).Value
        Cells(14, Col).Value = .Cells(10, 4).Value
        Range(Cells(3, Col + 1), Cells(6, Col + 1)).Value = .Range(.Cells(3, 3), .Cells(6, 3)).Value
        Range(Cells(9, Col + 1), Cells(11, Col + 1)).Value = .Range(.Cells(7, 3), .Cells(9, 3)).Value
        Cells(14, Col + 1).Value = .Cells(10, 3).Value
    End With
End Sub
Перенос результата формул из одного листа в их значения на другой лист при условии
 
Юрий М Огромное Вам спасибо. Дай Вам Бог здоровья.
Перенос результата формул из одного листа в их значения на другой лист при условии
 
Спасибо Виктор. Это было бы прекрасно. Но к сожалению структуру листов двигать нельзя. Единственное, добавить еще один лист и на нем все ето делать, а потом снова забрасывать в "Основная". Все это в принципе и делается сейчас формулами. В конце дня формулы вручную превращаю в значение. На следующей неделе снова на целую неделю вставляю формулы. Поэтому и прошу Вашей помощи, чтобы еженедельно полдня не сидеть прописывая формулы, а макросом постоянно это переносить.
Перенос результата формул из одного листа в их значения на другой лист при условии
 
Добрый вечер, уважаемые форумчане и знатоки Excel. Обращаюсь к Вам с просьбой о помощи.
Есть файл Test_5.xls в нем листы "СВОД." и "ОСНОВНАЯ". Остальные скрытые.
На листе   "СВОД." в диапазоне А3:D10 - результат работы формул. В диапазоне А3:А10 -артикула.  Данный диапазон является постоянным. В ячейке С1 - формула =СЕГОДНЯ()
На листе "ОСНОВНАЯ" в диапазоне Е3:Е14 те же артикула, а в G3:T14 - формулы для подсчета количеств и сумм (ВПР). Результат появляется если даты в G1:S1 равны =СВОД.!$C$1
Помогите пожалуйста макросом осуществить перенос данных сразу в значение из диапазона С3:D10 листа   "СВОД."  в G3:T14  листа "ОСНОВНАЯ". так, чтобы не было формул в диапазоне G3:T14 и перенесены значение больше не двигались при изменении =СЕГОДНЯ() , а перебрасывались на соответствующую дату  (диапазон) в листе  "ОСНОВНАЯ".


Заранее огромное Вам спасибо.
Страницы: 1
Наверх