Теперь для конкретно нашего примера нужно записать в поле следующий код:


Sub DataEntryForm()
Dim nextRow As Long
nextRow = Producty.Cells(Producty.Rows.Count, 2).End(xlUp).Offset(1, 0).Row
With Producty
If .Range("A2").Value = "" And .Range("B2").Value = "" Then
nextRow = nextRow - 1
End If
Producty.Range("Name").Copy
.Cells(nextRow, 2).PasteSpecial Paste:=xlPasteValues
.Cells(nextRow, 3).Value = Producty.Range("Volum").Value
.Cells(nextRow, 4).Value = Producty.Range("Price").Value
.Cells(nextRow, 5).Value = Producty.Range("Volum").Value * Producty.Range("Price").Value
.Range("A2").Formula = "=IF(ISBLANK(B2), """", COUNTA($B$2:B2))"
If nextRow > 2 Then
Range("A2").Select
Selection.AutoFill Destination:=Range("A2:A" & nextRow)
Range("A2:A" & nextRow).Select
End If
.Range("Diapason").ClearContents
End With
End Sub


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

Итак, первая строка:

Sub DataEntryForm()

«DataEntryForm» — это название самого макроса. Вы можете оставить его как есть, а можете заменить на любое другое, которое соответствует общим правилам создания наименований макросов (отсутствие пробелов, использование только букв латинского алфавита и т.д.). Изменение наименования ни на что не повлияет.

Везде, где встречается в коде слово «Producty» вы должны его заменить на то наименование, которое ранее присвоили для своего листа в поле «(Name)» области «Properties» редактора макросов. Естественно, это нужно делать только в том случае, если вы назвали лист по-другому.

Теперь рассмотрим такую строку:

nextRow = Producty.Cells(Producty.Rows.Count, 2).End(xlUp).Offset(1, 0).Row

Цифра «2» в данной строчке означает второй столбец листа. Именно в этом столбце находится колонка «Наименование товара». По ней мы будем считать количество рядов. Поэтому, если в вашем случае аналогичный столбец имеет другой порядок по счету, то нужно ввести соответствующее число. Значение «End(xlUp).Offset(1, 0).Row» в любом случае оставляем без изменений.

Далее рассмотрим строку

If .Range("A2").Value = "" And .Range("B2").Value = "" Then

«A2» — это координаты первой ячейки, в которой будет выводиться нумерация строк. «B2» — это координаты первой ячейки, по которой будет производиться вывод данных («Наименование товара»). Если они у вас отличаются, то введите вместо этих координат свои данные.

Переходим к строке

Producty.Range("Name").Copy

В ней параметр «Name» означат имя, которое мы присвоили полю «Наименование товара» в форме ввода.

В строках


.Cells(nextRow, 2).PasteSpecial Paste:=xlPasteValues
.Cells(nextRow, 3).Value = Producty.Range("Volum").Value
.Cells(nextRow, 4).Value = Producty.Range("Price").Value
.Cells(nextRow, 5).Value = Producty.Range("Volum").Value * Producty.Range("Price").Value


наименования «Volum» и «Price» означают названия, которые мы присвоили полям «Количество» и «Цена» в той же форме ввода.

В этих же строках, которые мы указали выше, цифры «2», «3», «4», «5» означают номера столбцов на листе Excel, соответствующих колонкам «Наименование товара», «Количество», «Цена» и «Сумма». Поэтому, если в вашем случае таблица сдвинута, то нужно указать соответствующие номера столбцов. Если столбцов больше, то по аналогии нужно добавить её строки в код, если меньше – то убрать лишние.

В строке производится умножение количества товара на его цену:

.Cells(nextRow, 5).Value = Producty.Range("Volum").Value * Producty.Range("Price").Value

Результат, как видим из синтаксиса записи, будет выводиться в пятый столбец листа Excel.

В этом выражении выполняется автоматическая нумерация строк:


If nextRow > 2 Then
Range("A2").Select
Selection.AutoFill Destination:=Range("A2:A" & nextRow)
Range("A2:A" & nextRow).Select
End If


Все значения «A2» означают адрес первой ячейки, где будет производиться нумерация, а координаты «A» — адрес всего столбца с нумерацией. Проверьте, где именно будет выводиться нумерация в вашей таблице и измените данные координаты в коде, если это необходимо.

В строке производится очистка диапазона формы ввода данных после того, как информация из неё была перенесена в таблицу:

.Range("Diapason").ClearContents

Не трудно догадаться, что («Diapason») означает наименование того диапазона, который мы ранее присвоили полям для ввода данных. Если вы дали им другое наименование, то в этой строке должно быть вставлено именно оно.

Дальнейшая часть кода универсальна и во всех случаях будет вноситься без изменений.

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

10.05.2015

Обработка результатов анкетирования в Excel

Достаточно значимый процент клиентов желает видеть выходные данные после обработки бумажных анкет в электронных таблицах. Речь идет о программе Excel из офисного пакета Microsoft Office. Как правило, пользователи хорошо знакомы с данным продуктом по причине его популярности и простоты использования. Программа позволяет оперативно найти данные из любой анкеты, сделать отчет или построить график. Несмотря на очевидные удобства, есть и существенный недостаток. Достоверно точная информация находится на бумажном носителе или сканированной копии, а в программу Excel эта информация попадает после обработки и распознавания. Проще говоря, информация в электронной таблице может содержать ошибки:

• Ошибки распознавателя. Не существует решений, которые могут распознавать информацию со 100% точностью. Можно добиться результата близкого к 100%.
• Человеческий фактор. Иногда люди игнорируют требования к полям документов и заполняют их на свое усмотрение.

Обработка анкет в Excel с использованием макроса

Компании, которые предоставляют услуги по обработке анкет и распознаванию документов, как правило, подобной информацией не афишируют, и в результате страдает потребитель. Простая проверка (соответствие информации в электронной таблице Excel с бумажной анкетой или ее сканированной копией) будет отнимать много времени. Переключение окон программ, поиск нужных файлов, концентрация внимания на изображении и ячейке, которые нуждаются в проверке. А что, если количество анкет исчисляется в десятках тысяч?
 

Наиболее приемлемым вариантом решения этой задачи является отображение части сканированной анкеты прямо в электронной таблице Excel по некоторому событию (двойной клик, выделение ячейки). Это позволит максимально быстро сопоставить информацию и убедиться в правильном ответе. Для реализации этой задачи потребуется создать

макрос

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

При обработке

опросных листов

в Excel с большим количеством меток можно создать

макрос

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

Надеемся, теперь стало понятно, почему при обработке анкет и последующей работе с данными в электронных таблицах Excel желательно использовать макросы. Любая логика, прописанная в коде макроса, будет способствовать большей гибкость и точности результативных данных. Макросы являются отличным инструментом для коррекции результатов распознавания.

Читать другие новости…

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

Самое простое и эффективное решение в такой ситуации — использовать новую возможность бесплатного майкрософтовского облачного сервиса SkyDrive и создать на его основе веб-опрос. Участники смогу зайти на специальную страницу в интернете и ответить на вопросы в созданной вами форме. Причем результаты будут автоматически собираться в вашу таблицу Excel.

Поехали, по шагам…

Шаг 1. Создаем опрос в SkyDrive

Для тех, кто не в теме: www.skydrive.com — это бесплатный облачный сервис Microsoft, где любой желающий бесплатно получает 7 Гб места для размещения своих файлов. Само собой, Skydrive всячески интегрирован с Office и Windows и позволяет получать доступ к вашим файлам и даже работать с ними с помощью встроенного интернет-варианта Office — Office WebApps. Файлы, помещенные в папку Skydrive на одном из ваших компьютеров, автоматически синхронизируются с облачным хранилищем и почти мгновенно становятся вам доступны на всех ваших подключенных к сервису устройствах (домашний ПК, ноутбук, смартфон, планшет и т.д.) Короче, весьма удобная вещь. Если еще не используете — советую взять на вооружение.

На вашей странице в SkyDrive в верхнем меню создания папок и файлов выбираем пункт для создания опроса Создать — Опрос Excel (Create — Excel survey):

На следующем шаге нам предложат придумать имя файла, куда будут автоматически помещены собранные результаты (файл будет находится в корне вашего хранилища SkyDrive):

Жмем кнопку Создать (Create) и переходим к созданию начинки нашего опроса.

Шаг 2. Создаем вопросы

После создания файла на экране появится форма опроса. В верхней части сразу можно ввести название вашего опроса и его краткое описание, которое увидят участники. Затем можно переходить к созданию вопросов с помощью кнопки Добавить вопрос (Add New Question). Параметры каждого вопроса задаются простой формой с несколькими полями:

• Вопрос (Question) — собственно, сам вопрос
• Подзаголовок вопроса (Question Subtitle) — комментарий к вопросу или уточнение (если есть)
• Тип отклика (Response Type) — ожидаемый тип данных ответа на вопрос. Поддерживаются несколько стандартных вариантов (текст, число, дата, время, выпадающий список, да/нет):

  

• Обязательно (Required) — обязателен ли ответ на этот вопрос (можно ли его пропустить и не отвечать на него)
• Ответ по-умолчанию (Default Answer) — если пользователь не ввел свой вариант ответа, то будет использован этот вариант

Количество вопросов не ограничено.

Шаг 3. Публикация опроса и сбор данных

Когда ввели все вопросы в форме создания отчета — жмем кнопку Опубликовать опрос (Share Survey) внизу окна и переходим к публикации опроса. Skydrive сформирует ссылку на созданную веб-страницу с отчетом и покажет ее нам:

Эту ссылку мы должны разослать нашим потенциальным участникам опроса. Зайдя по ссылке, они увидят вот такую красоту:

Обратите вниманию, что у участников опроса может не быть регистрации на SkyDrive — это не обязательно.

Собранные результаты мы всегда сможем увидеть в Excel Web App, если откроем наш файл Результаты опроса.xlsx, который был автоматически создан в корне хранилища SkyDrive:

Причем, никто не мешает вам немного «допилить» этот файл, добавив пару формул или диаграмму, чтобы представить собранные данные в более удобной форме:

При необходимости, можно открыть наш файл в полноценной настольной версии Microsoft Excel с помощью кнопки OPEN IN EXCEL в верхней части веб-страницы. Связь с исходным файлом из SkyDrive при этом не теряется.

Посмотреть, как этот работает вживую 

Microsoft Excel Web App позволяет даже встроить живой фрагмент созданного файла в вашу веб-страницу или блог (кнопка Share — Embed на вкладке HOME). Выглядеть это будет примерно так:

Правда, здорово? 🙂

Ссылки по теме

• www.skydrive.com
• Приложения (Windows, Mac, iPhone и iPad) для синхронизации папок с сервисом SkyDrive

В разделе Программное обеспечение на вопрос Как в Excel сделать Опрос? Пример пишем несколько вариантов и надо сделать как опрос выбераю то, что нужно и далее.. заданный автором Невроз лучший ответ это А в чем, собственно, проблема ?
Под вопросом давай варианты ответов
Отвечать можно через флажок (3 верхних) или переключатель ( три нижних)

Ответ от

2 ответа

Привет! Вот подборка тем с ответами на Ваш вопрос: Как в Excel сделать Опрос? Пример пишем несколько вариантов и надо сделать как опрос выбераю то, что нужно и далее..

Как сделать сетку для кроссворда?

метки:

Кроссворды Сетки Какие знания, навыки и умения нужны для работы офис-менеджером без опыта?

метки:

Знания Навыки Как сделать сетку для кроссворда?

метки:

Кроссворды Сетки Как в Excel сделать Опрос? Пример пишем несколько вариантов и надо сделать как опрос выбераю то, что нужно и далее.. Вашу машину специально заблокировали на парковке , хозяина тачки в ней нет, а вы спешите. Что делать?…=))))

метки:

Парки Токио Право Ганы

Шаблоны Excel являются очень полезным инструментом для проведения опросы, так как программа Excel дает нам все необходимое, чтобы создать анкету на которую легко ответить и облегчающую экстракцию данных.

Как сделать анкета в Excel

Один из важных инструментов в опросы , сделанных на основе расчётных листов, являются функции Excel , так как благодаря им мы можем лучше управлять всей информации, полученной из анкет. Мы не только используем функции, используемые в шаблонах базы данных, но также мы можем сделать диаграммы, которые дают нам наглядную информацию о собираемых данных и позволяют нам делать профессиональные отчёты о нашем исследовании. Поэтому существует ряд элементов расчётного листа, которые мы должны учитывать когда мы делаем опрос в Excel:

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

Опрос для скачивания в Excel

Еще одним преимуществом шаблонов Excel, является то, что мы можем сделать анкеты для скачивания или анкеты онлайн. На самом деле, в шаблонах Excel для бесплатного скачивания нужно только заполнить ячейки нашими данными и поменять вопросы на те, которые нас интересуют. Автоматически, будут собраны данные и будут произведены диаграммы отражающие нашу информацию.

Если вам приходилось работать с таблицами из множества колонок, да еще к концу рабочего дня и в условиях дефицита времени, то, наверняка, вы случайно вводили данные в ячейку не той строки, в лучшем случае спохватывались и исправляли ошибку сразу, в худшем — ошибка выплывала позже в самый неподходящий момент. Как защитить себя от подобных ситуаций? Есть очень удобное средство — формы. Их созданию и работе с ними посвящена эта статья.

Начнем с того, что не во всех версиях Excel сразу доступна волшебная кнопка Форма. В этом случае предварительно настройте Параметры (перейти к ним можно на вкладке Файл). Здесь вы также можете сразу не найти то, что нужно добавить на ленту. Поэтому сначала измените вариант в поле Выбрать команды (в данном случае нужен вариант Все команды). Чтобы добавить найденную в списке команду Форма, нужно выбрать имя вкладки, где разместится кнопка и создать новую группу. Теперь щелкните по кнопке Добавить и проверьте, появилась ли новая команда в новой группе.

После этих манипуляций на вкладке Данные появится группа Работа с формами (это название задаете вы, когда создаете группу при настройке параметров Excel), а в ней нужная вам кнопка.

Форму нельзя создать, если шапка таблицы занимает несколько строк — это минус.

Но здесь можно «схитрить»: вставьте после настоящей шапки пустую строку, оформите заголовки строк в одну строку, для этой строки после создания формы установите нулевую высоту (Формат — Размер ячеек —Высота строки —).

Осталось только щелкнуть на любой ячейке таблицы и на кнопке Форма. Готово, можно работать. Вы видите строку, относящуюся только к одному человеку, причем все названия граф в одной форме. Названия кнопок — настоящие подсказки для пользователя. Нужна новая строка — Добавить, не нужна существующая — Удалить, нужно перейти к какой-либо впереди — Далее, позади — Назад.

Единственной «неочевидной» является кнопка Критерии. Она позволяет включать фильтр, чтобы быстрее находить нужные строки, если их очень много. При задании критерия можно использовать такие знаки, как «*» и «?», критериев может быть несколько (но задать их нужно в пределах одного окна). Для отключения фильтра используйте кнопку Правка.

Выбор поля формы можно делать щелчком мыши или клавишей ТАВ. Добавлять новую строку в таблицу можно с помощью соответствующей кнопки или нажатием ENTER, когда заполнено последнее поле.

Конечно, использовать ли форму или работать с таблицей напрямую, решать вам. Но чтобы выбрать оптимальный способ работы, нужно попробовать разные варианты. Сведения о форме в Excel из этой статьи помогут вам это сделать.

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

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

Как создать таблицу в Excel для чайников

Работа с таблицами в Excel для чайников не терпит спешки. Создать таблицу можно разными способами и для конкретных целей каждый способ обладает своими преимуществами. Поэтому сначала визуально оценим ситуацию.

Посмотрите внимательно на рабочий лист табличного процессора:

Это множество ячеек в столбцах и строках. По сути – таблица. Столбцы обозначены латинскими буквами. Строки – цифрами. Если вывести этот лист на печать, получим чистую страницу. Без всяких границ.

Сначала давайте научимся работать с ячейками, строками и столбцами.

Как выделить столбец и строку

Чтобы выделить весь столбец, щелкаем по его названию (латинской букве) левой кнопкой мыши.

Для выделения строки – по названию строки (по цифре).

Чтобы выделить несколько столбцов или строк, щелкаем левой кнопкой мыши по названию, держим и протаскиваем.

Для выделения столбца с помощью горячих клавиш ставим курсор в любую ячейку нужного столбца – нажимаем Ctrl + пробел. Для выделения строки – Shift + пробел.

Как изменить границы ячеек

Если информация при заполнении таблицы не помещается нужно изменить границы ячеек:

1. Передвинуть вручную, зацепив границу ячейки левой кнопкой мыши.
2. Когда длинное слово записано в ячейку, щелкнуть 2 раза по границе столбца / строки. Программа автоматически расширит границы.
3. Если нужно сохранить ширину столбца, но увеличить высоту строки, воспользуемся кнопкой «Перенос текста» на панели инструментов.

Для изменения ширины столбцов и высоты строк сразу в определенном диапазоне выделяем область, увеличиваем 1 столбец /строку (передвигаем вручную) – автоматически изменится размер всех выделенных столбцов и строк.

Примечание. Чтобы вернуть прежний размер, можно нажать кнопку «Отмена» или комбинацию горячих клавиш CTRL+Z. Но она срабатывает тогда, когда делаешь сразу. Позже – не поможет.

Чтобы вернуть строки в исходные границы, открываем меню инструмента: «Главная»-«Формат» и выбираем «Автоподбор высоты строки»

Для столбцов такой метод не актуален. Нажимаем «Формат» — «Ширина по умолчанию». Запоминаем эту цифру. Выделяем любую ячейку в столбце, границы которого необходимо «вернуть». Снова «Формат» — «Ширина столбца» — вводим заданный программой показатель (как правило это 8,43 — количество символов шрифта Calibri с размером в 11 пунктов). ОК.

Как вставить столбец или строку

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

Нажимаем правой кнопкой мыши – выбираем в выпадающем меню «Вставить» (или жмем комбинацию горячих клавиш CTRL+SHIFT+»=»).

Отмечаем «столбец» и жмем ОК.

Совет. Для быстрой вставки столбца нужно выделить столбец в желаемом месте и нажать CTRL+SHIFT+»=».

Все эти навыки пригодятся при составлении таблицы в программе Excel. Нам придется расширять границы, добавлять строки /столбцы в процессе работы.

Пошаговое создание таблицы с формулами

1. Заполняем вручную шапку – названия столбцов. Вносим данные – заполняем строки. Сразу применяем на практике полученные знания – расширяем границы столбцов, «подбираем» высоту для строк.
2. Чтобы заполнить графу «Стоимость», ставим курсор в первую ячейку. Пишем «=». Таким образом, мы сигнализируем программе Excel: здесь будет формула. Выделяем ячейку В2 (с первой ценой). Вводим знак умножения (*). Выделяем ячейку С2 (с количеством). Жмем ВВОД.
3. Когда мы подведем курсор к ячейке с формулой, в правом нижнем углу сформируется крестик. Он указываем на маркер автозаполнения. Цепляем его левой кнопкой мыши и ведем до конца столбца. Формула скопируется во все ячейки.
4. Обозначим границы нашей таблицы. Выделяем диапазон с данными. Нажимаем кнопку: «Главная»-«Границы» (на главной странице в меню «Шрифт»). И выбираем «Все границы».

Теперь при печати границы столбцов и строк будут видны.

С помощью меню «Шрифт» можно форматировать данные таблицы Excel, как в программе Word.

Поменяйте, к примеру, размер шрифта, сделайте шапку «жирным». Можно установить текст по центру, назначить переносы и т.д.

Как создать таблицу в Excel: пошаговая инструкция

Простейший способ создания таблиц уже известен. Но в Excel есть более удобный вариант (в плане последующего форматирования, работы с данными).

Сделаем «умную» (динамическую) таблицу:

1. Переходим на вкладку «Вставка» — инструмент «Таблица» (или нажмите комбинацию горячих клавиш CTRL+T).
2. В открывшемся диалоговом окне указываем диапазон для данных. Отмечаем, что таблица с подзаголовками. Жмем ОК. Ничего страшного, если сразу не угадаете диапазон. «Умная таблица» подвижная, динамическая.

Примечание. Можно пойти по другому пути – сначала выделить диапазон ячеек, а потом нажать кнопку «Таблица».

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

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

Как работать с таблицей в Excel

С выходом новых версий программы работа в Эксель с таблицами стала интересней и динамичней. Когда на листе сформирована умная таблица, становится доступным инструмент «Работа с таблицами» — «Конструктор».

Здесь мы можем дать имя таблице, изменить размер.

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

Возможности динамических электронных таблиц MS Excel огромны. Начнем с элементарных навыков ввода данных и автозаполнения:

1. Выделяем ячейку, щелкнув по ней левой кнопкой мыши. Вводим текстовое /числовое значение. Жмем ВВОД. Если необходимо изменить значение, снова ставим курсор в эту же ячейку и вводим новые данные.
2. При введении повторяющихся значений Excel будет распознавать их. Достаточно набрать на клавиатуре несколько символов и нажать Enter.
3. Чтобы применить в умной таблице формулу для всего столбца, достаточно ввести ее в одну первую ячейку этого столбца. Программа скопирует в остальные ячейки автоматически.
4. Для подсчета итогов выделяем столбец со значениями плюс пустая ячейка для будущего итога и нажимаем кнопку «Сумма» (группа инструментов «Редактирование» на закладке «Главная» или нажмите комбинацию горячих клавиш ALT+»=»).

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

Иногда пользователю приходится работать с огромными таблицами. Чтобы посмотреть итоги, нужно пролистать не одну тысячу строк. Удалить строки – не вариант (данные впоследствии понадобятся). Но можно скрыть. Для этой цели воспользуйтесь числовыми фильтрами (картинка выше). Убираете галочки напротив тех значений, которые должны быть спрятаны.