Excel редактировать текстовый файл - Word и Excel - помощь в работе с программами

Добрый день. Подскажите пожалуйста, можно ли посредством VBA редактировать ТХТ файлы?
или же их в любом случае нужно экспортировать в эксель, редактировать и сохранять как ТХТ?
в общем ситуация такая, нужно обрабатывать файлы ТХТ оборотной ведомости предприятия для спец программки. для этого берется файл, загоняется в эксель удаляются ненужные строки, меняется первая строчка на название специальное и потом сохраняется, и кидается куда нужно. следовательно вопрос ка кэто автоматизировать?

запись макроса редактирования выдает примерно следующее,
Sub ИмпортТекста()
‘записан как импорт баланса для показателей
ChDir «C:Documents and SettingsYРабочий стол»
‘
Workbooks.OpenText Filename:= _
«C:Documents and SettingsYРабочий стол******.TXT», Origin:= _
xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote _
, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, Comma:=False _
, Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array _
(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), Array(9, 1), Array( _
10, 1), Array(11, 1), Array(12, 1)), TrailingMinusNumbers:=True
End Sub

и потом сохраняем.
собственно вопрос
1) как можно сделать так, что бы выбирать какие файлы редактировать через диалоговое окно?
нашел такой код
Sub Macro2()

Dim strPath As String
Dim fd As FileDialog
Dim vrtSelectedItem As Variant

Set fd = Application.FileDialog(msoFileDialogFilePicker)

With fd
.AllowMultiSelect = True
.Filters.Clear
.Filters.Add «Âàøè ôàéëû», «*.CSV»
.Filters.Add «All Files», «*.*»

If .Show = -1 Then
For Each vrtSelectedItem In .SelectedItems
strPath = vrtSelectedItem
Next vrtSelectedItem
End If
End With

Set fd = Nothing

но как его вставить например в предыдущем записанном макросе что бы он был частью единого программного кода?
2) в файле есть строка «оборотная ведомость бла бла бла…» ниже идет строка
«с 01/09/2011 по 30/09/2011» как можно использовать вот эти даты в таком ключе;
раз в примере например по 30/09/2011 мы сохраняем файл с именем 011011
а в начале файла вставляем строку «оборотная ведомость на 1 октября 2011г.(ну или на 01.10.2011)»

приветсвуются любые советы, решения, любые подсказки и ссылки на любые ресурсы где обсуждалось, или приводились примеры подобных ситуаци и редактировение ТХТ вообще.
Спасибо за уделенное внимание!

слэн

Пользователь

Сообщений: 5192
Регистрация: 16.01.2013

ну, если у вас форматированный текст, то лучше да, открывать его в иксель..

как вставить? да так и вставляйте копипастом.. (только без заголовка и окончания)

а можно с заголовком, тогда в первом макросе строку вызова — просто имя второго макроса

есть конечно тонкости, но о них на конкретных примерах( ваших)

Hugo

Пользователь

Сообщений: 23249
Регистрация: 22.12.2012

Можно сделать без загрузки на лист, только кодом.
Можно и без Экселя, скриптом vbs.
Принцип такой — читаем текстовый файл, анализируем строки, пишем нужное/изменённое в другой файл вместо исходного.
Но чтоб сделать — мало данных.
Но примеры тут были, я точно делал.
Поищите по ReadAll например.

	Загрузка текстового файла на лист Excel http://excelvba.ru/code/CSV2Excel Всё остальное тоже можно найти у меня на сайте. Например, здесь: http://excelvba.ru/code/text_files

	собственно образец, но сильно подредактированный.

Ужасный образец…
Это самая неудобная для обработки таблица, какая только может быть в текстовом формате.

И что, вам надо подредактировать данные, и сохранить файл в том же, в текстовом, виде?

Или результат (файл TXT) будет иметь не такую ужасную структуру?

R Dmitry

Пользователь

Сообщений: 3103
Регистрация: 22.12.2012

Excel,MSSQL,Oracle,Qlik

15.11.2011 11:43:40

Аноним,

Может стоит улучшить выгрузку из первоисточника? А не пытаться приспособить отчет, для загрузки данных.

Спасибо

R Dmitry
тут сложно сказать, под меня явно никто ничего подгонять не будет, есть стандартаня форма, она и есть стандартная, скорее правильно сказать что можно было бы мне улучшить работу с балансом, и не пользоваться той программой которая требудет данной переработки файла, НО пока у меня нет альтернативы, хотя искать я ее безусловно буду. Понятно что мне было бы удобнее подгружать данные в тот же МС Акцесс, и обрабатывать бы было их намного удобнее тогда, но боюсь пока эту сложную штуку мне не освоить. Хотя если есть что-то почитать про это для чайников буду весьма признателен.
2 EducatedFool
фактически сами данные редактировать не надо, нужно лишь изменить шапку и кодировку файла.(хотя на счет кодировки непонятный момент)
и так я делаю следующее вручную, беру такие файлы, открываю, через мс эксель, ставлю разделители пробелы. далее удаляю все что сверху до слов
А. Балансовые счета.(и пустой столбик слева удаляю, который образуется, хотя возможно этот столбик издержка моего способа)
в начале файла пишу «Оборотная ведомость по счетам бухгалтерского учета кредитной организации за октябрь 2011г.»
и все, сохраняю сделанные изменения.
ах да, при открытие через эксель меняю кодировку на MS DOS PC-8

получаю такое :

Hugo

Пользователь

Сообщений: 23249
Регистрация: 22.12.2012

Да в общем несложно, работает такой несложный скрипт vbs:

Option Explicit

‘ FSO Constants
Const ForReading = 1
Const ForWriting = 2
Const TristateUseDefault = -2

‘ Variables
Dim objFSO, objTS, objFile, a, nn

‘ Instantiate the object
Set objFSO = CreateObject(«Scripting.FileSystemObject»)

‘ open the text file read only
Set objTS = objFSO.OpenTextFile(«C:tmpBaotpost_278093.TXT», ForReading, False, TristateUseDefault)

a = Split(objTS.ReadAll(), vbNewLine)
objTS.Close
a(0) = «ОБОРОТНАЯ ВЕДОМОСТЬ НА » & Mid(a(11), 27, 10)
nn = Replace(CStr(CDate(Mid(a(11), 41, 10)) + 1), «.», «»)

Set objFile = objFSO.CreateTextFile(«C:tmpBaot» & nn & «.txt»)
objFile.Close
Set objFile = objFSO.OpenTextFile(«C:tmpBaot» & nn & «.txt», ForWriting)
objFile.Write Join(a, vbNewLine)

Анониму придумал имя Baot — от Банковская отчётность
Только вот вопрос с кодировкой не решал — там фраза «ОБОРОТНАЯ ВЕДОМОСТЬ НА» пишется в другой кодировке.
Ну и лень было имя файла Мидами корёжить — пока сохраняет как 01112011.txt

Hugo
спасибо за код
с VBS не сталкивался попробую разобраться.
вопрос а можно сделать так что бы он удалял все что остается между добавленной строкой оборотная ведомть на
и А. Балансовые счета,
второй вопрос код выставляет оборотная ведомость на 01.10.2011 а сохраняет с именем 01.11.2011… то есть выходит сохраняет правильно а в строке ставит не тот месяц.

Hugo

Пользователь

Сообщений: 23249
Регистрация: 22.12.2012

