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

Страницы: 1
Проблема с макросами: ошибка 57121
 
Попробуйте отключить библиотеку MISSING: ......
Изменено: sazhin - 11.02.2014 11:36:43 (неадекватное отображение PrtScn)
Ускорение работы с таблицами размером более 40Мб., Поиск технической возможности ускорения работы.
 
Можно Access поставить на 1 ПК, стоимость 8 т.р., на остальные поставить бесплатные AccessDatabaseEngine и AccessRuntime.
Автозаполнение строк по условию
 
выслал файл
Автозаполнение строк по условию
 
Только счёт не Double, а Strind поздно заметил, что там точка
Автозаполнение строк по условию
 
Код
Sub Airline()
Dim счёт As Double, i As Integer
Application.ScreenUpdating = False
    счёт = [e8]
    [e11:f30].ClearContents
    With Sheets(1)
     i = 5
     Do
      If .Cells(i, 11) = счёт Then Sheets(2) .Cells([e100].End(xlUp).Row + 1, 5) = .Cells(i, 9)
      If .Cells(i, 12) = счёт Then Sheets(2) .Cells([f100].End(xlUp).Row + 1, 6) = .Cells(i, 9)
      i = i + 1
     Loop While .Cells(i, 3) <> ""
    End With
Application.ScreenUpdating = True
End Sub
Интерактивная гистограмма, Объединение двух типов графиков в одном
 
Попробуйте =Лист1!Таблица1
Страницы: 1
Наверх