| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY WIRD VON NVIDIA ZUM HÄNDLER DES JAHRES GEWÄHLT, eine Pressemitteilung
|
Autor
|
Thema: Name in Zwischenablage kopieren (1244 mal gelesen)
|
st.w Mitglied
Beiträge: 59 Registriert: 08.11.2011
|
erstellt am: 04. Dez. 2012 15:49 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, ich habe eine sub zusammengestellt, die eine pdf mit Datum und Revisionsnummer speichert. Dies dient bei uns zur Dokumentation der erfolgten Revision. Direkt im Anschluß muß der Mitarbeiter den Artikel in der Warenwirtschaft öffnen und die Zeichnungsnummer auf die neue Revision setzen. Es wäre sehr praktisch, wenn ich den ohnehin separierten Dateinamen in die Zwischenablage kopieren könnte. Der Mitarbeiter kann dann mit STRG+V den Namen in der Warenwirtschaft einfügen (und muß diesen nicht abtippen) Wer kann mir hierbei helfen? Danke schonmal, Stefan --XP und IV2008
------------------ IV2008 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik
Beiträge: 2580 Registriert: 15.11.2006 Windows 10 x64, AIP 2020-2025
|
erstellt am: 04. Dez. 2012 16:34 <-- editieren / zitieren --> Unities abgeben: Nur für st.w
Hi Ich hoffe es funktioniert, also 1. Verweis auf die Windows Forms Library setzen 2. folgenden Code nutzen: Code: Option ExplicitPrivate Sub Clear_Cb() Dim MyData As DataObject Set MyData = New DataObject MyData.SetText "" MyData.PutInClipboard End Sub Private Sub Read_Cb() Dim MyData As DataObject Dim strClip As String Set MyData = New DataObject MyData.GetFromClipboard strClip = MyData.GetText End Sub Private Sub Fill_Cb() Dim MyData As DataObject Dim strClip As String strClip = "Fill with your extracted filename" '<----- DA anpassen Set MyData = New DataObject MyData.SetText strClip MyData.PutInClipboard End Sub
------------------ MfG Ralf Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
st.w Mitglied
Beiträge: 59 Registriert: 08.11.2011
|
erstellt am: 04. Dez. 2012 16:52 <-- editieren / zitieren --> Unities abgeben:
Hallo Ralf, das klingt vielversprechend. Danke für die sehr schnelle Antwort! Ich habe den sehr langen Verweise...- Dialog nach der 'Windows Forms Library' durchsucht und nur 'System_Windows_Forms' gefunden, was ähnlich klingt.
Aber das Kompilieren meldet bei 'MyData As DataObject' "Fehler beim Kompilieren: Benutzerdefinierter Typ nicht definiert" - Also wohl den falschen Verweis gewählt. Wie heißt der richtige genau? Gruß Stefan ------------------ IV2008 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik
Beiträge: 2580 Registriert: 15.11.2006 Windows 10 x64, AIP 2020-2025
|
erstellt am: 04. Dez. 2012 17:01 <-- editieren / zitieren --> Unities abgeben: Nur für st.w
Hi Die müßte "Microsoft Forms 2.0 Object Library" (FM20.dll) heißen. Alternativ erstell mal eine neue Form und lösch sie wieder. Das sollte den Verweis automatisch setzen. ------------------ MfG Ralf Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
st.w Mitglied
Beiträge: 59 Registriert: 08.11.2011
|
erstellt am: 05. Dez. 2012 11:54 <-- editieren / zitieren --> Unities abgeben:
|