Озвучка текста в C#
В данной статье я расскажу вам как озвучить текст при помощи C#.
Для работы нам понадобится подключить библиотеку Speech.
Озвучка текста в C#
Работа с Excel при помощи VBScript (VBS)
Работа с Excel при помощи VBScript (VBS)
В данной статье я научу вас автоматизировать Microsoft Excel средствами VBS. В прошлой статье я описывал работу с Word. Привожу сразу код, так как он подробно прокомментирован:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 |
Option Explicit Dim oExcelApp ' Объявляем переменные Dim oRangeD2D8 Dim oRangeH2J8 Set oExcelApp = CreateObject("Excel.Application") ' Создаём объект с Excel-ем oExcelApp.Visible = True ' Делаем Excel видимым oExcelApp.Workbooks.Add ' Добавляем книгу в Excel oExcelApp.Cells(2,2).Font.Bold = True ' Делаем текст жирным в ячейке 1,1 oExcelApp.Cells(2,2).Font.Size = 20 ' Устанавливаем размер шрифта oExcelApp.Cells(2,2).Font.ColorIndex = 2 ' Устанавливаем цвет текста oExcelApp.Cells(2,2).Interior.ColorIndex = 1 ' Устанавливаем цвет ячейки oExcelApp.Cells(2,2).Value = "Test" ' Добавляем данные Set oRangeD2D8 = oExcelApp.Range("D2","D8") ' Получаем доступ к ряду ячеек oRangeD2D8.Font.Size = 16 ' Устанавливаем размер шрифта oRangeD2D8.Font.Italic = True ' Делаем курсивный текст oRangeD2D8.Font.Underline = True ' Делаем текст подчёркнутым oRangeD2D8.Value = "Test" ' Устанавливаем для всех них текст Dim i For i = 2 To 6 oExcelApp.Cells(i,6).Value = i ' заполняем ячейки числами Next oExcelApp.Cells(8,6).Font.Bold = True oExcelApp.Cells(8,6).Font.Underline = True oExcelApp.Cells(8,6).Font.Size = 24 oExcelApp.Cells(8,6).Formula = "=SUM(F2:F6)" ' Добавляем формулу, которая в ячейке F8 отобразит сумму ранее добавленных цифр Set oRangeH2J8 = oExcelApp.Range("H2","J8") ' Получаем доступ к ячейкам H2:J8 oRangeH2J8.Merge ' Объединяем группу ячеек oExcelApp.Save ' Сохраняем Excel файл oExcelApp.Quit ' Закрываем Excel |
Результат работы скрипта: Помогла ли вам данная статья, ответьте в комментариях.
Работа с Word при помощи VBScript (VBS)
Работа с Word при помощи VBScript (VBS)
Всем привет. В данной статье я расскажу вам про базовый функционал для работы с Microsoft Office при помощи VBS. Ниже привожу код, который я подробно прокомментировал:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 |
Option Explicit ' Инструкция, которая будет "ругаться", если переменные не будут явно объявляться Dim oWord ' объявляем переменные Dim oDoc Dim oSelectionPlace Set oWord = CreateObject("Word.Application") ' Создаём объект с Word-ом oWord.Visible = True ' делаем видимым Word Set oDoc = oWord.Documents.Add() ' Добавляем документ Set oSelectionPlace = oWord.Selection ' Получаем доступ к выделенной области oSelectionPlace.TypeParagraph() ' Делаем параграф oSelectionPlace.Paragraphs.Alignment = 1 ' Выравнивание текста по центру. 0 - левый край, 1 - по центру, 2 - правый край, 3 - по ширине oSelectionPlace.Font.Name = "Calibri" ' Указываем желаемый шрифт oSelectionPlace.Font.Size = "40" ' Указываем размер шрифта oSelectionPlace.Font.Bold = True ' Устанавливаем жирный текст oSelectionPlace.Font.Color = RGB(19, 77, 158) ' Устанавливаем цвет текста oSelectionPlace.TypeText "Progtask.ru" ' Вводим текст oSelectionPlace.TypeParagraph() ' Делаем параграф oSelectionPlace.Font.Size = "20" ' Устанавливаем размер шрифта oSelectionPlace.Font.Color = RGB(167, 8, 93) ' Устанавливаем цвет текста oSelectionPlace.TypeText "Записки программиста" ' Вводим текст oDoc.Save ' сохраняем документ oDoc.Close ' закрываем документ oWord.Quit ' закрываем Word |
Результат выполнения данного скрипта: Кстати, для того чтобы русский текст отображался нормально, а не кракозябрами, файл необходимо сохранять в кодировке UCS-2 LE BOM. Это можно сделать к примеру […]
Как создать папки от 1 до ...?
Как создать папки от 1 до …?
Приветствую. В данной статье я расскажу как при помощи bat файла создать папки от 1 до того значения, которое вам необходимо. Примечателен способ тем, что для его использования вам не потребуется что-то устанавливать дополнительно, если конечно вы являетесь пользователем Windows. Вот собственно сам код:
|
1 2 3 4 5 6 7 8 9 10 11 12 |
chcp 1251 set nameFolder = 0 :: объявляем переменную :m :: метка set /A nameFolder=nameFolder+1 :: добавляем к переменной 1 md %nameFolder% :: создаём папку if not %nameFolder% == 100 goto m :: проверка условия. Когда значение превысит указанное число, программа завершится. :: Вместо 100 вы естественно можете подставить требуемое значение. |
Конечно же, начальный номер можно тоже поменять, для этого заменив […]
Как сделать pull request на github
Как сделать pull request на github
Всем привет. Если вы хотите начать вносить свой вклад в open source, но не знаете с чего начать, то вам сможет помочь данная статья. Ну что, поехали. 1. Вам необходимо найти проект на github, в который вы хотите внести вклад. Затем уже на странице с ним нажать на кнопку Fork. 2. После того, как будет […]
Поиск общей подстроки нескольких строк на Python
Поиск общей подстроки нескольких строк на Python
В этой статье я расскажу вам как можно найти общую подстроку нескольких строк при помощи суффиксного дерева на Python.
Для этого мне понадобится библиотека suffix-trees.
Простой парсер на Python
Простой парсер на Python
В этой статье я покажу вам как создать простой парсер страницы в интернете на Python 3. Для этого понадобится 2 библиотеки — urllib и lxml. Первая является встроенной, а вторую вам нужно будет подгрузить. Для начала необходимо получить код самой страницы. Это можно сделать следующим образом:
|
1 2 3 |
import urllib.request # подключение библиотеки response = urllib.request.urlopen('http://progtask.ru').read() # получаем страницу в строковом представлении |
После этого шага нам необходимо воспользоваться библиотекой lxml […]
Как из таблицы сделать INSERT скрипты в MS SQL SERVER
Как из таблицы сделать INSERT скрипты в MS SQL SERVER
Для создания INSERT скриптов нужно выполнить следующую последовательность действий. Зайти в SSMS (SQL Server Management Studio) и нажать правой кнопкой мыши по требуемой БД, потом перейти в раздел Tasks и выбрать пункт меню «Generate Scripts…». Затем в появившемся окне выбрать пункт «Choose Objects». После выбирайте пункт меню «Script entire database and all database objects» если […]
Как создать PRIMARY KEY для нескольких столбцов в SQL
Как создать PRIMARY KEY для нескольких столбцов в SQL
Всем привет. Если вам необходим первичный ключ для нескольких столбцов, то в SQL такая возможность имеется, но использовать её я бы не советовал, так как всегда необходимо стараться идентифицировать запись по id или по какому-то специфическому полю (например, номер ГОСТ), что бывает реже. Код создания таблицы с primary key по трём столбцам (FirstName, LastName, MiddleName). […]