[TOP лучших приложений для записи звука на Android]: Посмотри! https://trashbox.ru/link/top-android-record
Страницы
Ярлыки
1С
(16)
1С 8.3
(1)
2GIS
(1)
автоактивация
(3)
Активация
(3)
Андроид
(113)
Антивирус
(2)
Аудио
(2)
биоритмы
(1)
Блок питания
(22)
боль в спине
(1)
браузер
(2)
бросить курить
(1)
буквы соответствие
(1)
бумажник
(1)
бюджетирование
(1)
ВАЗ 2110
(1)
вацап
(1)
видеонаблюдение
(8)
Видеосвязь
(1)
гаджет
(1)
Галстук
(1)
геокоординаты
(1)
дача
(1)
для дома
(1)
дом
(2)
драйвера
(6)
Дубликаты
(1)
еда
(1)
запись
(1)
Зарядка акб
(1)
Зарядное устройство
(1)
звук
(4)
здоровье
(8)
знаки зодиака
(1)
зрение
(1)
игнтернет
(1)
иероглифы
(1)
Изделия из дерева
(1)
Интернет
(10)
Интернет-магазины
(3)
Кино
(1)
ключница
(1)
Книги Журналы
(1)
кожаная обувь
(4)
командная строка
(1)
конвертор
(1)
кошелек
(1)
кресло-качалка
(1)
кухня
(2)
Лекарства
(1)
логика
(1)
макрос
(1)
медицина
(1)
мозги
(1)
морщины
(2)
мтс
(1)
музыка
(9)
мультики
(1)
Мыльные_пузыри
(1)
Натуральная кожа
(56)
Облако
(1)
омск
(1)
Он Лаин библиотеки
(1)
органайзер
(1)
оригами
(1)
Отбеливание
(1)
отслеживание посылок
(1)
Папка
(1)
Пароли
(2)
пароль
(3)
партмоне
(1)
парфюм
(1)
переименование файлов
(1)
питание
(1)
Планшет
(5)
поза сна
(1)
поздравление
(1)
поиск
(1)
поиск дублей
(1)
поисковик
(1)
Полезные сайты
(1)
портабле
(2)
принтер
(4)
Программы
(58)
простуда
(1)
расширения
(1)
редактор музыкальных файлов
(1)
Русский язык
(1)
рут
(2)
сеть
(8)
Скрыть информацию
(1)
Стиль
(1)
стихи
(2)
сумка
(1)
суставы
(3)
теги
(1)
трек-номер
(1)
тренинг
(1)
тренинг памяти
(1)
удаленный доступ
(2)
узлы
(1)
УНЧ
(3)
Управление компьютером
(2)
Управленческий учет
(2)
Успокоительные средства
(1)
фильмы
(2)
Флешка
(53)
фото
(2)
цвета в одежде
(1)
цена
(1)
экран не гаснет
(1)
эл почта
(2)
Ютуб
(1)
Access
(10)
Acronis True Image WD Edition
(1)
AliExpress
(1)
ALT-коды
(1)
audi
(1)
Avira Antivirus
(1)
bat
(2)
BIOS
(4)
chrom
(15)
Chrome
(2)
Cube iPlay 10 U83
(1)
Dism++
(2)
epson 1260
(1)
ERD Commander
(1)
Excel
(42)
Faceter
(1)
Firefox
(1)
GHOST32
(4)
gif анимация
(1)
Google
(1)
Google Hrome
(1)
Google Play
(1)
Grub4Dos
(7)
HDD
(1)
Honor
(1)
HP USB Disk Storage Tool
(1)
IPTV
(1)
KPI
(1)
Linux
(16)
NirCmd
(1)
office
(4)
PDF
(1)
Pinterest
(1)
portable
(2)
Prestigio3502
(1)
Rufus
(2)
SSD
(1)
torrent
(1)
UEFI
(1)
VBA
(42)
WEB ресурсы
(2)
WiFi
(2)
Windows
(77)
Windows 10
(5)
Windows 11
(2)
Windows 7
(24)
YouTube
(15)
понедельник, 27 июня 2016 г.
воскресенье, 26 июня 2016 г.
Интернет магазины
Бюдгаджеты недели: доступная электроника, которая нас удивила http://lifehacker.ru/2016/06/18/byudgadzhet-53/
Как сделать сферическую фотографию
Как сделать сферическую фотографию и загрузить её в Facebook http://lifehacker.ru/2016/06/22/360-photos-facebook/
воскресенье, 19 июня 2016 г.
Подключение сетевого принтера в ОС Windows 7
Подключение сетевого принтера в ОС Windows 7.
Проверьте подключение вашего принтера с помощью веб-интерфейса, открыв любой браузер и ввести адресную строку http://192.168.1.1. В появившемся окне ввести логин и пароль (admin и admin, соответственно).
Далее заходим в меню Пуск — Панель управления — Устройства и принтеры — Добавить принтер (кнопка вверху). В появившемся окне выбираем «Добавить локальный принтер»: В следующем окне необходимо выбрать порт принтера (см. рис. 4). Перейдите в пункт «Создать новый порт» и выберите в выпадающем списке пункт Standart TCP/IP Port.
После нажатия кнопки «Далее» мастер установки принтера попросит IP адрес принтера в сети, IP адрес принтера соответствует IP-адресу роутера — 192.168.1.1. Укажите его в поле Имя или IP-адрес и снимите галку с пункта «Опросить принтер и выбрать драйвер автоматически». Нажимаем «Далее». Откроется окно «Поиск порта TCP/IP». Подождите пока не появится окно с требованием ввести дополнительные сведения о порте. Выберите тип устройства Обычное (Generic Network Card) и нажмите Далее: Теперь надо установить драйвер для принтера. Выберите из списка вашу модель или Нажмите на кнопку «Установить с диска…» и в проводнике укажите путь до файла с драйвером. Потом нажмите Далее. Введите любое имя принтера и снова жмите кнопку Далее. Появится окно с процессом установки принтера по завершении которого мастер установки предложит настроить общий доступ к принтеру через локальную сеть. Выберите вариант «Нет общего доступа к этому принтеру» и нажмите Далее. Мастер сообщит об успешной установке драйвера и предложит использовать принтер по умолчанию. Теперь осталось нажать кнопку «Готово» и настроить свойства порта. Откройте меню Пуск — Устройства и принтеры. Найдите ваш принтер, нажмите правой кнопкой мыши и выберите пункт «Свойства принтера». Перейдите к вкладке «Порты», поставьте галочку на порте, который создали ранее и нажмите на кнопку «Настроить порт…» В настройках TCP порта выберите протокол LPR и задайте Имя. Теперь нажмите «ОК» для сохранения настроек.
четверг, 16 июня 2016 г.
Оглавление папки VBA
Sub FileList()
Dim V As String
Dim BrowseFolder As String
'открываем диалоговое окно выбора папки
With Application.FileDialog(msoFileDialogFolderPicker)
.Title = "Выберите папку или диск"
.Show
On Error Resume Next
Err.Clear
V = .SelectedItems(1)
If Err.Number <> 0 Then
MsgBox "Вы ничего не выбрали!"
Exit Sub
End If
End With
BrowseFolder = CStr(V)
'добавляем лист и выводим на него шапку таблицы
ActiveWorkbook.Sheets.Add
With Range("A1:E1")
.Font.Bold = True
.Font.Size = 12
End With
Range("A1").Value = "Имя файла"
Range("B1").Value = "Путь"
Range("C1").Value = "Размер"
Range("D1").Value = "Дата создания"
Range("E1").Value = "Дата изменения"
ActiveSheet.Name = Format(Now(), "dd") & Format(Now(), "mmm") & Format(Now(), "hh_mm_ss")
'вызываем процедуру вывода списка файлов
'измените True на False, если не нужно выводить файлы из вложенных папок
ListFilesInFolder BrowseFolder, True
End Sub
Private Sub ListFilesInFolder(ByVal SourceFolderName As String, ByVal IncludeSubfolders As Boolean)
Dim FSO As Object
Dim SourceFolder As Object
Dim SubFolder As Object
Dim FileItem As Object
Dim r As Long
Set FSO = CreateObject("Scripting.FileSystemObject")
Set SourceFolder = FSO.getfolder(SourceFolderName)
r = Range("A65536").End(xlUp).Row + 1 'находим первую пустую строку
'выводим данные по файлу
For Each FileItem In SourceFolder.Files
Cells(r, 1).Formula = FileItem.Name
Cells(r, 2).Formula = "=HYPERLINK(""" & FileItem.Path & """)"
'Cells(r, 2).Formula = FileItem.Path
Cells(r, 3).Formula = FileItem.Size
Cells(r, 4).Formula = FileItem.DateCreated
Cells(r, 5).Formula = FileItem.DateLastModified
r = r + 1
X = SourceFolder.Path
Next FileItem
'вызываем процедуру повторно для каждой вложенной папки
If IncludeSubfolders Then
For Each SubFolder In SourceFolder.SubFolders
ListFilesInFolder SubFolder.Path, True
Next SubFolder
End If
Columns("A:E").AutoFit
Set FileItem = Nothing
Set SourceFolder = Nothing
Set FSO = Nothing
End Sub
Dim V As String
Dim BrowseFolder As String
'открываем диалоговое окно выбора папки
With Application.FileDialog(msoFileDialogFolderPicker)
.Title = "Выберите папку или диск"
.Show
On Error Resume Next
Err.Clear
V = .SelectedItems(1)
If Err.Number <> 0 Then
MsgBox "Вы ничего не выбрали!"
Exit Sub
End If
End With
BrowseFolder = CStr(V)
'добавляем лист и выводим на него шапку таблицы
ActiveWorkbook.Sheets.Add
With Range("A1:E1")
.Font.Bold = True
.Font.Size = 12
End With
Range("A1").Value = "Имя файла"
Range("B1").Value = "Путь"
Range("C1").Value = "Размер"
Range("D1").Value = "Дата создания"
Range("E1").Value = "Дата изменения"
ActiveSheet.Name = Format(Now(), "dd") & Format(Now(), "mmm") & Format(Now(), "hh_mm_ss")
'вызываем процедуру вывода списка файлов
'измените True на False, если не нужно выводить файлы из вложенных папок
ListFilesInFolder BrowseFolder, True
End Sub
Private Sub ListFilesInFolder(ByVal SourceFolderName As String, ByVal IncludeSubfolders As Boolean)
Dim FSO As Object
Dim SourceFolder As Object
Dim SubFolder As Object
Dim FileItem As Object
Dim r As Long
Set FSO = CreateObject("Scripting.FileSystemObject")
Set SourceFolder = FSO.getfolder(SourceFolderName)
r = Range("A65536").End(xlUp).Row + 1 'находим первую пустую строку
'выводим данные по файлу
For Each FileItem In SourceFolder.Files
Cells(r, 1).Formula = FileItem.Name
Cells(r, 2).Formula = "=HYPERLINK(""" & FileItem.Path & """)"
'Cells(r, 2).Formula = FileItem.Path
Cells(r, 3).Formula = FileItem.Size
Cells(r, 4).Formula = FileItem.DateCreated
Cells(r, 5).Formula = FileItem.DateLastModified
r = r + 1
X = SourceFolder.Path
Next FileItem
'вызываем процедуру повторно для каждой вложенной папки
If IncludeSubfolders Then
For Each SubFolder In SourceFolder.SubFolders
ListFilesInFolder SubFolder.Path, True
Next SubFolder
End If
Columns("A:E").AutoFit
Set FileItem = Nothing
Set SourceFolder = Nothing
Set FSO = Nothing
End Sub
понедельник, 13 июня 2016 г.
Клавишы excel
таблица. Горячие клавиши, незаменимые при работе в Excel
Клавиша или комбинация клавиш
Действие
Аналогичная команда меню
Вычисления
SHIFT + F3
Вызвать мастер Функций
Формулы - Вставить функцию
F4
Задать тип сылки на ячейку при вводе формулы – относительная или абсолютная
–
CTRL + ~
Отображать в ячейках формулы или их результаты
Формулы – Показать формулы
ALT+ «Равно»
Ввести в ячейку функцию СУММ
Формулы – Автосумма
F9
Пересчитать формулы во всей книге
Формулы – Пересчет
SHIFT + F9
Пересчитать формулы на текущем листе
Формулы – Произвести вычисления
Редактирование
F2
Редактировать активную ячейку
–
SHIFT + F2
Редактировать примечание к ячейке
–
CTRL + Delete
Удалить текст от курсора до конца строки (при редактировании содержимого ячейки)
–
CTRL+ALT+V
Специальная вставка (после копирования)
–
CTRL + «Плюс»
Добавить выделенное количество строк или столбцов
Главная – Вставить – Строки (Столбцы)
CTRL + «Минус»
Удалить выделенные строки или столбцы
Главная – Удалить – Строки (Столбцы)
CTRL + D
Заполнить выделенный диапазон значениями или формулами из первой выделенной ячейки
Главная – Заполнить – Вниз
CTRL + H
Вызвать диалоговое окно «Найти и заменить»
Главная – Найти и выделить – Заменить
SHIFT + F11
Вставить пустой лист
Главная – Вставить – Вставить лист
ALT + SHIFT + «Стрелка вправо»
Сгруппировать выделенные строки (столбцы)
Данные – Группировать
ALT + SHIFT + «Стрелка влево»
Разгруппировать выделенные строки/столбцы
Данные – Разгруппировать
Ввод данных
CTRL + Enter
Ввод сразу во все выделенные ячейки
–
ALT + Enter
Перенос строки внутри ячейки (при вводе)
–
CTRL + SHIFT + «4»
Вставить текущую дату
–
ALT + «Стрелка вниз»
Открыть выпадающий список (в пустой ячейке под столбцом с данными)
–
Навигация и выделение
CTRL + Back space
Вернуться к активной ячейке (прокрутка)
–
CTRL + PgUp (PgDown)
Переключение между листами
–
CTRL+Tab
Переключение между открытыми книгами
Вид – Перейти в другое окно
CTRL + пробел
Выделить весь столбец
–
SHIFT + пробел
Выделить всю строку
–
CTRL + A
Выделить текущую область (до ближайших пустых строк и столбцов)
–
CTRL + End
Перейти к последней ячейке листа
–
CTRL + SHIFT + End
Выделить все до последней ячейки листа
–
CTRL + «Стрелка вправо / влево / вверх / вниз»
Перейти до конца или начала строки (столбца)
–
CTRL + SHIFT + «Стрелка вправо / влево или вверх /вниз»
Выделить до конца или начала строку или /столбец
–
Работа с файлами
CTRL + N
Создать новую пустую книгу
–
CTRL + S
Сохранить текущую книгу
–
CTRL + O
Открыть файл
–
Прочее
CTRL + L
Создание «умной» таблицы (с фильтрами, автоподстройкой размеров, дизайном, закреплением шапки и т. д.)
Данные – Форматировать как таблицу
CTRL + F2
Предварительный просмотр
Кнопка Офис (Файл) – Печать – Предварительный просмотр
F4
Повторить последнее действие (любое, если вообще возможно)
–
CTRL + K
Вставить гиперссылку
Вставка – Гиперссылка
CTRL + F3
Открыть диалоговое окно «Диспетчер имен»
Формулы – Диспетчер имен
ALT+F8
Открыть диалоговое окно «Макрос»
Разработчик – Макросы
понедельник, 6 июня 2016 г.
воскресенье, 5 июня 2016 г.
Браслет
Check this out:
https://issuu.com/asartis/docs/libro_pelle_-_leather_braiding_-_trenzado_de_cuero/c/smc2og2
пятница, 3 июня 2016 г.
Гиперссылка в EXCEL
Так же можно создать гиперссылку, переходящую на определенную ячейку на листе:
=ГИПЕРССЫЛКА("#Лист2!D4";"Перейти в ячейку D4 Лист2")
Решетка перед именем листа указывает функции, что переход будет осуществляться в указанную точку открытого документа и поэтому путь документа для открытия не нужен.
Ссылку на ячейку можно указывать динамически, ссылаясь на определенную ячейку, не вписывая её адрес(на примере D2):
=ГИПЕРССЫЛКА("#Лист2!"&ЯЧЕЙКА("адрес";D4);"Перейти в ячейку "&ЯЧЕЙКА("адрес";D4)&" Лист2")
Можно указать ссылку на ячейку листа в другой книге:
=ГИПЕРССЫЛКА("#'[Другая книга.xls]Лист2'!"&ЯЧЕЙКА("адрес";D4);"Перейти в ячейку "&ЯЧЕЙКА("адрес";D4)&" Лист2 Другая книга.xls")
Или указать путь к файлу, который необходимо открыть по нажатии ячейки:
=ГИПЕРССЫЛКА("C:\Users\Дмитрий\Desktop\Книга 1.xls";"Открыть книгу Книга 1.xls")
При использовании гиперссылки из функции для открытия книги нельзя применить так же переход на нужный лист и ячейку. Это связано с ограничением именно самой функции. Т.е. нельзя указать что-то вроде: "C:\Users\Дмитрий\Desktop\Книга1.xls#Лист2!D4".
Важно: Книга, на которую ссылается функция ГИПЕРРСЫЛКА должна быть открыта. Если в имени книги или листа содержатся пробелы(или иные знаки препинания, кроме точки и нижнего подчеркивания), то обязательно в начале имени книги (перед [ ) и после имени листа ставить апостроф('). Я специально в одной из последних функций привел пример именно с пробелом - для наглядности:
=ГИПЕРССЫЛКА("#'[Другая книга.xls]Лист2'!"&ЯЧЕЙКА("адрес";D4);"Перейти в ячейку "&ЯЧЕЙКА("адрес";D4)&" Лист2 Другая книга.xls")
Поэтому если не уверены в том, будет ли имя листа и книги содержать такие символы, лучше в формуле проставлять апострофы всегда. Ошибкой это не будет и гиперссылка будет работать, даже если таких символов в имени не окажется.
Решетка перед именем листа указывает функции, что переход будет осуществляться в указанную точку открытого документа и поэтому путь документа для открытия не нужен.
Ссылку на ячейку можно указывать динамически, ссылаясь на определенную ячейку, не вписывая её адрес(на примере D2):
=ГИПЕРССЫЛКА("#Лист2!"&ЯЧЕЙКА("адрес";D4);"Перейти в ячейку "&ЯЧЕЙКА("адрес";D4)&" Лист2")
Можно указать ссылку на ячейку листа в другой книге:
=ГИПЕРССЫЛКА("#'[Другая книга.xls]Лист2'!"&ЯЧЕЙКА("адрес";D4);"Перейти в ячейку "&ЯЧЕЙКА("адрес";D4)&" Лист2 Другая книга.xls")
Или указать путь к файлу, который необходимо открыть по нажатии ячейки:
=ГИПЕРССЫЛКА("C:\Users\Дмитрий\Desktop\Книга 1.xls";"Открыть книгу Книга 1.xls")
При использовании гиперссылки из функции для открытия книги нельзя применить так же переход на нужный лист и ячейку. Это связано с ограничением именно самой функции. Т.е. нельзя указать что-то вроде: "C:\Users\Дмитрий\Desktop\Книга1.xls#Лист2!D4".
Важно: Книга, на которую ссылается функция ГИПЕРРСЫЛКА должна быть открыта. Если в имени книги или листа содержатся пробелы(или иные знаки препинания, кроме точки и нижнего подчеркивания), то обязательно в начале имени книги (перед [ ) и после имени листа ставить апостроф('). Я специально в одной из последних функций привел пример именно с пробелом - для наглядности:
=ГИПЕРССЫЛКА("#'[Другая книга.xls]Лист2'!"&ЯЧЕЙКА("адрес";D4);"Перейти в ячейку "&ЯЧЕЙКА("адрес";D4)&" Лист2 Другая книга.xls")
Поэтому если не уверены в том, будет ли имя листа и книги содержать такие символы, лучше в формуле проставлять апострофы всегда. Ошибкой это не будет и гиперссылка будет работать, даже если таких символов в имени не окажется.
Подписаться на:
Сообщения (Atom)