Thema Datum  Von Nutzer Rating
Antwort
05.03.2016 12:53:54 Adrian
NotSolved
Blau eine Lösung für das
05.03.2016 15:48:08 Gast29995
NotSolved
06.03.2016 21:43:04 Adrian
NotSolved

Ansicht des Beitrags:
Von:
Gast29995		 Datum:
05.03.2016 15:48:08		 Views:
1301		 Rating:
     
Antwort:
  Ja
Thema:
eine Lösung für das 
Option Explicit
'c:\Windows\System32\fm20.dll = Microsoft Forms 2.0 Objektlibrary IN VERWEISE einbinden!
'
'Zum Test*******************************************************************************
Private Sub InClipbd()
   Dim oDO As New DataObject
   Dim Str As String
   Str = "Benutzername" & Chr(13)
   With oDO
      .Clear
      .SetText Str
      .PutInClipboard
   End With
End Sub
'Zum Test***************************************************************************(eoS)

Sub DoIt()
Dim Str As String, Flag As Boolean
   Str = FromClpbd(): Flag = True
   Application.SendKeys (Str), Flag
End Sub


Private Function FromClpbd() As String
   Dim oDO As New DataObject
   On Error Resume Next
   oDO.GetFromClipboard
   On Error GoTo 0
   FromClpbd = oDO.GetText
End Function

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
05.03.2016 12:53:54 Adrian
NotSolved
Blau eine Lösung für das
05.03.2016 15:48:08 Gast29995
NotSolved
06.03.2016 21:43:04 Adrian
NotSolved