1

Тема: Копирование данных в Word из Excel

Скажите пожалуйста, можно ли сделать то, что представлено на видео, толко не выбирая ничего из списка? Т.е., чтобы таблица как бы внедрялась в Word без изменения своей структуры и сохраняя связи. Если да, буду признателен за помощ. smile

внешняя ссылка

2

Re: Копирование данных в Word из Excel

Т.е в документе Word должна быть таблица 4 на 4 с возможностью обновления?

3

Re: Копирование данных в Word из Excel

aap77, с возможностью обновления, но не обязательно 4х4. Нужно, чтобы из Excel копировалось только то, что выделено(либо только то, что находится в буфере обмена).  Но таким образом, чтобы таблица вставилась без нарушения порядка строк и столбцов. Т.е. один в один как в Excel, но в любое место в таблице Word.

4

Re: Копирование данных в Word из Excel

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

5

Re: Копирование данных в Word из Excel

Как узнать что в буфере таблица я пока тоже не знаю, и подозреваю, что никак. smile Нужно придумать какой то принципиально другой механизм.

6

Re: Копирование данных в Word из Excel

Booroondook пишет:

Как узнать что в буфере таблица я пока тоже не знаю, и подозреваю, что никак. smile Нужно придумать какой то принципиально другой механизм.

Хотя из Excel-я в Excel получается ведь, возможно и тут можно.

7

Re: Копирование данных в Word из Excel

'с помощью DataObject будем получать доступ к буферу обмена Windows
    Dim myData As New DataObject
    'помещаем в переменную myData содержимое буфера обмена Windows
    myData.GetFromClipboard
    For q = 1 To Len(myData.GetText)
    'Mid$(String,Start,[Length])
    Debug.Print Asc(Mid$(myData.GetText, q, 1))
    Next q

доколупать кто-то сможет?
была таблица на 5 столбцов и две строки, вывело
13
10
9
9
9
9
13
10
9
9
9
9
13
10
13
10
как бы то - только я нигде инфу не видел, имеется ввиду как это зависит от количества столбцов и строк, чтоб точно знать