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

Страницы: 1 2 След.
Просуммировать диапазон дат в формате ДД.ММ.ГГ / ч:мм по критерию даты
 
Добрй вечер. Уважаемые гуру, помогите справиться с формулой.

ЕСТЬ диапазон данных с датами в формате "ДД.ММ.ГГ / ч:мм;@ или 05.09.2020  20:36:08"
НУЖНО посчитать сумму по столбцу D по критерию "сегодняшняя дата" в формате "ДД.ММ.ГГ или 05.09.2020"

Есть формула
Код
=СУММЕСЛИМН(БР!$D:$D;БР!$E:$E;"Терминал";БР!$A:$A;Инфо!$J$1)
где
Код
"Инфо!$J$1"
ячейка с сегодняшней датой в формате "ДД.ММ.ГГ"
Автоматический размер ComboBox (ListRows)
 
Господа подскажите.

К ComboBox прикручен именованный диапазон RowsSource, количество пунктов в этом диапазоне время от времени меняется, после чего приходится в ручную выставлять значение ListRows дабы не использовать полосу прокрутки. Может есть у кого догадки как можно реализовать автоматическое изменение размера?
Изменено: cifrus89 - 21.08.2016 08:16:05
Вставить новую строку
 
Добрый день господа.

Подскажите как можно избавится от Select в коде, чтобы вставить новую строку и здвинуть имеющиеся данные вниз.
Код
 Sheets("Лист1").Select
    Rows("4:4").Select
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Закрыть открытые формы при переходе на другой лист
 
Подскажите как реализовать макросом, закрытие открытых форм при переходе на другой лист?

Пример. Я запустил с Лист1  UserForm.  (UserForm.Show 0)     Как сделать чтобы эта форма закрылась при переходе на любой другой лист
Изменено: cifrus89 - 05.04.2014 22:24:32
Копирование строки (.Paste), ошибка
 
Здравствуйте. Подскажите что делаю не так?
Код
    Cells(ActiveCell.Row, "A").Select    
    ActiveCell.EntireRow.Select         
    Selection.Copy 
    Sheets("SC2").[A1].Paste
 
Как вставить формулу в форму?
 
Здравствуйте. Нужно чтобы в Label.Caption отображалась текущая дата, подскажите куда копать

Спасибо
[ Закрыто] Помогите избавится от Select
 
