Как сделать огиву в excel

Обновлено: 03.07.2024

Эта шпаргалка выросла из примеров и другой информации из эхи, плюс приобретенный личный опыт. Работать мне с ней довольно удобно. Иногда я мылю эту шпаргалку тем, кто задает вопросы в эхе . и я чувствую, что человеку тяжело :-) . от них приходят благодарности. Вот я и подумал: хорошо если эта шпаргалка появится на твоем сайте, облегчив приобретение опыта всем желающим.

Открытие для существующего документа (Excel исчезает после выхода)
Для ускорения автоматической работы надо поставить
Возможность параллельной работы на Excele во время формирования отчета
Процедура для облегчения работы с линиями
Заморозка строк и столбцов при скроллинге

Общие действия.

RELEASE ole1, ole2

Открытие при создании нового документа

* способ, когда не исчезает после выхода:
ole1 = CreateObject("Excel.Application")
ole1.WorkBooks.add
ole2=ole1.Application
* способ, когда таб Excel исчезает после выхода:
ole1 = GetObject("","Excel.Sheet")
ole2 = ole1.Application

Открытие для существующего документа (Excel исчезает после выхода)
fil_excel = cfg_tgdef + "RECHNUNG_"+nominv_r+".xls"
filnam_r = "RECHNUNG_"+nominv_r+".xls"
ole1 = GetObject(fil_excel)
ole1.Application.Windows(filnam_r).Activate
ole2 = ole1.Application
ole2.Visible = .T.

Выход
ole1.Application.Quit

В начале работы, сразу после создания обьекта
ole2.WindowState = xlMinimized && минимизировать окно
ole2.ScreenUpdating = .F. && не отображать изменения на экране
В конце работы, перед показом отчета
ole2.ScreenUpdating = .T.
ole2.WindowState = xlMaximized

Запоминание результата в файл
ole2.ActiveWorkBook.Save && в тот же файл
ole2.ActiveWorkBook.SaveAs(fil_excel) && в новый файл

Разное
ole2.DisplayAlerts =.F. && Убрать запрос "Сохранить файл?" (перед выходом)
ole2.DisplayFormulaBar = .F. && Убрать панель формул
ole2.Version && Возвращает версию Excel

Запуск макроса
Ole2.Run("EXPORT", m.file) && "Export" - имя макроса, m.file- параметр

Удаление макроса
workbooks("book1").VBProject.VBComponents(5).CodeModule.DeleteLines 2,1
Удаляет строку номер 2 из модуля номер 5

1-й способ:
Ole1 = CREATEOBJECT('Excel.Application') && создание осн. обьекта
Ole1f = CREATEOBJECT('Excel.Application') && cоздание фиктивного обьекта
Тогда при открытии XLS-документа будет задействована вторая ссылка (т.е. ole2f), а сам работаешь с первой, ole1.Visible останется равной FALSE. В нужном месте (после того как полностью сформировал свой отчет) можно вставить release ole2, который на работе XLS-документов, если таковые открыты к тому времени, не отразится.
2-й способ
local ole1 as Excel.Application
ole1 = CreateObject("Excel.Application")
ole1.IgnoreRemoteRequests = .t.
После этого у xlApp отключается механизм DDE, при помощи которого Винда и открывает в нем другую книгу. Теперь при открытии xls запустится новая копия экселя. После формирования отчета
xlApp.IgnoreRemoteRequests = .f. && А можно этого и не делать

Работа с ячейками

Размеры
.RowHeight = 2 && высота строки (2 - узкая, прокладка, 15-20 - нормальная)
.ColumnWidth = 5 && ширина столбца (примерно в символах Courier, 9)

