Загляните adme.ru
пятница, 27 ноября 2015 г.
среда, 25 ноября 2015 г.
.color
| Color Name | Constant | Value | Color |
| Black | vbBlack | &h00 | |
| Red | vbRed | &hFF | |
| Green | vbGreen | &hFF00 | |
| Yellow | vbYellow | &hFFFF | |
| Blue | vbBlue | &hFF0000 | |
| Magenta | vbMagenta | &hFF00FF | |
| Cyan | vbCyan | &hFFFF00 | |
| White | vbWhite | &hFFFFFF |
воскресенье, 22 ноября 2015 г.
Vba
[Как применяется VBA в Excel - VBA программирование (office)] хорошо, посмотри! http://sd-company.su/article/vba/excel
Советы по работе vba excel
[Несколько советов по работе с VBA в Excel / Geektimes] хорошо, посмотри! http://m.geektimes.ru/post/112458/
Range
Cells, Columns, Rows - ячейки, столбцы, строки
Свойство Cells позволяет обращаться к отдельным ячейкам в диапазоне. При работе с этим свойством в отдельном диапазоне ячеек нумерация ячеек ведется по собственной системе координат. Иными словами, диапазон выступает как небольшой виртуальный рабочий лист: левая верхняя ячейка диапазона получает индекс (1, 1), ячейка, расположенная во втором столбце и третьей строке диапазона, - индекс (3,2) и т.д. Свойства Columns и Rows возвращают, соответственно, коллекции, которые содержат столбцы и строки диапазона. Например, так (листинг 15.18.) можно узнать количество строк в диапазоне, ссылка на который хранится в переменной obj_Range. num_Rows = obj_Range.Rows.Count Листинг 15.18. Количество строк в диапазоне Воспользуемся свойством Cell для диапазона размером 6х5 ячеек, чтобы заполнить этот диапазон данными (листинг 15.19.).
Свойство Cells позволяет обращаться к отдельным ячейкам в диапазоне. При работе с этим свойством в отдельном диапазоне ячеек нумерация ячеек ведется по собственной системе координат. Иными словами, диапазон выступает как небольшой виртуальный рабочий лист: левая верхняя ячейка диапазона получает индекс (1, 1), ячейка, расположенная во втором столбце и третьей строке диапазона, - индекс (3,2) и т.д. Свойства Columns и Rows возвращают, соответственно, коллекции, которые содержат столбцы и строки диапазона. Например, так (листинг 15.18.) можно узнать количество строк в диапазоне, ссылка на который хранится в переменной obj_Range. num_Rows = obj_Range.Rows.Count Листинг 15.18. Количество строк в диапазоне Воспользуемся свойством Cell для диапазона размером 6х5 ячеек, чтобы заполнить этот диапазон данными (листинг 15.19.).
суббота, 21 ноября 2015 г.
Справочник vba
[План учебного курса Программирование в Microsoft Office для пользователей - AskIt.RU] хорошо, посмотри! http://www.askit.ru/custom/vba_office/vba_office_plan.htm
Range vba excel свойства и методы
Объект Excel.Range, программная работа с ячейками и диапазонами (наборами) ячеек средствами VBA, создание объекта Excel.Range, свойства, методы и события объекта Excel.Range
Пожалуй, наиболее часто используемый объект в иерархии объектной модели Excel — это объект Range. Этот объект может представлять одну ячейку, несколько ячеек (в том числе несмежные ячейки или наборы несмежных ячеек) или целый лист. Если в Word вы могли для ввода данных использовать как объект Range, так и объект Selection, то в Excel все сводится к объекту Range:
если вам нужно ввести данные в ячейку или отформатировать ее, то вы должны получить объект Range, представляющий эту ячейку;
если вы хотите сделать что-то с выделенными вами ячейками, вам необходимо получить объект Range, представляющий выделение;
если вам нужно просто что-то сделать с группой ячеек, первое ваше действие — опять-таки получить объект Range, представляющий эту группу ячеек.
В Microsoft Knowledge Base есть статья под номером 291308, в котором описываются 22 способа получения объекта Range в Excel. Вряд ли вы будете пользоваться всеми эти способами. Мы рассмотрим только самые распространенные:
самый простой и очевидный способ — воспользоваться свойством Range. Это свойство предусмотрено для объектов Application, Worksheet и самого объекта Range (если вы решили создать новый диапазон на основе уже существующего). Например, получить ссылку на объект Range, представляющий ячейку A1, можно так:
Vba электронная почта
Отсылка электронной почты
Отсылка электронной почты с данными рабочего листа может производится при помощи средств Microsoft Outlook.
Листинг 16. Отсылка электронной почты
Private Sub cmdEMail_Click()
Dim objOL As New Outlook.Application
Dim objMail As MailItem
Set objOL = New Outlook.Application
Set objMail = objOL.CreateItem(olMailItem)
With objMail .To = Range("B1")
.Value .Body = Range("B2")
.Value .Subject = Range("B3")
.Value .CC = Range("B4")
.Value .Display
End With
Set objMail = Nothing
Set objOL = Nothing
End Sub
Private Sub cmdEMail_Click()
Dim objOL As New Outlook.Application
Dim objMail As MailItem
Set objOL = New Outlook.Application
Set objMail = objOL.CreateItem(olMailItem)
With objMail .To = Range("B1")
.Value .Body = Range("B2")
.Value .Subject = Range("B3")
.Value .CC = Range("B4")
.Value .Display
End With
Set objMail = Nothing
Set objOL = Nothing
End Sub
Выделение диапазона в vba
Выбор прямоугольного диапазона ячеек
Для выбора прямоугольного диапазона ячеек вокруг определенной ячейки следует использовать метод CurrentRegion. При помощи метода CurrentRegion выбирается диапазон, ограниченный пустыми строками и столбцами в любом сочетании. Применение метода CurrentRegion поясняется приведенным ниже примером.
ActiveSheet.Range("a1").CurrentRegion.Select
Выполнение этого кода приводит к выбору ячеек с A1 по C4. Ниже приведены другие способы выбора того же диапазона ячеек.
ActiveSheet.Range("a1", _ ActiveSheet.Range("a1").End(xlDown).End(xlToRight)).Select
-или-
ActiveSheet.Range("a1:" & _ ActiveSheet.Range("a1").End(xlDown).End(xlToRight).Address).Select
В некоторых случаях может понадобиться выбрать ячейки A1-C6. В данном примере метод CurrentRegion не сработает из-за пустой строки 5. Приведенные ниже примеры позволяют выбрать все ячейки.
lastCol = ActiveSheet.Range("a1").End(xlToRight).Column lastRow = ActiveSheet.Cells(65536, lastCol).End(xlUp).Row ActiveSheet.Range("a1", ActiveSheet.Cells(lastRow, lastCol)).Select
-или-
lastCol = ActiveSheet.Range("a1").End(xlToRight).Column lastRow = ActiveSheet.Cells(65536, lastCol).End(xlUp).Row ActiveSheet.Range("a1:" & _ ActiveSheet.Cells(lastRow, lastCol).Address).Select
ActiveSheet.Range("a1").CurrentRegion.Select
Выполнение этого кода приводит к выбору ячеек с A1 по C4. Ниже приведены другие способы выбора того же диапазона ячеек.
ActiveSheet.Range("a1", _ ActiveSheet.Range("a1").End(xlDown).End(xlToRight)).Select
-или-
ActiveSheet.Range("a1:" & _ ActiveSheet.Range("a1").End(xlDown).End(xlToRight).Address).Select
В некоторых случаях может понадобиться выбрать ячейки A1-C6. В данном примере метод CurrentRegion не сработает из-за пустой строки 5. Приведенные ниже примеры позволяют выбрать все ячейки.
lastCol = ActiveSheet.Range("a1").End(xlToRight).Column lastRow = ActiveSheet.Cells(65536, lastCol).End(xlUp).Row ActiveSheet.Range("a1", ActiveSheet.Cells(lastRow, lastCol)).Select
-или-
lastCol = ActiveSheet.Range("a1").End(xlToRight).Column lastRow = ActiveSheet.Cells(65536, lastCol).End(xlUp).Row ActiveSheet.Range("a1:" & _ ActiveSheet.Cells(lastRow, lastCol).Address).Select
Книги по vba
[Учебники, справочники, самоучители - VBA - CyberForum.ru] хорошо, посмотри! http://www.cyberforum.ru/vba/thread432513.html
Справочник VBA (русский)
[Справочник по языку Visual Basic] хорошо, посмотри! https://msdn.microsoft.com/ru-ru/library/sh9ywfdk.aspx
четверг, 19 ноября 2015 г.
среда, 18 ноября 2015 г.
Сводная таблица
Private Sub Worksheet_Activate()
Dim PTRange As Range
Set PTRange = Sheets("Sheet1").Range("A1").CurrentRegion
ActiveSheet.PivotTables("PivotTable2").ChangePivotCache
ActiveWorkbook.PivotCaches.Create _ (SourceType:=xlDatabase, SourceData:= _
PTRange, Version:=xlPivotTableVersion10)
'Refresh PT.
ActiveSheet.PivotTables("PivotTable2").PivotCache.Refresh
End Sub
Dim PTRange As Range
Set PTRange = Sheets("Sheet1").Range("A1").CurrentRegion
ActiveSheet.PivotTables("PivotTable2").ChangePivotCache
ActiveWorkbook.PivotCaches.Create _ (SourceType:=xlDatabase, SourceData:= _
PTRange, Version:=xlPivotTableVersion10)
'Refresh PT.
ActiveSheet.PivotTables("PivotTable2").PivotCache.Refresh
End Sub
вторник, 17 ноября 2015 г.
Сводная таблица создание обновлнение
[Excel (VBA) Сводные таблицы. Создание. Обновление. / Visual Basic / Sql.ru] хорошо, посмотри! sql.ru
Range (часть 2)
[Работа с объектом Range (часть 2) - Макросы и программы VBA - Excel - Каталог статей - Perfect Excel] хорошо, посмотри! perfect-excel.ru
понедельник, 16 ноября 2015 г.
Полный справочник VBA
[https://msdn.microsoft.com/en-us/library/office/ee861528.aspx] хорошо, посмотри!
Perch 1.1.4
Приложение Perch отлично подойдет для тех людей, у которых есть лишнее неиспользуемое устройство. Программа позволяет превратить какой-нибудь старый планшет или телефон из шкафа в полноценную камеру наблюдения за одной из комнат в вашем доме. Настройка очень проста: сначала нужно установить приложение Perch на устройство, с помощью которого вы бы хотели удаленно видеть свой дом, поставить аппарат таким образом, чтобы его камера давала нужный вам обзор, а потом зайти на сайт GetPerch.com с другого девайса и залогиниться в нем под тем аккаунтом, который был создан в программе. После этого вам будет доступно живое видео с установленного аппарата.
Среди дополнительных настроек стоит отметить установку зоны мониторинга — когда смартфон изменит свое положение (кто-то его уберет или подвинет), в этот момент пользователь получит уведомление, а также появится отметка на записывающемся видео. Также Perch предлагает подключить к одному аккаунту сразу несколько устройств с камерами. Родителям понравится функция, которая позволит разговаривать с ребенком через подключенный аппарат. Скачать приложение Perch для Android можно на Трешбоксе.
воскресенье, 15 ноября 2015 г.
Range
[Факультет Математики и Информатики ГрГУ: Свойства CurrentRegion и UsedRange] хорошо, посмотри! mf.grsu.by
Range все предести
[Выбор ячеек и диапазонов ячеек в Excel с помощью процедур Visual Basic] хорошо, посмотри! support.microsoft.com
суббота, 14 ноября 2015 г.
Range vba 2
[Работа с объектом Range (часть 2) - Макросы и программы VBA - Excel - Каталог статей - Perfect Excel] хорошо, посмотри! perfect-excel.ru
Range vba
[Работа с объектом Range - Макросы и программы VBA - Excel - Каталог статей - Perfect Excel] хорошо, посмотри! http://perfect-excel.ru/publ/excel/makrosy_i_programmy_vba/rabota_s_obektom_range/7-1-0-56
Фукции vba
[Функции VBA | Excel для всех] хорошо, посмотри! http://www.excel-vba.ru/general/funkcii-vba/
среда, 11 ноября 2015 г.
#ЗНАЧ!
[Как в ячейке с формулой вместо ошибки показать 0 | Excel для всех] хорошо, посмотри! http://www.excel-vba.ru/chto-umeet-excel/kak-v-yachejke-s-formuloj-vmesto-oshibki-pokazat-0/
Замена звездочки
[Как заменить/удалить/найти звездочку? | Excel для всех] хорошо, посмотри! http://www.excel-vba.ru/chto-umeet-excel/kak-zamenitudalitnajti-zvezdochku/
понедельник, 9 ноября 2015 г.
VBA и сводная таблица
[Excel (VBA) Сводные таблицы. Создание. Обновление. / Visual Basic / Sql.ru] хорошо, посмотри! http://www.sql.ru/forum/236836/excel-vba-svodnye-tablicy-sozdanie-obnovlenie
Sub SvodTable() Dim i As Integer Dim s As String
пятница, 6 ноября 2015 г.
Последняя заполненная ячейка
[Как определить последнюю ячейку на листе через VBA? | Excel для всех] хорошо, посмотри! http://www.excel-vba.ru/chto-umeet-excel/kak-opredelit-poslednyuyu-yachejku-na-liste-cherez-vba/
VBA. Количество заполненых строк на листе] хорошо, посмотри! http://www.planetaexcel.ru/forum/?FID=8&PAGE_NAME=read&TID=4115
[Поиск последней строки или столбца на листе Excel] хорошо, посмотри! http://vba-help.ru/primerVBA/VBA-excel-primer/poisk-stroki-stolb-excel/
[Ищем последнюю строку при помощи VBA | My Excel] хорошо, посмотри! http://myexcel.ru/content/ishchem-poslednyuyu-stroku-pri-pomoshchi-vba
Перевод даты в текстовом формате в формат даты
Из 1С сохраняю таблицу и даты переходят в эксель в виде 01.02.2010 (1 февраля). При этом эксель рассматривает их как текст. Попытки преврать это в дату с помощью Формата ни к чему не приводят. Однако, стоит дважды щелкнуть по ячейке (или нажать Enter), как текст превращается в дату (внешне при этом не меняясь). Также, если я руками ввожу 01.02.2010, эксель так же рассматривает это как дату.
Как мне преобразовать сотни ячеек в даты? Очень желательно НЕ использовать формулы, так как это придется делать часто, таблицы и так перегружены формулами. Хотелось бы просто выделить колонку, и за пару быстрых действий все преобразовать. Это возможно?
Эксель русскоязычный.
Ручной способ: выделить столбец с этими "датами" - Найти и заменить (Ctrl+H) заменить "." на "." (Точку на точку), заменить все.
Метод с формулами: =ЗНАЧЕН(B8) , где B8 - ячейка с датой, которая воспринимается как текст.
Я нашел возможно самое простое. Выделить колонку и заменить точку на точку. Тогда даже формат не изменится.