Запись звука в андроиде

[TOP лучших приложений для записи звука на Android]: Посмотри! https://trashbox.ru/link/top-android-record

Интернет магазины

Бюдгаджеты недели: доступная электроника, которая нас удивила http://lifehacker.ru/2016/06/18/byudgadzhet-53/

Как сделать сферическую фотографию

Как сделать сферическую фотографию и загрузить её в Facebook http://lifehacker.ru/2016/06/22/360-photos-facebook/

Подключение сетевого принтера в ОС 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 и задайте Имя. Теперь нажмите «ОК» для сохранения настроек.

Производитель смартфона

Оглавление папки 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

Клавишы 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 Открыть диалоговое окно «Макрос» Разработчик – Макросы