Да, с датой промахнулся (всё эти единицы, подслеповат стал наверное ) — думал, что Вам срок нужно следующим днём после отчёта выставить, т.е после 31/10/2011
Это правится тут:
nn = Replace(CStr(CDate(Mid(a(11), 41, 10)) + 1), «.», «»)
Берёте другую позицию строки в Mid() (с начальной датой, а не конечной) и не надо прибавлять день.
Удалять тоже можно — тогда нужно правда код сильно изменить:
1. не правим в этом массиве, а создаём для выгрузки другой.
2а или создаём сразу под нужный размер (как-то высчитываем),
2б или через Redim Preserve на каждой нужной строке увеличиваем созданный нулевой,
2в или создаём пустой размером с исходный, а пишем в файл только заполненную часть
3 т.е. выгрузку тоже нужно переделать исходя из п.2.

Ну и вообще нужно посидеть, покрутить, ещё и кодировка… Некогда сейчас.

Hugo Пользователь Сообщений: 23249 Регистрация: 22.12.2012	Да, и если не надо прибавлять день, то и в дату строку переводить не нужно (а потом назад в строку )

	Hugo спасибо) попробую подразобраться с датой и скормить в виде такой таблицы файл,хотя уж очень там требовательная программа к виду файла)

Hugo

Пользователь

Сообщений: 23249
Регистрация: 22.12.2012

Заготовка для работы с кодировкой — выводит перекодированную строку из текста-примера.
Используется
Library «OLEPRNLib» (%systemroot%system32oleprn.dll).

это в vbs:

Option Explicit

‘ FSO Constants
Const ForReading = 1
Const ForWriting = 2
Const TristateUseDefault = -2

‘ Variables
Dim objFSO, objTS, a

‘ Instantiate the object
Set objFSO = CreateObject(«Scripting.FileSystemObject»)

‘ open the text file read only
Set objTS = objFSO.OpenTextFile(«C:tmpBaotpost_278093.TXT», ForReading, False, TristateUseDefault)

a = Split(objTS.ReadAll(), vbNewLine)
objTS.Close

Dim objOleCvt
Set objOleCvt = WScript.CreateObject(«OlePrn.OleCvt.1»)

With objOleCvt
‘ 866 — cp866
MsgBox Trim(.ToUnicode(a(30), 866))

End With

Set objOleCvt = Nothing

хорошо, возвращаясь к VBA например.

получили такое:
Sub ImportTXT()
‘создаем меню выбора файла
Dim strPath As String
Dim fd As FileDialog
Dim vrtSelectedItem As Variant

Set fd = Application.FileDialog(msoFileDialogFilePicker)

With fd
.AllowMultiSelect = False
.Filters.Clear
.Filters.Add «Текстовые файлы», «*.txt»
.Filters.Add «All Files», «*.*»

If .Show = -1 Then
For Each vrtSelectedItem In .SelectedItems
strPath = vrtSelectedItem
Next vrtSelectedItem
End If
End With
Set fd = Nothing
‘редактируем файл и сохраням
Workbooks.OpenText Filename:=strPath, Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, _
Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), _
Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), _
Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1)), TrailingMinusNumbers:=True
Rows(«1:30»).Select
Range(«A30»).Activate
Selection.Delete Shift:=xlUp
Columns(«A:A»).Select
Selection.Delete Shift:=xlToLeft
Range(«A1»).Select
ActiveCell.FormulaR1C1 = _
«Оборотная ведомость по счетам бухгалтерского учета за октябрь 2011г.»
Range(«A2»).Select
ActiveWorkbook.SaveAs Filename:= _
«С:11111.TXT» _
, FileFormat:=xlText, CreateBackup:=False
ActiveWorkbook.Close
End Sub

вот получается такая штука, вопрос соответственно в том как
1) сделать даты меняющимися то есть, в тексте после за(* тут я соврал когда писал что нужно НА, прошу прощения) «октябрь 2011» ставилось исходя из дат в исходном файле
2) то же и по дате, но уже НА дату, то есть на 011111 (много хочу наверно =) )
3) когда книга закрывается спрашивает сохранять или нет, как сделать автоматически нет, или не спрашивать?
4)и уже не критичный вопрос еще в том, если поставить MultiSelect True? то нужно ли менять код, для обработки нескольких файлов?

	пока строчил мне уже ответили, попробую пееркодировку на вбс)

Hugo Пользователь Сообщений: 23249 Регистрация: 22.12.2012	3) application.displayalerts=false в конце верните назад. 4)Если MultiSelect True, то код нужно менять — в цикл For Each vrtSelectedItem In .SelectedItems strPath = vrtSelectedItem Next vrtSelectedItem End If нужно перенести всю обработку выбранного файла.

Hugo
спасибо большое за помощь, но все таки про цикл не понял.
вообщем методом проб и ошибок получаем такой код, который делает то что нужно, правда с одним файлом, а как с несколкью?

Sub ImportTXT()
‘äèàëîã âûáîðà ôàéëà
Dim strPath As String
Dim fd As FileDialog
Dim vrtSelectedItem As Variant
Dim MyDate As Date
Set fd = Application.FileDialog(msoFileDialogFilePicker)

With fd
.AllowMultiSelect = True
.Filters.Clear
.Filters.Add «Òåêñòîâûå ôàéëû», «*.txt»
.Filters.Add «All Files», «*.*»

If .Show = -1 Then
For Each vrtSelectedItem In .SelectedItems
strPath = vrtSelectedItem
Next vrtSelectedItem
End If
End With
Set fd = Nothing
‘ðåäàêòèðóåì âûáðàííûé ôàéë ïðè ïîìîùè çàïèñè äåéñòâèé ïðè ðåäàêòèðîâàíèè âðó÷íóþ
Workbooks.OpenText Filename:=strPath, Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, _
Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), _
Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), _
Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1)), TrailingMinusNumbers:=True
MyDate = Range(«E12»)
Rows(«1:30»).Select
Range(«A30»).Activate
Selection.Delete Shift:=xlUp
Columns(«A:A»).Select
Selection.Delete Shift:=xlToLeft
Range(«A1»).Select
ActiveCell.FormulaR1C1 = _
«Îáîðîòíàÿ âåäîìîñòü ïî ñ÷åòàì áóõãàëòåðñêîãî ó÷åòà êðåäèòíîé îðãàíèçàöèè çà » & Format(MyDate, «mmmm yyyy»)
Range(«A2»).Select
ActiveWorkbook.SaveAs Filename:=Format(MyDate + 1, «ddmmyy»), FileFormat:=xlText, CreateBackup:=False
ActiveWorkbook.Close SaveChanges = False
End Sub

Guest Гость	#19 16.11.2011 10:05:46 Ой прошу прощения, дошло как в цикл запустить. Sub ImportTXT() ‘Создаем меню выбора файла Dim strPath As String Dim fd As FileDialog Dim vrtSelectedItem As Variant Dim MyDate As Date Set fd = Application.FileDialog(msoFileDialogFilePicker) With fd .AllowMultiSelect = True .Filters.Clear .Filters.Add «Текстовые файлы», «.txt» .Filters.Add «All Files», «.*» If .Show = -1 Then For Each vrtSelectedItem In .SelectedItems strPath = vrtSelectedItem ‘редактируем выбранный файл Workbooks.OpenText Filename:=strPath, Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _ xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, _ Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), _ Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), _ Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1)), TrailingMinusNumbers:=True MyDate = Range(«E12») Rows(«1:30»).Select Range(«A30»).Activate Selection.Delete Shift:=xlUp Columns(«A:A»).Select Selection.Delete Shift:=xlToLeft Range(«A1»).Select ActiveCell.FormulaR1C1 = _ «Оборотная ведомость по счетам бухгалтерского учета за » & Format(MyDate, «mmmm yyyy») ActiveWorkbook.SaveAs Filename:=Format(MyDate + 1, «ddmmyy»), FileFormat:=xlText, CreateBackup:=False ActiveWorkbook.Close SaveChanges = False Next vrtSelectedItem End If End With Set fd = Nothing End Sub

