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

Страницы: 1 2 След.
Наиболее часто встречающиеся значения
 
Направляю пример.
Наиболее часто встречающиеся значения
 
Добрый день!
Нужна помощь в выборе функции(средства)  для определения наиболее часто встречающихся текстовых значений в таблице.
Выборка будет проходить из  следующего вида данных:

F24H 1/06
F22B 31/04
F16T1/20
E21B47/00,
E21B47/10
C01B17/04 ,
B01D53/48,
B01D53/52
G01N30/88
E02D5/56,
E02D7/22
F25J3/00
G01N30/88
F16L3/10
F23D14/20
F24H1/28
F24H3/08
B01D53/02 ,
B01D53/26

при выборке интересуют первые 5-6 символов, которые нужны для дальнейшей работы.
Подсчет нескольких значений в одной ячейке
 
V, den-globus, спасибо!  :D
Подсчет нескольких значений в одной ячейке
 
Здравствуйте!
Нужна помощь с подсчетом значений, находящихся в одной ячейке.
Для подсчета значений используется функция "Счетеслимн" , данная функция исправно работает когда в ячейке указано одно значение. Но что делать когда в ячейке значений несколько???
Пример ниже.

П.С. Всем откликнувшимся, заранее спасибо!
Установление средней линии на всем диапазоне диграммы
 
magrifa, да именно так как нужно! Спасибо!

А можете описать то, что сделали? Чтобы в дальнейшем можно было этим воспользоваться на других примерах.
Установление средней линии на всем диапазоне диграммы
 
Добрый день форумчане.

Столкнулся с проблемой средней линии в диаграмме. Имеется обычная гистограмма, дополнительно строится средняя линия из столбца "Проходного балла".

Первый вопрос:
Нужно чтобы линия среднего значения строилась на всю область диаграммы, а не только на 2/3 диаграммы.

Второй вопрос:
Как закрепить подпись к средней линии "Проходной балл" в правом верхнем углу? При изменении значения проходного балла надпись двигается то вверх то вниз.

Прикладываю файл.
Выбор значения по условию и копирование этого значения в ячейку
 
amfor и Сергей, большое спасибо)
Изменено: Роман shs - 19.09.2014 22:07:48
Выбор значения по условию и копирование этого значения в ячейку
 
Всем доброго дня!
Вкратце. Есть таблица с данными, на основании которых строится диаграмма.
Есть столбец "проходной балл" по значению которого "отсекаются" слабые работы.
Раньше проходной балл брался как значение 10-й работы.
Теперь нужно чтобы была возможность по какой работе выбирать значение для проходного балла.

Пробовал с ВПР, что-то никак...
В приложении пример.
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
hohlick, работает код! Спасибо!
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
hohlick, опишу вкратце назначение программы. Программа подсчитывает оценки выставляемые специалистами по выдвигаемым работам на премии.
Т.е. есть перечень работ. Есть специалисты которые выставляют оценки по 10 показателям.
1
Param2 = "='Итоговая диаграмма'!$BO$57:$BO$" + Trim(Str(57 + RowCount - 1))
Этот код работает по десятой работе, которая является крайней по величине  которой строится линия тренда для определения работ, которые получат премию.
Данный макрос был предназначен для того чтобы строить диаграммы от количества выдвигаемых работ, т.к. количество работ непостоянно.

выкладываю обновленный файл, который у меня в 2010 экселе работает, а в 03 нет. Значения можно менять.
http://files.mail.ru/BC34993756764592BB35C7DD3403EEC2

П.С. забыл добавить, что даже если все значения будут заполнены, то все равно выдает ошибку.
Изменено: Роман shs - 26.06.2014 10:02:33
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
Цитата
hohlick пишет: какие должны писаться значения, если ряд диаграммы ссылается на столбец, содержащий нулевые значения?
тут идет ссылка на десятое значение в таблице для постройки линии тренда по значению 10 работы.
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
hohlick, прошу пояснить, что мне поправить и какой окончательный вид примет код...
Не силен в программировании и в макросах в частности.
Пока моих знаний хватает чтобы вставить код...
Цитата
hohlick пишет: явно чего-то не хватает
Чего тут не хватает?
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
Замена Values на Formula ошибку исправило, но диаграммы не строятся.. нулевые значения пишутся
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
https://www.sendspace.com/file/hxvm4h   залил на файлообменник.
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
Знаю о существовании файлообменников, но на работе запрещен доступ на них. Ни на один нельзя.
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
Файл больше 2 мб веса. Даже архивом больше разрешенного в 100 кб.
Эта ошибка связана с версией Экселя?
Повторюсь, что файл перестал работать в 2003 экселе.
В 07/10 экселе стабильно работает.
Изменено: Роман shs - 24.06.2014 21:34:37
Разбор ошибки: Run-time error '1004' . Нельзя установить свойство Values класса Series
 
Всем привет!
Имеется такой код:
Код
Rem меняем Диаграмму на 4 листе, делаем ее активной
     Rem RowCount - подсчитываем кол-во заполненных строк списка работ, только нужно снизу пустые строки удалить
     RowCount = Лист3.Cells(4, 9)
   Rem Дальше меняем параметры диаграммы (столбцы и отсечку соответсвенно)
    Лист4.ChartObjects(1).Activate
    Param1 = "='Итоговая диаграмма'!$BN$57:$BN$" + Trim(Str(57 + RowCount - 1))
    Param2 = "='Итоговая диаграмма'!$BO$57:$BO$" + Trim(Str(57 + RowCount - 1))
     ActiveChart.SeriesCollection(1).Values = Param1
     ActiveChart.SeriesCollection(2).Values = Param2
