Помогите создать кнопку

[StrelokCU]

Как создать кнопку что бы при нажатии на нее происходило копирование в текстовое поле содержимое буфера обмена при наличие в нем данных? Заранее спасибо!

[Abrakadabra]

Сообщение от StrelokCU

происходило копирование в текстовое поле содержимое буфера обмена при наличие в нем данных?

Добрый вечер!
Вероятно, нужно сначала вернуть фокус на выбранное поле:

Screen.PreviousControl.SetFocus

, а потом вставить данные из буфера, напр.стандартними методами аксесса:

DoCmd.DoMenuItem acFormBar, acEditMenu, 9, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, acPaste, , acMenuVer70

[StrelokCU]

Добрый день!!!
Спасибо большое. Работает!!! только как при помощи Screen.PreviousControl.SetFocus
перевести фокус на конкретное поле

[StrelokCU]

Поле.SetFocus
сделал сам", теперь при нажатии на другую кнопку выдает ошибку "424"

[Teslenko_EA]

Здравствуйте StrelokCU.
в VB(А) существует способ эмуляции нажатия клавиш, но он тоже требует установки фокуса

Private Sub Command1_Click()
    TextBox1.SetFocus
    SendKeys "^v" 'Ctrl + V
End Sub

Евгений.

[StrelokCU]

Сообщение от Teslenko_EA

Здравствуйте StrelokCU.
в VB(А) существует способ эмуляции нажатия клавиш, но он тоже требует установки фокуса

Private Sub Command1_Click()
    TextBox1.SetFocus
    SendKeys "^v" 'Ctrl + V
End Sub

Евгений.

Спасибо Евгений, но проблема осталась, после перевода фокуса на другой объект возникает ошибка 424

[Laplans]

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