Источник

Импорт и экспорт текстовых файлов (в формате TXT или CSV)

Импортировать данные из текстового файла в Excel можно двумя способами: открыть их в Excel или импортировать как диапазон внешних данных. Чтобы экспортировать данные из Excel в текстовый файл, воспользуйтесь командой Сохранить как и измените тип файла в меню.

Чаще всего используются два формата текстовых файлов:

текстовые файлы с разделителями (TXT), в которых для разделения полей текста обычно используется знак табуляции (знак ASCII с кодом 009);
текстовые файлы с разделителями-запятыми (CSV), в которых в качестве разделителя полей текста обычно используется запятая (,).

Вы можете изменить знак разделения, используемый в TXT- и CSV-файлах. Это может потребоваться для обеспечения успешного выполнения импорта и экспорта.

Примечание: Можно импортировать и экспортировать до 1 048 576 строк и 16 384 столбцов.

Импорт текстового файла путем его открытия в Excel

Текстовый файл, созданный в другой программе, можно открыть как книгу Excel с помощью команды Открыть. При открытии текстового файла в Excel его формат не изменяется — это можно заметить по заголовку окна Excel, где имя указывается с расширением текстового файла (например, TXT или CSV).

Перейдите в >открыть и перейдите в папку с текстовым файлом.
В диалоговом окне Открытие выберите текстовые файлы в списке тип файла.
Найдите нужный файл и дважды щелкните его.
- Если это текстовый файл (с расширением ТХТ), запустится мастер импорта текста. Окончив работу с мастером, нажмите кнопку Готово, чтобы завершить импорт. Дополнительные сведения о разных вариантах и дополнительных параметрах см. в мастере импорта текста.
- Если файл имеет расширение CSV, Excel автоматически откроет его и отобразит данные в новой книге.
  
  Примечание: При открытии CSV-файлов для определения способа импорта каждого столбца используются заданные по умолчанию параметры форматирования данных. Если вы хотите применить другие параметры, используйте мастер импорта текста. Например, мастер потребуется, если столбец данных в CSV-файле имеет формат МДГ, а в Excel по умолчанию используется формат ГМД или необходимо преобразовать в текст столбец чисел, содержащих начальные нули, чтобы сохранить их. Чтобы принудительно запустить мастер импорта текста, можно изменить расширение имени файла с CSV на TXT или импортировать текстовый файл путем подключения к нем (дополнительные сведения см. в следующем разделе).

Импорт текстового файла путем подключения к нем (Power Query)

Вы можете импортировать данные из текстового файла в существующий.

На вкладке Данные в группе & преобразование данных выберите из текстового/CSV-документа.
В диалоговом окне Импорт данных найдите и дважды щелкните текстовый файл, который нужно импортировать,и нажмите кнопку Импорт.
В диалоговом окне предварительного просмотра есть несколько вариантов:
- Выберите Загрузить, если вы хотите загрузить данные непосредственно на новый.
- Кроме того, выберите загрузить в, если вы хотите загрузить данные в таблицу, в смету или на существующий или новый листа Excel, или просто создать подключение. Вы также можете добавить данные в модель данных.
- Выберите Преобразовать данные, если вы хотите загрузить данные в Power Query и отредактировать их перед их преобразованием в Excel.

Если Excel не преобразует определенный столбец данных в нужный формат, их можно преобразовать после импорта. Дополнительные сведения см. в статьях Преобразование чисел из текстового формата в числовой и Преобразование дат из текстового формата в формат даты.

Экспорт данных в текстовый файл путем его сохранения

Лист Excel можно преобразовать в текстовый файл, используя команду Сохранить как.

Выберите Файл > Сохранить как.
Нажмите кнопку Обзор.
В диалоговом окне Сохранить как в поле Тип файла выберите формат текстового файла для этого документа. Например, щелкните Текст (с табу женой) или CSV (сзапятой).

Примечание: Различные форматы текстовых файлов поддерживают разные возможности. Дополнительные сведения см. в статье Поддерживаемые Excel форматы файлов.
Перейдите в папку, куда вы хотите сохранить файл, а затем нажмите кнопку Сохранить.
Откроется диалоговое окно с напоминанием о том, что в текстовом файле будет сохранен только текущий лист. Если вы хотите сохранить именно текущий лист, нажмите кнопку ОК. Другие листы можно сохранить в отдельных текстовых файлах, повторив эту процедуру для каждого из них.

Кроме того, под лентой может появиться предупреждение о том, что некоторые возможности могут быть потеряны при сохранение книги в формате CSV.

Дополнительные сведения о сохранении файлов в других форматах см. в статье Сохранение книги в другом формате файла.

Импорт текстового файла путем подключения к нему

Вы можете импортировать данные из текстового файла в существующий.

Щелкните ячейку, в которую вы хотите поместить данные из текстового файла.
На вкладке Данные в группе Получение внешних данных нажмите Из текста.
В диалоговом окне Импорт данных найдите и дважды щелкните текстовый файл, который нужно импортировать,и нажмите кнопку Импорт.

Следуйте инструкциям мастера импорта текста. Щелкните на любой странице мастера импорта текста, чтобы получить дополнительные сведения об использовании мастера. Окончив работу с мастером, нажмите кнопку Готово, чтобы завершить импорт.
В диалоговом окне Импорт данных:
1. В группе Куда следует поместить данные? выполните одно из следующих действий:
  - Чтобы поместить данные в выбранные ячейки, щелкните На существующий лист.
  - Чтобы поместить данные в верхний левый угол нового листа, выберите вариант На новый лист.
2. При необходимости нажмите кнопку Свойства, чтобы задать параметры обновления, форматирования и макета импортируемых данных.
3. Нажмите кнопку ОК.
  
  Excel добавит диапазон внешних данных в указанное место.

Если Excel не преобразует столбец в необходимый формат, это можно сделать после импорта. Дополнительные сведения см. в статьях Преобразование чисел из текстового формата в числовой и Преобразование дат из текстового формата в формат даты.

Экспорт данных в текстовый файл путем его сохранения

Лист Excel можно преобразовать в текстовый файл, используя команду Сохранить как.

Выберите Файл > Сохранить как.
Откроется диалоговое окно Сохранение документа.
В поле Тип файла выберите формат текстового файла для листа.
- Например, выберите Текстовые файлы (с разделителями табуляции) или CSV (разделители — запятые).
- Примечание: Различные форматы текстовых файлов поддерживают разные возможности. Дополнительные сведения см. в статье Поддерживаемые Excel форматы файлов.
Перейдите в папку, куда вы хотите сохранить файл, а затем нажмите кнопку Сохранить.
Откроется диалоговое окно с напоминанием о том, что в текстовом файле будет сохранен только текущий лист. Если вы хотите сохранить именно текущий лист, нажмите кнопку ОК. Другие листы можно сохранить в отдельных текстовых файлах, повторив эту процедуру для каждого из них.
Откроется второе диалоговое окно с напоминанием о том, что сохраняемый лист может содержать возможности, которые не поддерживаются текстовыми форматами файлов. Если в новом текстовом файле нужно сохранить только данные листа, нажмите кнопку Да. Если вы не уверены и хотите получить дополнительные сведения о том, какие возможности Excel не поддерживаются форматами текстовых файлов, нажмите кнопку Справка.

Способ изменения деления при импорте зависит от того, как вы импортируете текст.

Если вы используете get & Transform Data > From Text/CSV, после выбора текстового файла и нажатия кнопки Импорт выберитесимвол, который нужно использовать в списке …. Новый вариант можно сразу же увидеть в окне предварительного просмотра данных, чтобы убедиться в том, что вы сделаете нужный вариант, прежде чем продолжить.
Если вы импортируете текстовый файл с помощью мастера импорта текста, вы можете изменить его на шаге 2 мастера импорта текста. На этом шаге также можно изменить способ обработки последовательных разделителей (например, идущих подряд кавычек).