Данный код предназначен для отсечения пустых строк в таблице с целью последующей постройки диаграммы.
Код  рабочий, в версиях 07-10 года Экселя стабильно работает. Работал и в 2003, но сегодня у человека перестал запускаться.
Ошибку выдает на следующие строки:
Код
ActiveChart.SeriesCollection(1).Values = Param1
ActiveChart.SeriesCollection(2).Values = Param2
Что нужно сделать чтобы всё заработало?
Переименование листов через VBA
 
Спасибо!!! А такой вопрос, если мне нужно чтобы имена начали присваиваться с определенного листа?

Код
Sheets(I + 1).Name = ExpNames(I)
   End If
я тут заменяю 1 на тот лист с которого начинать замену?
Переименование листов через VBA
 
Да, они будут заранее созданы.
Куда вставить Ваш код в мой макрос?


Спасибо!
Переименование листов через VBA
 
Макрос  пишет ошибку если сделать несколько пустых ячеек.

Но суть чуть-чуть не в этом. Я просил к действующему коду добавить возможность выполнять следующее:
- При наличии незаполненных (пустых) столбцов в таблице с ФИО, нужно чтобы ячейки физически оставались пустыми, но листам присваивались имена в зависимости от порядкового номера пустой ячейки в таблице исходных данных.

Пример:
1-23 ячейки заполнены фамилиями сотрудников - листам присвоились имена в зависимости от ФИО;
24 и 25 ячейки пустые - нужно, чтобы макрос присвоил оставшимся листам имя - "24" и "25".
Переименование листов через VBA
 
Подскажите, что выполняет этот код? И вместо чего его вставлять?
Изменено: Роман shs - 27.05.2014 11:09:52
Переименование листов через VBA
 
Нее. В настоящее время макрос переименовывает листы на основании данных исходной таблицы. Но  макрос выдает ошибку, когда в таблице остаются незаполненные столбцы с ФИО. Выходом из этой ситуации видится присваивание имени листу в соответствии с порядковым номером.
Переименование листов через VBA
 
Доброй ночи, уважаемые форумчане!
Есть таблица с исходными данными сотрудников (ФИО), на основании которого макрос присваивает имена листам. Изначально количество сотрудников было постоянным и равнялось 25 человек. Но появился нюанс, количество сотрудников стало непостоянным.

Прошу помощи в доработке кода. Необходимо чтобы при заполнении таблицы с ФИО сотрудников выполнялось следующее условие: незаполненные (пустые) столбцы оставались пустыми, но листу присваивался соответствующий порядковый номер из таблицы.  Классификатор.xls (97 КБ)
Собственно код:
Код
Sub Somecode()
    ActiveWorkbook.Application.Calculation = xlCalculationManual
    Application.ScreenUpdating = False
    
    Const ExpNumber = 25 'количество сотрудников
    Dim ExpNames(ExpNumber) As String
    
    Sheets("Перечень сотрудников"  ).Select
    Range("B4" ).Select
    If (ActiveCell.Offset(1, 0).Value <> 1 Or Trim(ActiveCell.Offset(1, 0).Value) <> "1"  )Then MsgBox ("В ячейке B5 должны начинаться номера сотрудников!!!!" )
    
    ' заносим имена сотрудников в массив
    For i = 1 To ExpNumber
        ExpNames(i) = Trim(ActiveCell.Offset(i, 1).Value)
    Next i
    ' завели имена сотрудников в массив
    
    For i = 1 To ExpNumber
        Sheets.Item(10 + i).Name = ExpNames(i)
    Next i
    
   Application.ScreenUpdating = True
   ActiveWorkbook.Application.Calculation = xlCalculationAutomatic
End Sub
Вот она, кнопочка [МОДЕРАТОР]
Изменено: Роман shs - 27.05.2014 09:56:05
Ссылка на лист в Vba
 
Нужна помощь с кодом.
Код
Лист15.ChartObjects(1).Activate
    Param1 = "=" + Лист15.Name ' + !$R$54:$R$" + Trim(Str(54 + RowCount - 1))
   ActiveChart.SeriesCollection(1).Values = Param1

Выдает ошибку 1004.
Проблема совместимости, Криво открывается файл.
 
С условным форматированием понятно, я его отрублю и  всё.
а как вычислить какие функции не доступны?
Проблема совместимости, Криво открывается файл.
 
Всем привет!
При пересылке экселевского файла обнаружилась ошибка совместимости версий.
Работал и создавал файл в 2010, отправил человеку с 2003.
Вылезла след. ошибка(см. прикрепленный файл).
Сохранил в совместимости с 2003.
Та же самая ошибка. Что можно с этим сделать?
Группировка столбцов
 
Добрый день!
Имеется матрица(таблица) текстовых значений (см. приложение), в которой указаны компетенции(виды деятельности).
Есть главная компетенция (выделена жирным), и у нее имеются подуровни.
Нужно было сделать так, чтобы при необходимости можно было скрыть и/или открыть подуровни.
Для этого была использована группировка данных, но она отлично работает только на одном ряду-столбце, а если столбцов больше двух то получается ерунда.
Крайние допустим скрываю, а с ними и значения в других столбцах...
Кто, что посоветует?!
Дополнительная линия в диаграмме
 
JayBhagavan и Юрий М Спасибо! получилось! (Ссылка крайне полезная!)
П.С. Подскажите пожалуйста, почему у меня не получается цитировать сообщение?
Выделяю сообщение, нажимаю цитировать и ничего...
Дополнительная линия в диаграмме
 
Доброго вечера!
Имеется таблица с 30 значениями по ним строится объемная гистограмма. Как к ней добавить(нанести) дополнительную горизонтальную линию которая будет строится по десятому значению?
Изменено: Galahard - 17.02.2014 17:51:35
Автоматическое ранжирование таблицы
 
Прошу прощения!
Страницы: 1 2 След.
Наверх