Добрый день господа.
Подскажите юзеру как сократить макрос и избавится от селекта
Код
Sheets("БДТ".Select
    Range("H4".Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Спасибо
Защита макросов от Linux
 
Добрый день

Макросы в книге защищены паролем. На днях обнаружил что открывая книгу в Linux все макросы доступны. Есть ли какой то способ закрыть к ним доступ из Linux?
Открытие защищеных макросов в Linux
 
Добрый день.
Макросы в книге защищены паролем. На днях обнаружил что открывая книгу в Linux все макросы доступны. Есть ли какой то способ закрыть к ним доступ из Linux?
Изменено: cifrus89 - 02.03.2014 02:08:26
При попытке запустить макрос появляется ошибка
 
Добрый день.
Подскажите пожалуйста. При попытке запустить макрос, стало появляться такое вот сообщение? Что может быть?




Макрос заполнения нескольких ячеек
 
Добрый день господа.

Подскажите пожалуйста как модернизировать макрос чтобы данное действие применялось ко всем выделенным ячейкам а нее только к одной

   ActiveCell.FormulaR1C1 = "яблоко"
   With Selection.Interior
       .Pattern = xlSolid
       .PatternColorIndex = xlAutomatic
       .ThemeColor = xlThemeColorAccent2
       .TintAndShade = 0.799981688894314
       .PatternTintAndShade = 0
   End With
   With Selection.Font
       .ThemeColor = xlThemeColorLight1
       .TintAndShade = 0
   End With
Как макросом раскрыть ComboBox ?
 
Подскажите пожалуйста
Скроллинг листа мышью когда запущена форма
 
Доброго времени суток.

Подскажите как крутить лист если открыта форма?

Спасибо.
Доступ к другой книге защищенной паролем
 
Добрый день господа.

Подскажите как можно реализовать доступ к другой книге если вторая защищена паролем.

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

А еще лучше чтобы он вообще не открывался, но данные заносились.
Изменено: cifrus89 - 02.03.2013 14:21:40
Книга не сохраняется
 
Добрый вечер господа. Выручайте. Что может быть?    
 
Книга работала весь день, но внезапно кончилось место на диске С и она отказалась сохранится. Освободил место, файл, сохранить... Но не сохраняет. Попробовал на другой диск, на флешку, в сеть. Бесполезно. Книга открыта, работает, но не дает себя сохранить.
Добавить к числу в ячейке минус, конвертировать число
 
Добрый день.  
 
Подскажите что за макрос такой который сможет конвертировать число в ячейке A1 в отрицательное?
Вычисления в форме по значениям TextBox и Label
 
Доброго времени суток.  
 
Подскажите как можно производить вычисления в форме по значениям TextBox и Label  
 
У меня вот такой вариант, но как я понял он не работает.  
 
Label8.Caption = Label4.Caption - TextBox2.Text
Суммирование по дате в разных форматах
 
Доброго времени суток.  
 
Подскажите пожалуйста, как можно посчитать сумму по критерию "сегодняшняя дата" если дата в диапазоне имеет вид "месяц/число/год/час/минута"
Элементы управления UserForm со времен Windows 3.x
 
На дворе 21 век, вышла Windows 8, а элементы управления формы кажется с 90-x годов ничуть не изменились. Я имею ввиду эти квадратные серые кнопки с острыми углами.  
 
Хотелось бы придать им более современный вид, не прибегая к рисункам и автофигурам.
Как сосчитать количество по целому
 
Есть диапазон ячеек в которых находится дата в формате (число месяц год / час минута)  
 
Мне нужно сосчитать количество ячеек за сегодня, то есть дату нужно будет округлять до целого.  
 
Функция СЧЁТЕСЛИ не может этого сделать. Может я что-то не так делаю? Подскажите как правильно?
Запрет выполнения макроса пользователем
 
Добрый день.  
 
Подскажите как можно запретить пользователю самостоятельно запускать макросы, например по ALT+F8
Считать количество по критерию
 
Добрый день господа.  
 
Помогите посчитать количество.  
 
На Листе1 в первом столбце содержится дата вот в таком формате  
 
07.02.2012 / 18:30  
07.02.2012 / 18:17  
07.02.2012 / 17:16  
06.02.2012 / 19:16  
06.02.2012 / 19:13  
06.02.2012 / 16:07  
06.02.2012 / 14:28  
03.02.2012 / 18:30  
03.02.2012 / 18:28  
03.02.2012 / 16:55  
03.02.2012 / 13:12  
 
критерий поиска вот в таком формате.  
 
07.02.2012  
 
Вопрос: как просуммировать количество?
Запрет операций над листами
 
Добрый день.  
 
Использую блокировку некоторых областей листа по паролю дабы защитить нежелательное редактирование юзверем.  
 
iPassword = 123456  
For i = 1 To Sheets.Count  
Sheets(i).Protect Password:=iPassword, DrawingObjects:=True, Contents:=True, Scenarios:=True  
Next  
 
Но обнаружил что при таком методе, доступны функции "Показать, скрыть, переименовать, вставить лист"  
 
Подскажите чем можно дополнить сей макрос
Форма присутствующая на листе и немешающая работе с листом.
 
Скажите есть способ поместить на лист форму, которая всегда будет зафиксирована в определенной части листа, но не будет мешать работе с таблицей. Можно будет по прежнему вделять и редактировать ячейки.
TextBox отображет значение выделенной ячейки
 
Здравствуйте Господа.  
 
Помогите написать простенький макрос.  
 
В шапке листа расположена форма, с TextBox'ом. Я выделяю любую ячейку, а в Текстбоксе отображается содержимоле столбца 10 этой строки.
Закрытие книги по расписанию
 
Добрый день.  
 
Поиск по воруму не увенчался успехом.    
 
Помогите написать макрос который будет сохранять и закрывать книгу каждый день в 23,00  
 
 
Спасибо.
Строка красного цвета если значение в ячейке больше 30
 
Приветствую господа.  
 
Подскажите можно ли заставить текст в строке быть красным, если например ячейка в столбце 19 имеет число больше 30
Вывод в TextBox целого числа
 
Подскажите как заставить  TextBox выводить целое число вместо дробного  
 
Использую  
 
Label20.Caption = Cells(ActiveCell.Row, 6)
Запуск макроса из другой книги
 
Здравствуйте.  
 
Подскажите как запустить макрос из другой книги?  
 
Делаю вот так:  
 
Workbooks.Open "C:\Cifrus\baza\Бухгалтерия Цифрус Авант.xlsm"  
Application.Run "Бухгалтерия Цифрус Авант.xlsm!Unlock_sheets"  
 
На что получаю ответ "макрос не найден"
[ Закрыто] Переименование книг макросом [ТЕМА ЗАКРЫТА]
 
Доброго времени суток господа!  
 
Помогите пожалуйста решить головоломку, написать макрос.  
 
Есть две книги. Книга1, Книга2 и Книга3. Макрос запускается из Книги3. Он открывает Книгу1 и Книгу2, кое что там переносит (этот макрос я уже написал), далее закрывает обе книги, Книгу2 удаляет а Книгу1 переименовывает в Книгу2.  
 
Заранее спасибо.
Страницы: 1 2 След.
Наверх