Дополнительные сведения о разных вариантах и дополнительных параметрах см. в мастере импорта текста.

Если при сохранение в CSV-окне вы хотите использовать в качестве по умолчанию полу двоеточие, но для этого нужно ограничиться Excel, измените десятичной запятой. В этом случае Excel будет использовать для этого двоеточие. Очевидно, что это также изменит способ отображения десятичных чисел, поэтому также рассмотрите возможность изменения разграничения чисел в тысячах, чтобы сузить путаницу.

Очистка параметров Excel> Дополнительные>параметры редактирования> Использование системных междугов.
Для десятичной запятой установитедля десятичной запятой (запятую).
Установите для 1000-го построитель. (точка).

Когда вы сохраняете книгу в CSV-файле, по умолчанию в качестве разных списков запятой является запятая. Вы можете изменить этот знак на другой знак с помощью параметров региона Windows.

Внимание: Изменение параметров Windows приведет к глобальным изменениям на компьютере и повлияет на все приложения. Чтобы изменить только делитель для Excel, см. изменение стандартного деления в списке для сохранения файлов в виде текста (CSV- или CSV-файла) в Excel.

В Microsoft Windows 10 щелкните правой кнопкой мыши кнопку Начните и выберите параметры.
Нажмите кнопку & языки выберите регион в левой области.
На главной панели в группе Региональные параметрыщелкните Дополнительные параметры даты,времени и региона.
В областивыберите изменить форматы даты, времени или числа.
В диалоговом окке Регион на вкладке Формат нажмите кнопку Дополнительные параметры.
В диалоговом окне Настройка формата на вкладке Числа введите символ, который будет использовать в качестве нового в поле «Сепаратор списков».
Дважды нажмите кнопку ОК.

Нажмите кнопку Пуск и выберите пункт Панель управления.
В разделе Часы, язык и регион щелкните элемент Изменение форматов даты, времени и чисел.
В диалоговом окке Регион на вкладке Формат нажмите кнопку Дополнительные параметры.
В диалоговом окне Настройка формата на вкладке Числа введите символ, который будет использовать в качестве нового в поле «Список».
Дважды нажмите кнопку ОК.

Примечание: После изменения разделителя элементов списка все программы на компьютере будут использовать новый символ. Вы можете вернуть стандартный символ, выполнив эти же действия.

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community или попросить помощи в сообществе Answers community.

См. также

Импорт данных из внешних источников (Power Query)

Нужна дополнительная помощь?

Источник

Содержание

Как сделать редактирование в excel?
Редактирование строки текста в ячейках
Как сделать несколько строк в ячейке Excel?
Режим редактирования
Редактирование в Excel
Редактирование данных Excel
Как документ Эксель перевести в Ворд
Способ 1
Способ 2
Способ 3
Видео — Как перенести таблицу из Excel в Word
Способ 4
Видео — Связывание данных таблиц Excel и документов Word

Как сделать редактирование в excel?

Если ячейка содержит большой текст или сложную формулу, но с ошибками, то нет смысла удалять их вводить все данные заново. Рациональнее их просто отредактировать.

Для редактирования значений в Excel предусмотрен специальный режим. Он максимально прост, но гармонично объединил в себе толь самые полезные функции текстового редактора. Ничего лишнего в нем нет.

Редактирование строки текста в ячейках

Редактировать содержимое ячеек можно двумя способами:

1 Из строки формул. Щелкните по ячейке, в которой необходимо отредактировать данные. В строке формул отобразиться содержимое, которое доступно для редактирования. Сделайте необходимые изменения, после чего нажмите Enter или кликните по кнопке «Ввод», которая размещена в начале строки формул. Для отмены изменений можно нажать клавишу «Esc» или кнопку «Отмена» (возле кнопки «Ввод»).
2 Из самой ячейки. Перейдите на ячейку и нажмите клавишу F2 или сделайте по ней двойной щелчок мышкой. Тогда в ячейке появится курсор клавиатуры, а ее размер изменится на время редактирования. После всех изменений нажмите Enter или Tab или кликните мышкой на любую другую ячейку. Для отмены редактирования нажмите клавишу «Esc».

Примечание. При редактировании не забывайте о кнопках отмены / повтора действий на панели быстрого доступа. Или о комбинациях клавиш CTRL+Z и CTRL+Y.

Как сделать несколько строк в ячейке Excel?

В режиме редактирования, ячейки обладают функционалом простейшего текстового редактора. Главное отличие – это разбиение текста на строки.

Внимание!
Чтобы разбить текст на строки в одной ячейке Excel нужно нажать комбинацию клавиш Alt+Enter. Тогда вы сможете перейти на новую строку в ячейке. В том месте текста, где находится курсор клавиатуры, появится перенос строки и соответственно начало новой.

В обычных редакторах текст делится на строки нажатием клавиши Enter, но в Excel данное действие выполняет функцию подтверждения вода данных и переход на следующую ячейку. Поэтому как написать несколько строк в ячейке Excel жмите Alt+Enter.

Обратите внимание, что после разделения одной строки в ячейке на две и более с помощью клавиш Alt+Enter, то автоматически активируется опция «формат ячеек»-«выравнивание»-«перенос по словам». Притом что сама эта функция не разбивает строку на слова, а оптимизирует ее отображение.

Режим редактирования

В режиме редактирования работают все стандартные комбинации клавиш управления курсором клавиатуры, как и в других программах Windows:

Клавиша «DELETE» удаляет символ справа, а «Backspace» слева.
CTRL+ «стрелка влево» переход на начало слова, а CTRL+ «стрелка вправо» – в конец слова.
«HOME» смещает курсор клавиатуры в начало строки, а «END» – в конец.
Если в тексте более одной строки то комбинации CTRL+HOME и CTRL+END перемещают курсор в начало или в конец целого текста.

Примечание. Точно так же редактируются: формулы, функции, числа, даты и логические значения.

Стоит еще отметить, что простой режим редактирования позволяет задавать тексту свой стиль оформления: полужирный, курсив, подчеркнутый и цвет.

Обратите внимание, что стиль текста не отображается в строке формул, поэтому его удобнее задавать, редактируя непосредственно в самой ячейке.

Читайте так же: как перевести число и сумму прописью в Excel.

Редактирование в Excel

Существует два основных метода как редактировать в Excel рабочий лист.

Редактирование в Excel исходных данных, т.е. текстовых надписей, числовых значений и формул, включенных в рабочий лист.
Изменение физической структуры рабочего листа, например вставка и удаление столбцов или строк, изменение размера ячеек и т.д.

Редактирование данных Excel

Чтобы редактировать данные Excel в одной ячейке, выполните следующее.

Дважды щелкните на ячейке, в которой содержатся данные, требующие редактирование в Excel.

Microsoft Excel вставит в указанную ячейку курсор.

Измените данные, используя клавиши «Backspace», «Delete» или вводя новые данные.

Помни! После щелчка на ячейке Microsoft Excel отображает ее содержимое в строке формул. Вы всегда можете изменить данные ячейки в строке формул, которая более приспособлена для редактирования содержимого рабочего листа, чем ячейки.

Теперь вы знаете, как редактировать в Excel.

Желаем удачи в ваших начинаниях.

Работа с файлами Excel

Под редактированием таблицы понимается изменение содержимого ячеек и изменение структуры таблицы (добавление, удаление строк или столбцов). Изменение вида таблицы, например, шрифта, которым отображается содержимое ячеек, цвета закраски ячеек, вида границ ячеек называется форматированием. Задачи форматирования рассматриваются в статье Форматирование таблицы в Excel.

