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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 След.
Объединение бланков с разной шириной столбцов
 
#
22.08.2014 16:30:41
Может инструмент "камера" поможет: на первом листе-верх, на втором -низ. Выделяете то что надо на втором листе, нажимаете камеру (значок фотоаппарата - в настройке выведите на панель) и выделите область на первом куда вставить.
 
Перейти    
VBA Использование переменной при сортировке, присвоить переменной диапазон и использовать его в сортировке
 
#
31.07.2014 23:28:42
Спасибо за совет. Все работает:
Код
Sub Массивы()
  Set Диапазон = ActiveWorkbook.Worksheets("Лист1").Range("a1")
  Call Сортировка(Диапазон)
End Sub

Sub Сортировка(iCell As Range)
  With ActiveWorkbook.Worksheets("Лист1").Sort
    .SortFields.Add Key:=iCell, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    .SetRange iCell.CurrentRegion
    .Header = xlNo
    .MatchCase = False
    .Orientation = xlTopToBottom
    .SortMethod = xlPinYin
    .Apply
  End With
End Sub
Изменено: PavelKs - 31.07.2014 23:39:44
 
Перейти    
VBA Использование переменной при сортировке, присвоить переменной диапазон и использовать его в сортировке
 
#
31.07.2014 23:21:46
The_Prist, в этом случае (set) в 13 строке ошибка: "Method Range of object _Global failed".
Option Base это с рабочей книги осталось.
 
Перейти    
VBA Использование переменной при сортировке, присвоить переменной диапазон и использовать его в сортировке
 
#
31.07.2014 22:39:46
Вечер добрый,
Пытаюсь присвоить переменной диапазон и использовать еe в сортировке. Ругается. Как правильно?
Код
Option Explicit
Option Base 1

Public Диапазон As Range

Sub Массивы()
  Диапазон = ActiveWorkbook.Worksheets("Лист1").Range("a1")
  Call Сортировка(Диапазон)
End Sub

Sub Сортировка(iCell As Range) 'сортирую по первому столбцу
  With ActiveWorkbook.Worksheets("Лист1").Sort
    .SortFields.Add Key:=Range(iCell), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    .SetRange Range(iCell.CurrentRegion.Value)
    .Header = xlNo
    .MatchCase = False
    .Orientation = xlTopToBottom
    .SortMethod = xlPinYin
    .Apply
  End With
End Sub

Спасибо.
 
Перейти    
Добавить строку массива в ListBox, Возможно ли без перебора сразу добавить строку массива в ListBox?
 
#
22.07.2014 18:32:13
Мне наверное не подойдет - я Listbox заполняю (хотя не знаю как применить - попробую)
Исправил пост №8 - вроде хорошо получилось.
 
Перейти    
Добавить строку массива в ListBox, Возможно ли без перебора сразу добавить строку массива в ListBox?
 
#
22.07.2014 17:07:52
Юрий М, этот способ значительно быстрее (потестил на обработке массива 11000 х 6 по условию Like).
Оставляет только пустые строки во втором массиве (размерность задаю изначально как у первого). Думаю как избавиться от пустых строк в конце второго массива)?
Воспользовался советом Hugo: "запомнить в словаре номера нужных строк, затем в финале переложить в новый массив только нужные строки" - замечательно работает.
Получился такой алгоритм: сравниваю - заполняю словарь с номерами нужных строк - прохожу по словарю и заполняю новый массив - выгружаю в листбокс.  
Изменено: PavelKs - 22.07.2014 18:27:02
 
Перейти    
Добавить строку массива в ListBox, Возможно ли без перебора сразу добавить строку массива в ListBox?
 
#
22.07.2014 12:15:47
Вопрос чисто из любопытства.
Смотрю свой код - одни циклы: цикл в цикле, циклом погоняет! Думал, может есть что поудобнее.

Спасибо.
 
Перейти    
Добавить строку массива в ListBox, Возможно ли без перебора сразу добавить строку массива в ListBox?
 
#
22.07.2014 11:24:51
В цикле: ListBox.list(i-1, j-1)=iArr(i, j)
 
Перейти    
Добавить строку массива в ListBox, Возможно ли без перебора сразу добавить строку массива в ListBox?
 
#
22.07.2014 11:19:32
Добрый день,
Есть массив iArr (1 to 100, 1 to 10) и ListBox (10 столбцов).
If iArr (i, 1)=1 Then ...  Возможно ли без перебора сразу добавить строку массива в ListBox?
Спасибо.
 
Перейти    
Поиск текстовых значений на листе. Ошибка.
 
