powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Копирование на другой лист
4 сообщений из 29, страница 2 из 2
Копирование на другой лист
    #36295248
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ну вот например код:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Sub proba()

On Error Resume Next
Dim s$, dobj As MSForms.DataObject
    Set dobj = New MSForms.DataObject
    dobj.GetFromClipboard: s = dobj.GetText()

Cells( 10 ,  1 ).Value = "testvalue"
Cells( 10 ,  2 ).Value = s
'    MsgBox s & vbTab & Len(s)
Set dobj = Nothing

End Sub

Если скопировали на стороне - всё получилось.
Если скопировали с этого же листа - дуля ("testvalue" есть, рядом пусто).
...
Рейтинг: 0 / 0
Копирование на другой лист
    #36295279
qwrqwr_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Hugo121
Если скопировали на стороне - всё получилось.
Если скопировали с этого же листа - дуля ("testvalue" есть, рядом пусто).
в 1ом случае - когда "всё получилось" - вы копировали "на стороне" текст.
во втором - ячейку листа.
йа все вижууууу

Зайдите по F2 внутрь ячейки, скопируйте в буфер её текст - все получится :)

PS я ведь предупреждал, что эта штука урезана для работы только с текстом :(
...
Рейтинг: 0 / 0
Копирование на другой лист
    #36295405
m
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
m
Гость
При запуске кода муравьи должны бегать вокруг ячейки, тогда сработает. Можно выделять целые массивы. Так как предлагает qwrqwr , у меня получилось, плюс нету "лишних символов" (таб, возврат каретки).

Он все видитттт
...
Рейтинг: 0 / 0
Копирование на другой лист
    #36295540
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ах вот оно как...
А с муравьями такая штука - добиться, чтоб они бегали в момент запуска кода, можно, повесив код на кнопку. В общем, такой вариант подходит, правда вставляет с двумя лишними символами, но это уже поправимо. Вот так мне уже подходит.
Спасибо!
...
Рейтинг: 0 / 0
4 сообщений из 29, страница 2 из 2
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Копирование на другой лист
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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