Вы используете устаревший браузер. Этот и другие сайты могут отображаться в нем неправильно. Необходимо обновить браузер или попробовать использовать другой.
Написал скрипт выдергивающий из сайтов посредством Chrome курсы валют, новости и т.п. Вставляю это добро в *.doc файл. И все ведь работает, но никак не могу найти инфу как отформатировать вставленный в Word текст, help!
к примеру в готовом doc-t нахожу url новостного сайта и меняю его название на "НОВОСТИРУ"
то, что нужно. вот так работает, находит "КУРС", выделяет жирным и подчеркивает, теперь разбираюсь с параметрами и поиском нужного. спасибо за наводку на функцию!
[опционально] Текст, который будем искать. При использовании пустой строки (""), можно использовать для форматирования текста. Для поиска можно использовать спецсимволы или коды символов. Например, "^p" – спецсимвол, обозначающий параграф, "^t" – знак табуляции (по умолчанию/default = "")
$vSearchRange
[опционально] Уточняет, где будем искать: в "этом" выделении или в каком-либо диапазоне поиска. Может быть:
1 – поиск в текущем выделении
0 – поиск во всем документе (по умолчанию - 0)
можно использовать любой объект Word диапазона
$oFindRange
[опционально] Определяет конкретный диапазон, возвращаемый последним обращением к функции _Word_DocFind().
Это необходимо, если вы хотите искать следующую или предыдущую последовательность, содержащуюся в $sFindText. По умолчанию поиск ведется с начала $vSearchRange (default).
$bForward
[опционально] True для поиска вперед (по направлению к концу документа) по умолчанию (default = True)
$bMatchCase
[опционально] если True то поиск будет регистрозависимым (default = False)
$bMatchWholeWord
[опционально] если True то будет искать только целые слова (default = False)
$bMatchWildcards
[опционально] если True то при поиске будут использоваться спецсимволы т.н. Wild cards, (default = False), подозреваю, что как раз ее нужно включать при поиске конца параграфов, табуляций и т.п.
$bMatchSoundsLike
[опционально] если True находит слова, которые схожи с искомым текстом (default = False)
$bMatchAllWordForms
[опционально] если True находит все формы искомого текста (например при поиске глагола "sit" будут также найдены "sitting" и"sat") (default = False)
$bFormat
[опционально] если True операция форматирования будет производиться в добавок или вместо поиска текста (default = False), надо проверять
Сообщение автоматически объединено:
назрел еще один вопрос, где посмотреть список функций форматирования????? нужно выровнять вес текст, изменить шрифт и междустрочный интервал
Сообщение автоматически объединено:
пробую отформатировать весьтекст через DocRangeSet, что делаю не так?
Всю голову сломал, как отформатировать весь текст в документе Word c помощью AutoIT???
Сообщение автоматически объединено:
удалось пометить весь диапазон текста в Ворде так:
Код:
; -1 - выставляем начало диапазона в начало документа, $WdWord считаем слова до конца, наобум берем 100000 слов, и на это количество слов сдвигаем конец диапазона
$oRange = _Word_DocRangeSet($oDoc, -1, Default, Default, $WdWord, 100000)
$oRange.Underline = False
Сообщение автоматически объединено:
Name
Value
Description
wdCell
12
A cell.
wdCharacter
1
A character.
wdCharacterFormatting
13
Character formatting.
wdColumn
9
A column.
wdItem
16
The selected item.
wdLine
5
A line.
wdParagraph
4
A paragraph.
wdParagraphFormatting
14
Paragraph formatting.
wdRow
10
A row.
wdScreen
7
The screen dimensions.
wdSection
8
A section.
wdSentence
3
A sentence.
wdStory
6
A story.
wdTable
15
A table.
wdWindow
11
A window.
wdWord
2
A word.
Сообщение автоматически объединено:
Сообщение автоматически объединено:
систематизировал некоторые форматы:
$oRange.Font.Color = $color ;меняем цвет шрифта
$oRange.Font.Size = 12 ; размер шрифта
$oRange.Ialic = true ;курсив
$oRange.Bold = true ; жирный
$oRange.Underline = true ; подчеркивание
$oRange.Font.Name = "Arial" ; меняем сам шрифт
Сообщение автоматически объединено:
Худо-бедно научился менять шрифт и т.п но вопрос остается актуальным, кто знает как изменить поля документа, и междустрочный интервал???
такая же история, давно знаком с autoit, но вот уже более 10 лет не было нужды в его использовании, а тут неожиданно по работе он и вспомнился, очень помогает автоматизировать большую часть рутинных операций. Использование скриптов уже ускорило выполнение большинства моих задач (в основном мониторинг финансовых сайтов и вывод отчетности в ворд формате).
Часть статей и форумов, конечно же читал, когда писал скрипты, но продолжаю копать в том же направлении, нужно добиться еще большей автоматизации для придания документам нужного формата, сейчас активно ищу инфу по общему форматированию страниц, выводимых на печать, прежде всего, как уже писал, интересны: междустрочный интервал, границы документа и выравнивание текста. Спасибо за ссылки, надеюсь выведут таки на нужное. А работы выкладываю, чтоб самому и остальным нужную информацию потом проще было найти в одном месте. К примеры в рунете нигде не нашел толкового описания как заставить работать autoit с современными браузерами, а все оказалось куда как проще. Позже планирую вернуться к этой теме.
Сообщение автоматически объединено:
Бинго! оперируем с объектом $oDoc, постепенно двигаемся вперед - узнаем новое. Итак, изменение полей документа:
Код:
#include <Word.au3>
Global $oWord = _Word_Create()
;opening file $DocPath текстовая переменная с путем к файлу
$DocPath = "d:\text.doc"
Global $oDoc=_Word_DocOpen($oWord, $DocPath, Default, Default,False)
$oDoc.PageSetup.LeftMargin = 20
$oDoc.PageSetup.BottomMargin = 20
$oDoc.PageSetup.RightMargin = 20
$oDoc.PageSetup.TopMargin = 20
_Word_DocSaveAs($oDoc,$DocPath)
_Word_DocClose($oDoc)
_Word_Quit($oWord)
Сообщение автоматически объединено:
мелкомягкая справка по софту, по ходу, лучшее, что может пригодиться начинающему и опытному скриптописателю при работе с "микрософтОм"
Сообщение автоматически объединено:
прикольно! ровняем все параграфы по правому краю
Код:
Sleep (100)
$oDoc.Paragraphs.Alignment = 2
Если нужно выровнять конкретный параграф то ставим его порядковый номер например выровнять 3й параграф по правому краю
Код:
Sleep (100)
$oDoc.Paragraphs(3).Alignment = 2
на сегодня, пожалуй, хватит, лайк мне=)))), ах да, таблица с параметрами Value
Name
Value
Description
wdAlignParagraphCenter
1
Center-aligned.
wdAlignParagraphDistribute
4
Paragraph characters are distributed to fill the entire width of the paragraph.
wdAlignParagraphJustify
3
Fully justified.
wdAlignParagraphJustifyHi
7
Justified with a high character compression ratio.
wdAlignParagraphJustifyLow
8
Justified with a low character compression ratio.
wdAlignParagraphJustifyMed
5
Justified with a medium character compression ratio.
wdAlignParagraphLeft
0
Left-aligned.
wdAlignParagraphRight
2
Right-aligned.
wdAlignParagraphThaiJustify
9
Justified according to Thai formatting layout.
Сообщение автоматически объединено:
теперь уже сложно остановиться, и, по сему, продолжаем эксперименты с форматом ворд документа, на этот раз установим требуемый межстрочный интервал:
Код:
$oDoc.Paragraphs.LineSpacing = 12
12 -равносильно одиночному интервалу, далее экспериментируем сами
для этих же цели также возможно использование .LineSpacingRule где вместо цифрового значения (в данном случае 12) используем нижеприведенные Value:
Name
Value
Description
wdLineSpace1pt5
1
Space-and-a-half line spacing. Spacing is equivalent to the current font size plus 6 points.
wdLineSpaceAtLeast
3
Line spacing is always at least a specified amount. The amount is specified separately.
wdLineSpaceDouble
2
Double spaced.
wdLineSpaceExactly
4
Line spacing is only the exact maximum amount of space required. This setting commonly uses less space than single spacing.
wdLineSpaceMultiple
5
Line spacing determined by the number of lines indicated.
wdLineSpaceSingle
0
Single spaced. default
Сообщение автоматически объединено:
убираем отступы перед и после абзаца во всем документе, в данном случае это наш объект $oDoc:
Код:
;set spaces before and after paragraph
Sleep (100)
$oDoc.Paragraphs.SpaceBefore = 0
$oDoc.Paragraphs.SpaceAfter = 0
добавляю полезный материал по регулярным выражениям в Word:
сейчас с помощью регулярок пробую найти несколько повторяющихся последовательностей в документе и выделить их жирным или подчеркиванием, кто знает, как это сделать во всем диапазоне (Range )документа ??? какие функции для этого лучше использовать?
