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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 1734 След.
Подсчет количества повторяющихся значений одного столбца в другом
 
Макрос по Вашему описанию:
Код
Sub qqq()
Dim LastRow As Long, Arr(), i As Long, j As Long, Counter As Long
    LastRow = Cells(Rows.Count, 1).End(xlUp).Row
    Arr = Range(Cells(2, 1), Cells(LastRow, 2)).Value
    For i = 1 To UBound(Arr)
        For j = 1 To UBound(Arr)
            If Arr(j, 2) = Arr(i, 1) Then Counter = Counter + 1
        Next
    Next
    MsgBox Counter
End Sub
Под реальную структуру таблицы переделывайте сами.
Подсчет количества повторяющихся значений одного столбца в другом
 
Че Полино Че, пример - это Excel-файл.  
Наполнение новой книги листами из текущей.
 
Цитата
tsutse написал:
сообщения на 2 странице обычно уже никто не читает
Ваше сообщение ещё на первой странице. А ответить на вопрос - элементарная вежливость. И вообще нужно отписываться в своих темах. Последнее сообщение должно быть Вашим. Люди тратят своё время на помощь Вам, а Вам трудно потратить минуту?
Наполнение новой книги листами из текущей.
 
tsutse, а отвечать на заданные вопросы не нужно? Вам ведь их задают не ради праздного любопытства.
Создание новой книги макросом
 
Согласен.
Наполнение новой книги листами из текущей.
 
tsutse, вместо того, чтобы ответить на заданные Вам вопросы, Вы создаёте новую тему. Зачем?!!
[ Закрыто] Наполнение листами новой книги макросом
 
Было уже сегодня. Тема закрыта и будет удалена.
Вывод значений из множества комбинаций
 
Цитата
beldimon написал:
В алгоритме целый массив данных
А зачем переносить массив? Вы опишите алгоритм. Само слово алгоритм Вам знакомо?
Создание новой книги макросом
 
Код
w = Split(ActiveWorkbook.Name, ".")(0)
Создание новой книги макросом
 
Поменяйте:
Код
w = ActiveWorkbook.Name
Видимый диапазон в ListBox
 
Я бы перебирал строки на листе и видимые заносил в массив. Затем этот массив скормил бы ЛистБоксу.
Календарь на стандартных элементах, Взято из Копилки идей
 
Сделал файл только с одним (нужным Вам) календарём.
P.S. Возвращаясь к вопросу: я использую совсем другой - самый простенький.
Связь списка с полем в word
 
mcintosh55, у Вас вопрос по Word? А у нас форум по Excel.
[ Закрыто] Word получение данных из AD
 
Цитата
mcintosh55 написал:
Что бы не писать новую тему...
я создам сообщение, которое никак не связано с этой темой.
Календарь на стандартных элементах, Взято из Копилки идей
 
Посмотрите в файле Слэна диспетчер имён.
Ввод в ячейку текущего времени (не обновляемого) по клику мышки, Ввести текущее время системы в ячейку мышкой и закрыть ячейку для любого другого ввода
 
Кажется понял ) Смещайтесь тогда не вниз, а вправо на одну ячейку. Или в заданный столбец.
Ввод в ячейку текущего времени (не обновляемого) по клику мышки, Ввести текущее время системы в ячейку мышкой и закрыть ячейку для любого другого ввода
 
Цитата
yuriyk24 написал:
курсор автоматом переходит на ячейку на одну строку ниже и эта ячейка становится доступной для редактирования
А почему эта ячейка не должна быть доступна для редактирования, если она пустая?
Вывести перую строку из ячейки
 
Цитата
zamunyk написал:
задачка изменилась
zamunyk, давайте поступим так: Вы не спешите,- подготовьте все вариации, какие только возможны, а уже потом создайте новое сообщение )
Но в то же время следим, чтобы вопросы соответствовали заявленной теме.
Ввод в ячейку текущего времени (не обновляемого) по клику мышки, Ввести текущее время системы в ячейку мышкой и закрыть ячейку для любого другого ввода
 
См. вариант. Диапазон поменяйте на нужный Вам:
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("D2:D10")) Is Nothing Then
        If Target = "" Then
            Target = Time
        Else
            Application.EnableEvents = False
            Target.Offset(1, 0).Select
        End If
    End If
    Application.EnableEvents = True
End Sub
Ввод в ячейку текущего времени (не обновляемого) по клику мышки, Ввести текущее время системы в ячейку мышкой и закрыть ячейку для любого другого ввода
 
yuriyk24, Вы видели, как код оформлен у других? Вот и Вы оформляйте свой: ищите такую кнопку (см. скрин) и исправьте своё сообщение.
По вопросу: рассмотрите вариант, когда ввод в пустую ячейку разрешён, а если в ячейке уже есть данные, то процедура Worksheet_SelectionChange просто на даст активировать эту ячейку.
Календарь на стандартных элементах, Взято из Копилки идей
 
А в чём проблема? Откройте это файл с календарями, откройте свой файл и в проводнике перетащите нужную форму в свой проект.
Промежуточные итоги в сводной таблице
 
Цитата
vaniak написал:
видио
Цитата
vaniak написал:
мне кажется это не совсем верно
Я тоже так думаю )
Подстановка числа в дату типа xx-xx-xxxx
 
Цитата
helion_prime написал:
Нужно что бы цыфра автоматически подставлялась на место числа месяца
Начиная с октября Ваша задача становится невыполнимой ))
Как закрепить заголовок в Listbox?, Listbox
 
Alena_red, переформулируйте - не могу понять, каким образом наличие заголовков столбцов спасёт ситуацию. Почему с Label хуже? И не забывайте, что существует Sсroll.
Календарь на стандартных элементах, Взято из Копилки идей
 
Не помню, какой брал за основу. Там дата изначально в MsgBox выводится. Но точно не четыре календаря )
Как закрепить заголовок в Listbox?, Listbox
 
Цитата
Alena_red написал:
но тогда форму придется делать вытянутой, так как много столбцов
А если будет заголовок, то делать "вытянутой" не нужно?
[ Закрыто] График, Распределение
 
Тема закрыта. Причину можно понять, ознакомившись с правилами.
Сбор данных с разных листов для построения графиков
 
Цитата
jkbhel написал:
как собрать данные из разных листов, на сводный лист
Где этот сводный лист?
Ушёл из темы.
Сбор данных с разных листов для построения графиков
 
Как-то тяжело идёт дело...
Вы показали один лист - это исходные данные? А где желаемый результат? И листов-доноров нужно хотя бы 2-3.
Вы упоминаете про менеджеров - а где хотя бы парочка в файле?
С правилами знакомились? О чём написано в пункте 2.3?
Сбор данных с разных листов для построения графиков
 
Вы утверждаете, что У ВАС есть файл.
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 1734 След.
Наверх