Чтобы начать работу с существующей таблицей, ее нужно загрузить в программу Microsoft Office Excel. Сделать это можно несколькими способами.

Если программа Microsoft Office Excel не запущена, то нужно раскрыть папку, в которой находится нужная книга, и сделать двойной щелчок левой кнопкой мыши на значке, изображающем книгу.

Содержимое ячейки Excel

Для того чтобы изменить содержимое ячейки, нужно сделать двойной щелчок левой кнопкой мыши в выбранной ячейке или, используя клавиши перемещения курсора, установить маркер активной ячейки (рамку) в эту ячейку и нажать клавишу . В результате этих действий в ячейке появится курсор. Дальнейшее редактирование содержимого ячейки выполняется обычным образом. Для перемещения по тексту, который находится внутри ячейки, можно использовать клавиши перемещения курсора влево и вправо. Чтобы удалить лишний символ, следует установить курсор после этого символа и нажать клавишу . Чтобы вставить пропущенный символ, установите курсор в ту точку текста, где он должен быть, и нажмите соответствующую клавишу с символом. Для окончания редактирования содержимого ячейки нажмите клавишу , в этом случае курсор переместится в следующую ячейку столбца, или нажмите клавишу , курсор переместится в следующую ячейку строки.

Как добавить строку, столбец в таблице Excel

При составлении таблиц часто возникает необходимость добавления информации в уже заполненную таблицу, например фамилию нового сотрудника. Чтобы сделать это, надо сначала вставить в таблицу пустую строку, а затем ввести необходимые данные.

Для того чтобы между заполненными строками таблицы вставить пустую строку, сначала требуется выделить строку, перед которой пустая строка должна быть вставлена. Для этого надо щелкнуть левой кнопкой мыши на номере строки, перед которой нужно вставить пустую строку. Строка будет выделена цветом.

Как удалить строку, столбец в Excel

Чтобы удалить строку, вначале нужно ее выделить, щелкнув на номере строки листа, а затем сделать щелчок на находящейся на вкладке Главная -> Ячейки кнопке Удалить.

Как изменить ширину столбца в Excel

Довольно часто возникает необходимость изменить ширину столбца таблицы. Это можно сделать несколькими способами.

Проще всего изменить ширину столбца можно при помощи мыши. Для этого надо установить указатель мыши в заголовок листа на правую границу столбца (указатель мыши примет форму двунаправленной стрелки), нажать левую кнопку и, удерживая ее нажатой, перетащить границу колонки вправо или влево.

Как изменить высоту строки в Excel

Если нужно изменить высоту строки, достаточно установить указатель мыши на нижнюю границу строки таблицы, нажать левую кнопку мыши и, удерживая кнопку нажатой, переместить границу вниз или вверх.

Перемещение строк, столбцов, ячеек в Excel

Иногда возникает необходимость переместить несколько строк или столбцов таблицы, например, для того, чтобы изменить порядок их следования.

Подготовить место, куда должен быть вставлен фрагмент. Подготовка заключается в добавлении в таблицу необходимого количества пустых строк или столбцов. Например, для того чтобы столбцы Кол-во и Цена стояли перед столбцом Стоимость, нужно перед этим столбцом вставить два пустых столбца.

Копирование строк, столбцов, ячеек в Excel

Операция копирования выполняется аналогично операции перемещения. Точно так же, как и при перемещении, перед тем как выполнить операцию Вставить, нужно подготовить место для копируемого фрагмента, добавить в таблицу пустые строки и столбцы.

Для того чтобы скопировать фрагмент таблицы, нужно:
Выделить фрагмент таблицы и на вкладке Главная -> Буфер обмена выбрать команду Копировать. Программа Excel поместит копируемый фрагмент в буфер обмена.

Источник

Как документ Эксель перевести в Ворд

Microsoft Excel и Word — популярные программы, предназначенные для ввода и обработки информации. В текстовом редакторе удобно редактировать инструкции, а в Excel легко работать с таблицами. Однако очень часто возникает необходимость переноса ячеек и их содержимого в документ Word. Как это сделать? Эта статья поможет вам ответить на этот вопрос.

Как перевести документ Excel в Word

Способ 1

Откройте электронную таблицу, сохраненную в Excel.

Открытие электронной таблицы, сохраненной в Excel

Используйте мышь, чтобы выделить информацию, которую вы хотите передать в текстовый редактор.

С помощью мыши выделите информацию, которую необходимо перенести в документ текстового редактора

Щелкните правой кнопкой мыши выбранную область. В открывшемся диалоговом окне щелкните строку «Копировать».

Щелкните правой кнопкой мыши выбранную область, выберите «Копировать»

Откройте редактор MS Word.

Откройте программу MS Word

Щелкните правой кнопкой мыши пустой лист.

Щелкните правой кнопкой мыши пустой лист

В открывшемся интерфейсе найдите строку «Параметры вставки».

В появившемся интерфейсе находим строку «Параметры вставки»

Наведите указатель мыши на один из значков в разделе «Параметры клея». Выбирайте лучший вариант среди предложенных.

Наведите курсор на один из значков в разделе «Параметры вставки» и выберите лучший вариант

Значки «Использовать целевые стили» и «Связать и использовать целевые стили» позволяют пользователю просматривать информацию в текстовом редакторе, как она была представлена в Excel.

Значок «Изображение» в Word вставляет таблицы в качестве иллюстраций. Однако возможность изменять содержимое ячеек в этом изображении уже будет потеряна.

Примечание! Чтобы быстро вставить таблицу Excel в документ Word, вы можете использовать клавиши «Shift + Insert» и «Ctrl + V».

Чтобы быстро вставить документ в Word, нажмите комбинацию клавиш «Shift + Insert»

Чтобы быстро вставить документ в Word, нажмите комбинацию клавиш «Ctrl + V»

Однако в документе текстового редактора Word будет отображаться только содержимое ячейки, но на этот раз без таблицы.

Способ 2

Откройте программу MS Word

На панели инструментов щелкните вкладку «Вставка».

На панели инструментов нажмите вкладку «Вставка»

В группе «Таблицы» щелкните одноименный значок. Откроется контекстное меню этой группы.

В группе «Таблицы» щелкните одноименный значок

В выделенном окне найдите строку «Таблица Excel». Нажмите здесь.

В выделенном окне выберите строку «Таблица Excel»

Откройте документ в MS Excel.

Открытие электронной таблицы, сохраненной в Excel

Выделите мышью данные, которые хотите перенести в документ Word.

С помощью мыши выделите информацию, которую необходимо перенести в документ текстового редактора

Щелкните правой кнопкой мыши выбранную таблицу. Скопируйте содержимое ячеек, щелкнув строку «Копировать» в »диалоговом окне».

Щелкните правой кнопкой мыши выбранную область, выберите «Копировать»

Запомните номер ячейки, которая находится в верхнем левом углу таблицы.

Запомните номер первой ячейки в таблице

На панели задач щелкните открытый документ в MS Word.

На панели задач нажмите на документ, открытый в MS Word

Щелкните правой кнопкой мыши ячейку, в которую вы хотите вставить содержимое электронной таблицы Excel.

Щелкните правой кнопкой мыши ячейку, в которую вы хотите вставить содержимое электронной таблицы Excel

В открывшемся диалоговом окне щелкните значок «Вставить».

Нажмите «Вставить»

Отредактируйте таблицу и ее содержимое с помощью инструментов форматирования текстового редактора.

Таблица Excel в документе Word редактируется с использованием форматирования текстового редактора

Способ 3