Ссылка на ячейку или диапазон
Ole2.Cells(2,4) && ячейка D2
Ole2.Range(ole2.Cells(2,4), ole2.Cells(3,6)) && D2:F3
То есть в Cells() указывается сначала строка (ряд), а затем столбец, причем для столбца вместо букв (указывает номер (A - 1, B - 2, …)

Выделение ячеек
Ole2.Cells(2,4).Select
Ole2.Range(ole2.Cells(2,4), ole2.Cells(3,6)).Select

Уменьшение писанины с одной ячейкой
WITH Ole2.Cells(2,4)
.Select
….
ENDWITH

Уменьшение писанины с диапазоном
Ole2.Range(ole2.Cells(2,4), ole2.Cells(3,6)).Select
WITH Selection
…..
ENDWITH

Разное при работе с ячейками или диапазоном
.MergeCells = .T. && обьединение ячееке
.Value = zag3_r && присвоение значения (можно без .Value: ole2.Cells(2,3)="aa")
.WrapText = .T. && текст переносится автоматом по словам внутри яч
.NumberFormat = "@" && не цифровой формат (число в виде текста)
.NumberFormat = "0.00" && числовой, всегда 2 дес знака после запятой
.interior.colorindex = число && цвет фона другой (38,42,…)

Вставка рисунка в ячейку
Range("B6").Select
ActiveSheet.Pictures.Insert("C:\VFP\EL\vaz_logo.jpg").Select

Как добавить разрыв страницы в Excel'е из VFP
Ole2.Range("A15").Select
Ole1.ActiveWindow.SelectedSheets.HPageBreaks.Add(ole2.ActiveCell)
где ole2 и ole1 - объекты страницы и Excel.
Можно в одну строчку и без перемещения курсора
Ole2.HPageBreaks.Add(ole2.Range("A15"))

Как узнать координаты ячейки
Selection.Address, Selection.Row, Selection.Column,
Selection.Rows.Count, Selection.Column1.Count

1-й способ (не сработал):
ole2.ActiveCell.Formula = '=SUM(D7:D20)'
2-й способ:
.FormulaR1C1
Пример
ole2.Cells(5,6).Select
r = "=RC[+3]"
FOR i=2 TO tlmmk_r
r = r + "+RC["+ALLT(STR(i*3,6))+"]"
ENDFOR
ole2.ActiveCell.FormulaR1C1 = r && записать формулу
Пример
FOR j= 1 to 5 && столбцы
FOR i = 1 TO 3 && строки
Ole2.cells[i,j].value = I * 10 + j
ENDFOR
WITH ole2.cells[4,j]
.Select
.FormulaR1C1 = "=SUM(R[-3]C:R[-1]C)"
ENDWITH
ENDFOR

Процедура для облегчения работы с линиями
PROCEDURE cellborders && линии ячейки
PARAMETERS p1_cb, p2_cb, p3_cb, p4_cb
&& 1 - i нач, 2 - i кон, 3 - style, 4 - weight
FOR i_cb = p1_cb TO p2_cb
WITH .Borders(i_cb)
.LineStyle = p3_cb
IF p3_cb <> xlNone
.Weight = p4_cb
.ColorIndex = xlAutomatic
ENDIF
ENDWITH
ENDFOR
Вызов процедуры (пример):
DO cellborders WITH 7,12,xlnone,xlthin

Вырезание, копирование, вставка
ole2.Range(ole2.Cells(4,7),ole2.Cells(4,8)).Select
ole2.Selection.Copy && копирование из диапазона в буфер
ole2.Range(ole2.Cells(5,7),ole2.Cells(5,8)).Select
ole2.ActiveSheet.Paste && вставка в выделенных диапазон
ole2.CutCopyMode = .F. && убираем мерцающий бордюр выделения
Если надо сделать перенос, то вместо Copy используется Cut
ole2.Selection.Cut && вырезка из диапазона в буфер
Желательно, чтобы в диапазоне, куда вставляем из буфера, не было ничего записано, то есть чтобы было чисто.

Заморозка строк и столбцов при скроллинге.
ole2.Cells(5,3).Select
ole2.ActiveWindow.FreezePanes = .T.
Будут заморожены 4 строки сверху от выделенной ячейки и 2 стобца слева от выделенной ячейки. То есть выделенная ячейка - угловая, которая не входит в заморозку.

Автор: Валентин Ярычевский

Используете ли вы его для бизнеса в офисе или для отслеживания своих финансов дома, Microsoft Excel может быть отличным организационным инструментом. Это также может привести к путанице, пока вы не освоитесь с этим. Создание графика с осью Z в Excel не должно вводить в заблуждение. Вертикальная ось Y и горизонтальная ось X вместе отображают дату в двух измерениях, а ось Z переносит усвоение и представление данных на один шаг дальше в третье измерение. Чтобы использовать ось Z, вам просто нужно знать, куда вставить вашу информацию в Excel.

Excel может создавать графики с тремя осями.

Шаг 1

Шаг 2

Шаг 3

Шаг 4

Шаг 5

Шаг 6

Шаг 7

Шаг 8

Как сделать процентильный график в Excel

График процентиля помогает увидеть, как данное значение ранжируется по отношению к населению в целом. Он делает это, просматривая все доступные данные и генерируя процентили на основе .

Как создать XY-диаграмму с центрированной осью в Word

Настройте диаграмму X Y в Word 2013 таким образом, чтобы оси X, Y или обе оси были центрированы в диаграмме.

Как сделать график безубыточности в Excel

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

Диаграмма вех, также известная как временная шкала, представляет собой своего рода диаграмму управления проектом, которая помогает отслеживать определенные моменты на временной шкале проекта. В этом руководстве мы предлагаем пошаговое руководство, чтобы показать вам, как создать диаграмму этапов в Excel.

Создайте диаграмму этапов в Excel

Чтобы создать диаграмму вех в Excel, сделайте следующее.

Во-первых, подготовьте свои данные

Предположим, у вас есть данные таблицы, как показано на скриншоте ниже, и вы хотите создать диаграмму этапов на основе данных.

Советы:

1. Первый столбец - это даты завершения для каждого этапа проекта (убедитесь, что все ячейки с датами отформатированы в текстовом формате);

1. Вам нужно добавить вспомогательный столбец и ввести значения, как показано в третьем столбце ниже.

Советы: Значения в этом вспомогательном столбце представляют размещение каждой стадии проекта на временной шкале (положительное значение и отрицательное значение указывают вверх и вниз по шкале времени).

Создайте диаграмму этапов на основе диапазона данных

1. Выберите весь диапазон таблицы (включая вспомогательный столбец), а затем щелкните Вставить > Вставить линейную диаграмму или диаграмму с областями > Линия с маркерами. Смотрите скриншот:

2. Щелкните созданную диаграмму правой кнопкой мыши и выберите Выберите данные из контекстного меню.

3. в Выберите источник данных диалоговом окне выберите Tвнешнее размещение в Легендарные записи (серия) поле, а затем щелкните Удалить кнопку.

Примечание: Здесь Размещение текста это заголовок моей вспомогательной колонки. Отображаемый здесь текст зависит от вашего собственного заголовка столбца.

4. Продолжайте нажимать Добавить в Выберите источник данных диалоговое окно.

5. в Редактировать серию диалоговое окно, вам необходимо:

6. Когда он вернется в Выберите источник данных диалогового окна, нажмите Редактировать в Ярлыки горизонтальной оси (категории) .

8. Нажмите Добавить в Выберите источник данных диалоговое окно снова.

9. в Редактировать серию диалоговое окно, настройте следующим образом.

9.3) Выберите все значения во вспомогательном столбце (за исключением заголовка) в Значения серии коробка;

