| Вопрос: Работа с буфером обмена | Добавлено: 27.10.10 11:04 |
Автор вопроса:  Mihail
|
|
Уважаемы, как можно программно объект Excelя передать в другую пргограмму через буфер обмена. ручками это просто а автоматом. Есть такой код
это мы копируем в буфер: Public Sub MGVidelenie() Application.CutCopyMode = False Worksheets("kar").Shapes.Range(Array("а1", "ф2", "в2", "Sever", "Centr", "Yug", _ "Zagol", "LC1", "LC2", "LC3", "LT1", "LT2", "LT3")).Select Selection.Copy MVizPoint End Sub Public Sub MVizPoint() Dim rv As Boolean rv = Shell("C:\WINDOWS\system32\mspaint.exe", 1) 'запускаем point.exe End Sub и таже руками не вставляется? |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа:  AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | Цитата | #1 | Добавлено: 27.10.10 11:52 |
| SendKeys(..) в помощь | ||
|
Номер ответа: 2 Автор ответа: Mihail Вопросов: 2 Ответов: 1 |
Профиль | Цитата | #2 | Добавлено: 11.11.10 11:52 |
| Спасбо, Не помогает | ||
|
Номер ответа: 3 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | Цитата | #3 | Добавлено: 11.11.10 12:17 |
| пожалуйста, плохо пробуешь | ||
Страница: 1 |