ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / работа с таблицами Word
9 сообщений из 34, страница 2 из 2
  2  все
работа с таблицами Word
    #39202265
правильный проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
правильный проходящий.
Гость
johngornправильный проходящий.,

может мы друг друга не поняли, можно мне вот прям разжувать и написать текст программы, который делает что то с конкретным столбцом и ничего кроме него?Пока что мне приходится вам разж Ё вывать. Я понял, что вам надо и привел пример рабочего кода, выполняющего, в том числе и именно то, что вы хотите получить. Если вы этого не видите, то я тут ничем помочь не могу, я не окулист.
...
Рейтинг: 0 / 0
28.03.2016, 16:00
| Ответить | Цитировать | Написать  
работа с таблицами Word
    #39202307
правильный проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
правильный проходящий.
Гость
johngorn, последний раз выкладываю кусок, протестированный, проверенный на разных версиях офиса. Возможно, у тебя версия, работающая не так как ожидаешь из-за отсутствия третьей строки, которую я тут добавил как раз для независимости от версии. Если и это у тебя не заработает или ты не поймешь как это работает, то я умываю руки.
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
		loDoc.Tables(1).Columns(4).Select
		With loWord.Selection
			.SelectColumn
			With .Font
				.Size = 24
				.Name = "Arial New"
				.Bold = .T.
			Endwith
			.ParagraphFormat.Alignment = 2
		Endwith
...
Рейтинг: 0 / 0
28.03.2016, 16:28
| Ответить | Цитировать | Написать  
работа с таблицами Word
    #39202312
johngorn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
johngorn
Гость
правильный проходящий.johngornправильный проходящий.,

да я это все понимаю, я не увидел кода который форматирует конкретной взятый заполненный столбец например по центру и нужным шрифтом..... как это сделать , как строку я знаю, а как столбец ?Так же, как и строку. Совсем слепой?
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
		loDoc.Tables(1).Columns(4).Select

********** КАК СДЕЛАТЬ ФОРМАТИРОВАНИЕ ВСЕГО СТОЛБЦА НУЖНЫМ МНЕ ШРИФТОМ И ПО ЦЕНТРУ?????????
****** ВСЕ НИЖНИЕ ВАРИАНТЫ ПЕРЕПРОБЫВЛ - НЕРАБОТАЕТ
*loDoc.Selection.ParagraphFormat.Alignment =1
*Selection.ParagraphFormat.Alignment =1
*m.loTable.Columns(4).Font.Size = 10

		With loWord.Selection.Range



выделяем 4 столбец, это у меня было
loDoc.Tables(1).Columns(4).Select
делаем Selection
With loWord.Selection.Range
а вот где сам код форматирования столбца?
...
Рейтинг: 0 / 0
28.03.2016, 16:32
| Ответить | Цитировать | Написать  
работа с таблицами Word
    #39202326
johngorn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
johngorn
Гость
правильный проходящий.,

вот в макросе, что происходит:
Selection.MoveDown Unit:=wdLine, Count:=3, Extend:=wdExtend
Selection.Font.Name = "Arial"
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
Selection.Font.Size = 14

так тоже пробовал не работает......
...
Рейтинг: 0 / 0
28.03.2016, 16:39
| Ответить | Цитировать | Написать  
работа с таблицами Word
    #39202337
johngorn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
johngorn
Гость
правильный проходящий.johngorn, последний раз выкладываю кусок, протестированный, проверенный на разных версиях офиса. Возможно, у тебя версия, работающая не так как ожидаешь из-за отсутствия третьей строки, которую я тут добавил как раз для независимости от версии. Если и это у тебя не заработает или ты не поймешь как это работает, то я умываю руки.
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
		loDoc.Tables(1).Columns(4).Select
		With loWord.Selection
			.SelectColumn
			With .Font
				.Size = 24
				.Name = "Arial New"
				.Bold = .T.
			Endwith
			.ParagraphFormat.Alignment = 2
		Endwith



вот это работает, спасибо за подсказку, а то что до этого было не работало.....
...
Рейтинг: 0 / 0
28.03.2016, 16:46
| Ответить | Цитировать | Написать  
работа с таблицами Word
    #39202350
T1gRa_NT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
T1gRa_NT
Участник
Код: plsql
1.
.Alignment = 2

главное тут, у Вас было прописано уже из макрорекодора который уже подставил расшифровку, однако из Foxа необходимо указывать константу. Посмотреть константу можно по F2 в справочнике по VBA WORD или остановить выполнение программы и в командной строке фоксе.
P.S. хорошая тема http://www.foxclub.ru/sol/solution79.php
...
Рейтинг: 0 / 0
28.03.2016, 16:53
| Ответить | Цитировать | Написать  
работа с таблицами Word
    #39202548
johngorn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
johngorn
Гость
T1gRa_NT,

спасибо, уже что нужно было сделал, на досуге гляну обязательно, думаю даже завтра.
остался еще один сумасшедший вопрос, который думал не задавать, как сделать, чтобы в большой вордовской таблице, первая строчка была всегда заглавной на следующей странице....)))))
...
Рейтинг: 0 / 0
28.03.2016, 21:13
| Ответить | Цитировать | Написать  
работа с таблицами Word
    #39202661
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
Запусти запись макроса, задай перенос шапки и спиши к себе код из макроса.
...
Рейтинг: 0 / 0
29.03.2016, 06:10
| Ответить | Цитировать | Написать  
работа с таблицами Word
    #39202772
johngorn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
johngorn
Гость
Dima T,
хм.... знал как это в ворде сделать, но не думал что код получится в одну строку))))
.Rows(1).HeadingFormat = .T.
...
Рейтинг: 0 / 0
29.03.2016, 09:54
| Ответить | Цитировать | Написать  
9 сообщений из 34, страница 2 из 2
  2  все
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / работа с таблицами Word
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=39202326&tid=1582137]:
 0ms
get settings:
 9ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 173ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 1ms
others: 236ms
total:  504ms
созд. / загр.: 504ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]