#
15.07.2014 03:00:45
замените "+" на "&"
 
Перейти    
Можно ли установить на диаграмме масштаб оси Y по условию?
 
#
14.07.2014 22:02:26
Параметры оси - логарифмическая шкала
 
Перейти    
Равный шаг по оси X
 
#
11.07.2014 11:02:53
Измените тип диаграммы на точечную и в параметрах оси поколдуйте с шагом.
 
Перейти    
Сравнение дат с учетом цвета
 
#
08.07.2014 12:21:51
Цитата
Пока вы писали ответы, немного модифицировал задачу
гениально)
 
Перейти    
как на графике установить три разных шага оси для трех линий
 
#
04.07.2014 14:13:54
выделите линию, формат ряда данных - по вспомогательной оси
 
Перейти    
Расчет простроченой кредиторско-дебиторской задолжености про строкам долга
 
#
02.07.2014 18:02:05
как вариант
 
Перейти    
Как создать линейный график с плавающим количеством данных?
 
#
02.07.2014 17:33:24
последний вариант со сводной можете скинуть?
 
Перейти    
Как создать линейный график с плавающим количеством данных?
 
#
02.07.2014 17:09:41
Я не про график спросил, а про ввод данных - столбец время у всех одинаковый?
 
Перейти    
Усреднить данные для графика без добавления отдельной строки
 
#
02.07.2014 16:59:38
Как вариант добавьте линию тренда (линейную)
Изменено: PavelKs - 02.07.2014 17:02:58
 
Перейти    
Расчет простроченой кредиторско-дебиторской задолжености про строкам долга
 
#
02.07.2014 16:56:45
это констатация факта или вопрос?)
 
Перейти    
Как создать линейный график с плавающим количеством данных?
 
#
02.07.2014 16:54:06
а шаг во времени у вас одинаковый у всех?
 
Перейти    
Как создать линейный график с плавающим количеством данных?
 
#
02.07.2014 13:46:09
Цитата
mark4ever пишет:
График в итоге неправильно нарисовался
Измените тип диаграммы на точечную
 
Перейти    
Изменение расстояние интервала на графике
 
#
01.07.2014 12:51:00
не совсем понял вопрос. Ближе к чему? Так? экспериментируйте с параметрами оси.
Изменено: PavelKs - 01.07.2014 12:52:58
 
Перейти    
Изменение расстояние интервала на графике
 
#
01.07.2014 12:37:59
так?
 
Перейти    
Изменение расстояние интервала на графике
 
#
01.07.2014 12:33:44
Тип диаграммы не тот. Точечная должна быть.
Изменено: PavelKs - 01.07.2014 12:36:38
 
Перейти    
Функция выдает 0, формат ячеек - везде число
 
#
01.07.2014 12:30:40
Цитата
JenniRavel пишет: Файл достался в наследство.
Я думаю это просто ошибка. Строки 57-59 вставили в решение позже (работало, работало - взяли и отремонтировали)
 
Перейти    
Функция выдает 0, формат ячеек - везде число
 
#
01.07.2014 11:51:52
Я в таких таблицах использую ПРОМЕЖУТОЧНЫЕ.ИТОГИ - помогает избежать подобные циклические вычисления (она игнорирует саму себя).
Изменено: PavelKs - 01.07.2014 12:05:25
 
Перейти    
FPFO (англ. First Product First Out - первый изготовлен - первый выходит)
 
#
28.06.2014 12:38:44
для ребят используйте при заполнение дату из столба А. а в формуле "$D_:$D$10" замените на $D_:$F$10 - только 10 тоже надо поменять будет.
 
Перейти    
Расширить диаграмму до границ окна (MS Office Excel 2007)
 
#
22.06.2014 12:30:30
Лев Ильков, вы не пробовали изменять поля, как я писал в #4! При этих изменениях меняется не масштаб. В такой форме отображения диаграммы (на отдельном листе) она автоматически масшабируется по размеру области печати листа. Увеличивайте верхнее и/или нижнее поле. У меня это работает.
 
Перейти    
Расширить диаграмму до границ окна (MS Office Excel 2007)
 
#
20.06.2014 16:04:31
Измените поля (увеличить нижнее и верхнее) в параметрах страницы
Изменено: PavelKs - 20.06.2014 16:36:52
 
Перейти    
автоматическая подстановка чисел
 
#
17.06.2014 16:34:02
Как вариант (макрос - на имя листа правой кнопкой - исходный текст - там разберетесь)
Изменено: PavelKs - 17.06.2014 16:49:16
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 След.
Наверх