Открытие электронной таблицы, сохраненной в Excel

Запомните количество столбцов и строк в таблице, которое необходимо перенести в документ редактора Word.

Запоминаем количество столбцов и строк таблицы, которые необходимо перенести в документ Word

Откройте редактор MS Word.

Откройте программу MS Word

На панели инструментов найдите вкладку Вставка. Нажмите здесь.

На панели инструментов нажмите вкладку «Вставка»

Щелкните значок «Таблица», расположенный в одноименной группе, вызывая при этом дополнительное меню.

В группе «Таблицы» щелкните одноименный значок

В развернутом дополнительном списке щелкните строку «Вставить таблицу».

В открывшемся диалоге нажмите на строку «Вставить таблицу»

В новом открытом интерфейсе укажите количество строк и столбцов. После настройки параметров нажмите «ОК».

В открывшемся новом интерфейсе укажите количество строк и столбцов, нажмите «ОК»

На панели задач щелкните открытый документ в MS Excel.

На панели задач щелкните документ, открытый в MS Excel

Выберите таблицу, которую хотите перенести в документ редактора Word.

Выберите таблицу для переноса в документ Word

Щелкните выделенные ячейки правой кнопкой мыши. В появившемся диалоговом окне щелкните строку «Копировать».

Щелкните правой кнопкой мыши выбранную область, выберите «Копировать»

Вернитесь к открытому документу текстового редактора.

Вернуться к открытому документу в текстовом редакторе

Выделите мышкой таблицу, созданную в документе MS Word.

Выделите мышью таблицу, созданную в документе MS Word

Щелкните устройство правой кнопкой мыши в любой ячейке.

Щелкните правой кнопкой мыши любую ячейку

В открытом интерфейсе щелкните значок «Заменить содержимое ячейки».

Щелкните значок «Заменить содержимое ячейки»

Для редактирования таблицы, перенесенной в документ текстового редактора, вы можете использовать инструменты форматирования MS Word.

Вы можете редактировать таблицу с помощью инструментов форматирования MS Word

Примечание! Вышеупомянутые методы не позволяют вставлять таблицы Excel вместе с формулами.

Видео — Как перенести таблицу из Excel в Word

Способ 4

Откройте электронную таблицу в MS Excel.

Открытие электронной таблицы, сохраненной в Excel

Выделите стол мышью.

Выделите стол мышкой

Щелкните устройство в таблице правой кнопкой мыши. В диалоговом окне щелкните строку «Копировать».

Щелкните правой кнопкой мыши выбранную область, выберите «Копировать»

Откройте текстовый редактор.

Откройте программу MS Word

Зайдите и щелкните вкладку «Главная».

Перейдите на вкладку «Главная»

В разделе «Буфер обмена» найдите значок «Вставить».

В группе «Буфер обмена» находим значок «Вставить»

Щелкните стрелку под значком «Вставить».

Щелкните стрелку, расположенную под кнопкой «Вставить»

Найдите строку «Специальная вставка» и щелкните по ней.

В открывшемся окне выберите строку «Специальная вставка», нажмите на нее

В появившемся окне выберите фразу «Лист (объект) Microsoft Excel)».

Щелкните строку «Лист (объект) Microsoft Excel)»

Подтвердите свои действия, нажав кнопку «ОК».

Нажмите кнопку «ОК»

Примечание! В интерфейсе специальной вставки слева есть опции «Вставить» и «Связать».

для представления таблицы в MS Word в виде стандартной документации установите флажок рядом с фразой «Вставить»;

Нажмите на пункт «Вставить»

чтобы изменить данные, доступные в текстовом редакторе, выберите строку «Ссылка».

Ставим галочку на пункт «Подключить»

Таким образом, данные Word будут связаны с информацией, содержащейся в ячейках документа Excel.

При необходимости обновление данных возможно через главное меню в редакторе Word. Это требует:

Щелкните правой кнопкой мыши таблицу в MS Word.

Щелкните правой кнопкой мыши таблицу в MS Word

Найдите в появившемся диалоговом окне строку «Обновить ссылку» и щелкните по ней.

Найдите в появившемся диалоговом окне строку «Обновить ссылку» и щелкните по ней

В результате, если данные были изменены в документе Excel, такие же изменения появятся на листе Word.

Также узнайте несколько эффективных способов из новой статьи — «Как перевести Excel в Word».

Видео — Связывание данных таблиц Excel и документов Word

Источник

Открывайте, просматривайте, редактируйте Excel онлайн бесплатно.

Питаться от

aspose.com

aspose.cloud

Создайте новый файл Excel из галереи шаблонов:

Расширять

Weekly meal chart

Personal transactions list

Warehouse Inventory List

Simple Grocery List

Quarterly Sales Report

Purchase Order

Project Tasks List

Pay Slip

Mortgage Calculator

Monthly Vehicle Payment Calculator

Monthly Budget

Issue Tracker

Invoice

Card Expense Tracker

Calorie Fat Percentage Log

Call Log

Annual School Budget

Annual Employee Turnover Calculator

Добавить это приложение в закладки

Нажмите Ctrl + D, чтобы добавить эту страницу в избранное, или Esc, чтобы отменить действие.

Отправьте ссылку для скачивания на

Отправьте нам свой отзыв

Ой! Произошла ошибка.

Недопустимый файл. Убедитесь, что загружается правильный файл.

Ошибка успешно зарегистрирована.

Вы успешно сообщили об ошибке. Вы получите уведомление по электронной почте, когда ошибка будет исправлена.

Нажмите эту ссылку, чтобы посетить форумы.

Немедленно удалите загруженные и обработанные файлы.

Вы уверены, что хотите удалить файлы?

Введите адрес

Источник

Содержание

1 Редактирование строки текста в ячейках
- 1.1 Как сделать несколько строк в ячейке Excel?
- 1.2 Режим редактирования
2 Редактирование в Excel
3 Редактирование данных Excel

Редактирование строки текста в ячейках

Редактировать содержимое ячеек можно двумя способами:

1 Из строки формул. Щелкните по ячейке, в которой необходимо отредактировать данные. В строке формул отобразиться содержимое, которое доступно для редактирования. Сделайте необходимые изменения, после чего нажмите Enter или кликните по кнопке «Ввод», которая размещена в начале строки формул. Для отмены изменений можно нажать клавишу «Esc» или кнопку «Отмена» (возле кнопки «Ввод»).
2 Из самой ячейки. Перейдите на ячейку и нажмите клавишу F2 или сделайте по ней двойной щелчок мышкой. Тогда в ячейке появится курсор клавиатуры, а ее размер изменится на время редактирования. После всех изменений нажмите Enter или Tab или кликните мышкой на любую другую ячейку. Для отмены редактирования нажмите клавишу «Esc».

Как сделать несколько строк в ячейке Excel?

Режим редактирования

Клавиша «DELETE» удаляет символ справа, а «Backspace» слева.
CTRL+ «стрелка влево» переход на начало слова, а CTRL+ «стрелка вправо» – в конец слова.
«HOME» смещает курсор клавиатуры в начало строки, а «END» – в конец.
Если в тексте более одной строки то комбинации CTRL+HOME и CTRL+END перемещают курсор в начало или в конец целого текста.

Примечание. Точно так же редактируются: формулы, функции, числа, даты и логические значения.

Читайте так же: как перевести число и сумму прописью в Excel.

Существует два основных метода как редактировать в Excel рабочий лист.

Редактирование в Excel исходных данных, т.е. текстовых надписей, числовых значений и формул, включенных в рабочий лист.
Изменение физической структуры рабочего листа, например вставка и удаление столбцов или строк, изменение размера ячеек и т.д.

Редактирование данных Excel

