Помогнете!!! - VBA
1 отговора
129 прегледа
Помогнете!!! - VBA
Не съм програмист - налага ми се да направя едно макросче. Това което ви питам може и да е елементарно, но аз не го открих(при все че ми помогнаха)
Как мога да присвоя на една променлива от тип String това което е в
Clipboard - а.
Как да използвам метода GetFromClipboard на DataObject след като ми казва, че такъв обект не е дефиниран, а би трябвало да е поне според Help - а.
В Help - а има следния пример за декларация:
Dim MyData as DataObject
Защо при такава декларация на мен ми дава грешка от сорта на
user-defined type not defined??????????
Благодаря Ви предварително!!!
Как мога да присвоя на една променлива от тип String това което е в
Clipboard - а.
Как да използвам метода GetFromClipboard на DataObject след като ми казва, че такъв обект не е дефиниран, а би трябвало да е поне според Help - а.
В Help - а има следния пример за декларация:
Dim MyData as DataObject
Защо при такава декларация на мен ми дава грешка от сорта на
user-defined type not defined??????????
Благодаря Ви предварително!!!
Re: Помогнете!!! - VBA
Tova go paste-vam ot ne6to koeto sam pravil navremeto v Excel, i raboti.
Pri pokazvane na formata 4ete clipboarda i pokazwa texta v TextBox1.
On Error trqbva v slu4aj 4e v clipboarda ima ne text a ne6to drugo.
Private Sub UserForm_Initialize()
On Error GoTo errr
Dim MyData As DataObject
Dim strClip As String
Set MyData = New DataObject
MyData.GetFromClipboard
strClip = MyData.GetText
TextBox1.Text = strClip
errr:
End Sub
Pri pokazvane na formata 4ete clipboarda i pokazwa texta v TextBox1.
On Error trqbva v slu4aj 4e v clipboarda ima ne text a ne6to drugo.
Private Sub UserForm_Initialize()
On Error GoTo errr
Dim MyData As DataObject
Dim strClip As String
Set MyData = New DataObject
MyData.GetFromClipboard
strClip = MyData.GetText
TextBox1.Text = strClip
errr:
End Sub