10. Нажмите OK в Выберите источник данных диалоговое окно для завершения настроек.

Теперь диаграмма отображается, как показано на скриншоте ниже.

Отформатируйте диаграмму

1. Щелкните правой кнопкой мыши серию названий этапов, а затем щелкните Форматировать ряд данных из контекстного меню.

2. В дебюте Форматировать ряд данных панель, перейдите в Заливка и линия вкладку, а затем выберите Нет линии вариант в линия .

3. Не снимая выделения с диаграммы, щелкните Дизайн > Добавить элемент диаграммы > Полосы ошибок > Дополнительные параметры панели ошибок.

4. в Полосы ошибок формата панель, вам необходимо:

Теперь веха отображается, как показано на скриншоте ниже.

5. Щелкните любой из серий названий этапов, а затем выберите Вторичная ось вариант под Варианты серий Вкладка в Форматировать ряд данных панель.

6. Выберите вторичную ось на диаграмме, а затем нажмите Удалить ключ, чтобы удалить его с графика.

Теперь вам нужно добавить названия для каждого этапа на шкале времени.

7. Щелкните серию сценических названий, а затем щелкните Дизайн > Добавить элементы диаграммы > Этикетки данных > Дополнительные параметры меток данных.

8. в Форматирование меток данных панель, только проверьте Имена категорий поле под Параметры метки меню.

9. Щелкните диаграмму правой кнопкой мыши и выберите Выберите данные из контекстного меню.

10. в Выберите источник данных диалоговое окно, вам необходимо:

10.1) Выберите Размещение текста (заголовок вспомогательного столбца) в Легендарные записи (серия) раздел;

11. в Ярлыки осей диалоговом окне выберите названия этапов и затем щелкните ОК.

12. Нажмите OK в Выберите источник данных диалоговое окно для завершения настроек.

13. Затем удалите линии сетки, увеличьте диаграмму и отрегулируйте положение некоторых меток данных, если они переполнены.

Теперь последняя веха завершена, как показано на скриншоте ниже.

Легко создать диаграмму вех в Excel

График времени полезности Kutools for Excel может помочь вам быстро создать диаграмму этапов в Excel с помощью всего нескольких щелчков мышью, как показано в демонстрации ниже.
Скачайте и попробуйте прямо сейчас! 30-дневный бесплатный маршрут

Загрузите образец файла

Видео: создание диаграммы этапов в Excel

Лучшие инструменты для работы в офисе

Kutools for Excel - поможет вам выделиться из толпы

Хотите быстро и безупречно выполнять свою повседневную работу? Kutools for Excel предлагает мощные расширенные функции 300 (объединение книг, сумма по цвету, разделение содержимого ячеек, дата преобразования и так далее . ) и экономия 80% времени для вас.

Приведены функции, графики которых участвуют в этом изображении:

у1= -1/18х 2 + 12, х[-12;12]

y 2= -1/8х 2 +6, х[-4;4]

y5= 2 ( x+3 ) 2 – 9, х[-4; 0 ]