Чтобы редактировать данные Excel в одной ячейке, выполните следующее.

Дважды щелкните на ячейке, в которой содержатся данные, требующие редактирование в Excel.

Microsoft Excel вставит в указанную ячейку курсор.

Измените данные, используя клавиши «Backspace», «Delete» или вводя новые данные.

Теперь вы знаете, как редактировать в Excel.

Желаем удачи в ваших начинаниях!!!

Работа с файлами Excel

Содержимое ячейки Excel

Как добавить строку, столбец в таблице Excel

Как удалить строку, столбец в Excel

Как изменить ширину столбца в Excel

Как изменить высоту строки в Excel

Перемещение строк, столбцов, ячеек в Excel

Подготовить место, куда должен быть вставлен фрагмент. Подготовка заключается в добавлении в таблицу необходимого количества пустых строк или столбцов. Например, для того чтобы столбцы Кол-во и Цена стояли перед столбцом Стоимость, нужно перед этим столбцом вставить два пустых столбца.

Копирование строк, столбцов, ячеек в Excel

Для того чтобы скопировать фрагмент таблицы, нужно:
Выделить фрагмент таблицы и на вкладке Главная -> Буфер обмена выбрать команду Копировать. Программа Excel поместит копируемый фрагмент в буфер обмена.

Источник

Редактирование документов Word из кода VBA Excel. Добавление и форматирование текста. Объект Word.Range, свойство Text, методы InsertAfter и InsertBefore.

Работа с Word из кода VBA Excel
Часть 3. Редактирование документов Word
[Часть 1] [Часть 2] [Часть 3] [Часть 4] [Часть 5] [Часть 6]

Добавление текста в новый документ

Основные объекты, использующиеся в VBA Word для определения места вставки, добавления и форматирования текста – это Selection (выделение), Range (диапазон) и Bookmark (закладка).

Selection и Range позволяют заполнять текстом новые документы или редактировать существующие. Закладки можно использовать для вставки изменяемых реквизитов в шаблоны различных документов: договоры, акты, справки.

Объект Range имеет преимущество перед объектом Selection, так как он может быть создан только программно и не зависит от действий пользователя. Если для вставки и форматирования текста будет использоваться объект Selection, а пользователь во время работы программы просто поставит курсор в другое место документа, результат будет непредсказуем.

Word.Range кардинально отличается от объекта Range в Excel. В приложении Word он представляет из себя набор из одного или множества символов. А также он может вообще не содержать ни одного символа, а быть указателем ввода текста (виртуальным курсором).

Объект Range возвращается свойством Range других объектов приложения Word: Document, Selection, Bookmark, Paragraph, Cell (объект Table).

Вставка текста без форматирования

Если текст вставляется без форматирования, достаточно одной строки кода (myDocument – это переменная):

Вставка текста с заменой имеющегося: myDocument.Range.Text = "Вставляемый текст"
Добавление текста после имеющегося: myDocument.Range.InsertAfter "Добавляемый текст"
Добавление текста перед имеющимся: myDocument.Range.InsertBefore "Добавляемый текст"

Методами InsertAfter и InsertBefore можно вставить текст и на пустую страницу, также, как с помощью свойства Text. Перейти на новый абзац и начать предложение с красной строки можно с помощью ключевых слов vbCr (vbNewLine, vbCrLf) и vbTab.

Вставка текста с форматированием

Для форматирования отдельных участков текста необходимо указать диапазон символов, входящих в этот участок. Здесь нам также поможет объект Range, которому можно задать любой набор символов, содержащихся в документе Word.

Синтаксис присвоения диапазона символов объекту Range:

myDocument.Range(Start:=n, End:=m)

‘или без ключевых слов Start и End

myDocument.Range(n, m)

myDocument – переменная;
n – номер точки перед начальным символом;
m – номер точки после конечного символа.

Счет точек вставки начинается с нуля. Знаки переноса строки, возврата каретки и табуляции учитываются как отдельные символы. 0 – это для объекта Word.Range виртуальная точка вставки на пустом документе, 1 – точка между первым и вторым символом, 2 – точка между вторым и третьим символом и т.д.

На пустом документе объекту Range можно присвоить только виртуальную точку вставки:
myDocument.Range(Start:=0, End:=0)

Первый символ в документе с текстом:
myDocument.Range(Start:=0, End:=1)

Диапазон с 11 по 20 символ:
myDocument.Range(Start:=10, End:=20)

Реальная точка вставки (курсор) принадлежит объекту Selection, который создается вручную или программно с помощью метода Select.

Вставка курсора в начало документа:
myDocument.Range(Start:=0, End:=0).Select

Эта строка вставит курсор между пятым и шестым символами:
myDocument.Range(Start:=5, End:=5).Select

Вставка курсора в конец документа:
myDocument.Range(.Range.Characters.Count - 1, .Range.Characters.Count - 1).Select

Ссылку на объект Range можно присвоить переменной, но при форматировании ее придется каждый раз переопределять и код получится длиннее. Пример присвоения ссылки объектной переменной:

Dim myRange As Word.Range

Set myRange = myDocument.Range(Start:=0, End:=20)

Для Range(Start:=0, End:=20) в документе должно быть как минимум 20 символов.

Однострочные примеры редактирования и форматирования текста

Вставка дополнительного текста внутри имеющегося после заданной точки:
myDocument.Range(Start:=10, End:=10).InsertAfter "Вставляемый текст"

Новый абзац с красной строки (предыдущая строка должна заканчиваться символом возврата каретки или переноса строки):
myDocument.Range.InsertAfter vbTab & "Красная строка"

Присвоение шрифту заданного диапазона зеленого цвета:
myDocument.Range(Start:=10, End:=65).Font.ColorIndex = wdGreen

Меняем обычное начертание на курсив:
myDocument.Range(Start:=10, End:=65).Font.Italic = True

Указываем размер шрифта:
myDocument.Range(Start:=10, End:=65).Font.Size = 22

Применение стандартных стилей:
myDocument.Range(Start:=0, End:=16).Style = "Заголовок 1"

Если вас заинтересуют другие команды форматирования текста, запишите их макрорекордером в VBA Word и примените к объекту Range.

Пример 1
Добавление текста в новый документ без форматирования:

Sub Primer1()

On Error GoTo Instr

Dim myWord As New Word.Application, _

myDocument As Word.Document

Set myDocument = myWord.Documents.Add

myWord.Visible = True

With myDocument

.Range.Text = «Заголовок по центру» & vbCr

.Range(Start:=0, End:=19).ParagraphFormat.Alignment _

= wdAlignParagraphCenter

.Range.InsertAfter _

vbTab & «Первый абзац с красной строки» & vbCr & _

«Второй абзац не с красной строки» & vbCr & _

vbTab & «Третий абзац с красной строки»

End With

Set myDocument = Nothing

Set myWord = Nothing

Exit Sub

Instr:

If Err.Description <> «» Then

MsgBox «Произошла ошибка: « & Err.Description

End If

If Not myWord Is Nothing Then

myWord.Quit

Set myDocument = Nothing

Set myWord = Nothing

End If

End Sub

Пример 2
Добавление текста в новый документ с форматированием:

Sub Primer2()

On Error GoTo Instr

Dim myWord As New Word.Application, _

myDocument As Word.Document

Set myDocument = myWord.Documents.Add

myWord.Visible = True

With myDocument

.Range.Text = «Заголовок по центру» & vbCr

.Range(Start:=0, End:=19).Style = «Заголовок»

.Range(Start:=0, End:=19).ParagraphFormat.Alignment _

= wdAlignParagraphCenter

.Range.InsertAfter «Заголовок 1 не по центру» & vbCr

.Range(Start:=20, End:=44).Style = «Заголовок 1»

.Range.InsertAfter vbTab & «Шрифт по умолчанию « _

& «с красной строки» & vbCr

.Range.InsertAfter «Зеленый курсив, размер 20»

.Range(Start:=82, End:=107).Font.Italic = True

.Range(Start:=82, End:=107).Font.Size = 20

.Range(Start:=82, End:=107).Font.ColorIndex = wdGreen

End With

Set myDocument = Nothing

Set myWord = Nothing

Exit Sub

Instr:

If Err.Description <> «» Then

MsgBox «Произошла ошибка: « & Err.Description

End If

If Not myWord Is Nothing Then

myWord.Quit

Set myDocument = Nothing

Set myWord = Nothing

End If

End Sub

Вы можете запустить эти примеры в редакторе VBA Excel на своем компьютере и посмотреть результаты.

Источник

Рабочее поле таблицы предназначено для создания документов. В отличие от Word документ Excel может состоять из нескольких независимых частей (листов). Таблицы можно форматировать, задавать стиль, объединять в сводные таблицы.

Документ может быть оформлен с использованием графических элементов, рисунков, графиков, диаграмм, декоративных надписей и спецэффектов. Но самое основное назначение документов Excel ‒ это создание таблиц с формулами и работа с базой данных.

Создание пустой книги Excel;
Интерфейс программы Excel;
Расположение информации в ячейках Excel.

Создание документа начинается с выбора шаблона таблицы. По умолчанию открывается простая таблица в виде рабочего поля, состоящего из ячеек одинаковой ширины и высоты. Такой вид таблицы используется чаще всего для отчетов, не требующих специального оформления, либо автор документа желает создать свой собственный дизайн и структуру таблицы, которой нет в коллекции шаблонов Excel.

Облегчить процесс форматирования таблицы можно с помощью встроенных стилей оформления таблиц, находящихся в разделе «Стили» закладки «Главная».

При помощи инструмента «Форматировать как таблицу…» можно выбрать один из вариантов оформления. Причем заголовки столбцов будут по умолчанию снабжены инструментами сортировки и фильтрации данных (удобно использовать для таблиц больших размеров). Применить один из стилей таблицы можно следующим образом:

выбрать рабочую область таблицы, щелкнуть по иконке подходящего шаблона, затем уточнить при необходимости диапазон таблицы в окне настройки и нажать кнопку ОК.

Далее можно приступать к форматированию заголовков, и наполнению таблицы.

Разработчики Microsoft Excel создали дополнительно множество готовых шаблонов и стилей таблиц, которые оформлены и содержат формулы для выполнения наиболее популярных расчетов. Пользователь может не знать, как выполняются те или иные расчеты. Достаточно ввести исходные данные и расчет будет произведен автоматически. Скачать эти шаблоны можно на официальном сайте корпорации Microsoft в разделе «Шаблоны» и сохранить на компьютере. Вот небольшой перечень готовых бесплатных расчетов:

Средства для отслеживания личных финансов;
Расчет кредита на обучение;
Расписание занятий;
Учебный календарь;
Планировщик проекта;
Учет проектов;
График погашения кредита.

И еще тысячи шаблонов для обучения, календарей, документов и отчетности, счетов, планирования и т.д.

Интерфейс программы Excel

Интерфейс Excel аналогичен Word, состоит из вкладок, ленты меню с набором команд и инструментов вверху экрана. Чуть ниже, расположена строка формул, а внизу экрана находится строка состояния, отражающая статистические данные рабочей таблицы и выполняемых действий.

Набор инструментов в ленте меню логичен и достаточный для работы с таблицами, но при желании может быть изменен в окне «Параметры Excel».

Вкладка Главная

Эта закладка содержит основные инструменты форматирования и редактирования таблиц и отдельных ячеек:

Блок «Буфер обмена» предназначен для копирования и вставки содержимого ячеек или диапазона таблицы.
Блок «Шрифты» отвечает за оформление всех характеристик шрифта (размер, тип, цвет, фон и начертание).
Блок «Выравнивание» определяет расположение содержимого ячейки относительно границ (по правому или левому краю, по центру) и его распределение и ориентацию внутри ячейки.
Блок «Число» отвечает за отображение стиля и формата чисел.
Блок «Стили» был описан выше. Дополнительно имеется форматирование стилей отдельных ячеек с добавлением других элементов.
Блок «Ячейки» предназначен для добавления или удаления столбцов, строк или ячеек и настройки размера, видимости, защиты, форматирования ячеек и листов таблицы.
Блок «Редактирование» позволяет добавлять некоторые быстрые функции (суммирование, автоматическое заполнение или очищение ячеек), а также фильтровать и находить нужные данные.

Вкладка Вставка

Закладка «Вставка» предназначена для добавления в таблицу различных элементов и их настройки. В рабочую область таблицы можно добавить:

сводные таблицы;
фигуры, элементы SmartArt, рисунки картинки;
диаграммы и графики;
специальные диаграммы и графики (спарклайны);
фильтры;
ссылки;
графически надписи и объекты;
нестандартные символы и формулы (изображение).

После добавления этих элементов становится доступным специальное меню для форматирования и настройки.

Вкладка Разметка страницы

Отвечает за настройку параметров страницы, каждого листа книги, формата текста в ячейке, определяет стили и темы оформления таблиц, заголовков и упорядочивания элементов документа.

Вкладка Формулы

Эта вкладка, пожалуй, самая важная и интересная среди всех инструментов Excel. Позволяет вставлять существующие или создавать собственные формулы, отлаживать каждый элемент формулы по отдельности, присваивать имена ячейкам, определять зависимости ячеек, а также контролировать правильность вычислений.

Вкладка Данные

Закладка предназначена для работы с данными из сторонних источников, выполнения сортировки и фильтрации данных таблицы, а также перераспределения, консолидации и построения простых сценариев для данных таблицы. В этой же вкладке можно построить или удалить группировку части значений внутри таблицы или автоматически добавить промежуточные итоги для сформированных групп.

Вкладка Рецензирование

Вкладка «Рецензирование» позволяет настраивать и выполнять проверку правописания, создавать примечания, добавлять защиту различных уровней для всех элементов документа посредством паролей, а также регулировать доступ к документу при совместной работе над документом.

Вкладка Вид

В этой закладке можно настроить различные режимы просмотра документа на экране монитора, масштаб, отображения фоновых инструментов. Настроить закрепление заголовков (полезно для многостраничных таблиц), расположение и переход в другие окна (при просмотре и работе с несколькими файлами). Здесь же находится инструмент для записи и отображения макросов.

Строка формул

Строка формул состоит из окна, в котором указано имя активной ячейки или ее адрес. В следующем окне отображена формула, которую содержит эта ячейка. В этой же строке (если установить курсор) можно создавать формулу с помощью Мастера функций (кнопка слева от поля строки). Мастер функций помогает пошагово создать формулу, показывая подсказки и перечень доступных функций в качестве аргументов.

Расположение информации в ячейках Excel

Содержимое ячейки состоит из значений, текста или формул. Чтобы их добавить в пустую ячейку, необходимо выбрать ячейку курсором или стрелками. Если в ячейке содержатся какие-либо данные, целесообразно включить режим редактирования (дважды щелкнуть мышью до появления курсора внутри).

В формулах в качестве ее компонентов выступают значения других ячеек. По умолчанию в формуле они указываются в виде ссылки. Ссылки бывают двух типов:

R1C1;
A1.

Принципиальное отличие этих двух типов при отображении их в формулах:

При редактировании и просмотре формул, все адреса влияющих ячеек имеют свой цвет. Параллельно сами ячейки выделены рамкой этого же цвета.

Источник