y 6=1. 5 ( x +3) 2 – 10 , х[-4;0]

Запустить MS EXCEL

В ячейке А1 внести обозначение переменной х

Заполнить диапазон ячеек А2:А26 числами с -12 до 12.

Последовательно для каждого графика функции будем вводить формулы.

Для у1= -1/18х 2 + 12, х[-12;12]

Порядок выполнения действий:

Устанавливаем курсор в ячейку В1 и вводим у1

В ячейку В2 вводим формулу

Нажимаем Enter на клавиатуре

Автоматически происходит подсчет значения функции.

Растягиваем формулу до ячейки В26

Аналогично в ячейку С10 (т.к значение функции находим только на отрезке х[-4;4]) вводим формулу для графика функции y 2= -1/8х 2 +6.

В результате должна получиться следующая ЭТ

После того, как все значения функций подсчитаны, можно строить графики этих функций.

Выделяем диапазон ячеек А1: G26

На панели инструментов выбираем меню Вставка → Диаграмма.

В окне Мастера диаграмм выберите Точечная → Выбрать нужный вид→ Нажать Ok .

В результате должен получиться следующий рисунок:

Самостоятельная работа:

Построить графики функций в одной системе координат. Получить рисунок.

Предварительный просмотр:

Приведены функции, графики которых участвуют в этом изображении:

у1= -1/18х 2 + 12, х ∈ [-12;12]

y2= -1/8х 2 +6, х ∈ [-4;4]

y5= 2(x+3) 2 – 9, х ∈ [-4;0]

y6=1.5(x+3) 2 – 10, х ∈ [-4;0]

Запустить MS EXCEL
В ячейке А1 внести обозначение переменной х
Заполнить диапазон ячеек А2:А26 числами с -12 до 12.

Последовательно для каждого графика функции будем вводить формулы.

Для у1= -1/18х 2 + 12, х ∈ [-12;12]

Порядок выполнения действий:

Устанавливаем курсор в ячейку В1 и вводим у1

В ячейку В2 вводим формулу

Нажимаем Enter на клавиатуре
Автоматически происходит подсчет значения функции.
Растягиваем формулу до ячейки В26
Аналогично в ячейку С10 (т.к значение функции находим только на отрезке х ∈ [-4;4]) вводим формулу для графика функции y2= -1/8х 2 +6

В результате должна получиться следующая ЭТ

После того, как все значения функций подсчитаны, можно строить графики этих функций .

Выделяем диапазон ячеек А1:G26
На панели инструментов выбираем меню Вставка → Диаграмма.
В окне Мастера диаграмм выберите Точечная → Выбрать нужный вид→ Нажать Ok.

Помогите с Excel

Тип диаграммы: точечная (Точечная диаграмма со значениями, соединенными сглаживающими пиниями) , добавить 5 рядов, указав соотвтствующие данные

Что такое стили WordArt

Чтобы оформить текст внутри фигуры, используйте блок команд Средства рисования – Формат – WordArt. По аналогии со стилями фигур, здесь есть выпадающее меню с готовыми стилями и кнопки ручной настройки: Заливка, Контур, Эффекты. Поэкспериментируйте с форматами фигур и текста, здесь можно получить настоящее эстетическое удовольствие!

Когда Вы вставляете на лист несколько фигур, при наложении одна на другую, они перекрывают друг друга. При этом объекты, созданные раньше, будут в самом низу, а последние – вверху.

Переместит вперед – поднять фигуру на один уровень вверх;
На передний план – сделать фигуру самой верхней;

Аналогично можно понижать уровень фигуры.

Если у Вас на листе несколько фигур, которые нужно выровнять относительно какой-то базовой линии, выделите все выравниваемы фигуры (кликайте по ним с зажатой клавишей Ctrl). После этого выполните на ленте Средства рисования – Формат – Упорядочение – Выровнять. В выпадающем меню будет несколько вариантов выравнивания, выберите тот, который подходит Вам. Благодаря миниатюрам возле каждого пункта, проще сориентироваться, что делает каждая из команд.

Комбинируйте команды выравнивания и распределения, тогда Ваши фигуры будут не просто набросаны на лист, а будут выстроены в строгом порядке, что важно для любого уважающего себя эксперта Эксель.

Если же не будет, можно воспользоваться дополнительными меню в этой группе команд:

Заливка фигуры – задайте здесь цвет и способ заливки:
- Сплошным цветом;
- Вашим рисунком;
- Градиентом;
- Текстурой;

Назначайте стили фигур, чтобы получить самый выразительные визуальные эффекты на своих графических объектах.

Если нужно получить объект строго заданных размеров, на ленте есть блок: Средства рисования – Формат – Размер. Задайте здесь точные размеры Вашего изображения искусства. Учтите, изменяя масштаб печати, вы измените и размеры напечатанной фигуры.

Читайте также: