Autor
|
Thema: OLEDragDrop auch in VBA Excel ? (2860 mal gelesen)
|
lb-racer Mitglied Techniker
Beiträge: 443 Registriert: 13.12.2005
|
erstellt am: 21. Jun. 2007 23:59 <-- editieren / zitieren --> Unities abgeben:
Hallo und schönen Abend, hab mich heute von SolidEdge-Forum hierher "verirrt", um der Weisen Rat zu erbitten : möchte vom Windows-Explorer per Drag&Drop SolidEdge-Dateien in ein Arbeitsblatt ziehen. von diesen Dateien sollen dann einige benutzerdefinierte Eigenschaften in die Zellen geladen werden, um zu einem späteren Zeitpunkt die veränderten Eigenschaften in die Dateien zurückzuschreiben. So weit so gut, aber wie zum Henker krieg ich den/die Dateinamen der reingezogenen Datei/en ? Ich hab nicht rausgekriegt oder irgendwo nachlesen können, wie das gehen könnte. In VB6 klappts, aber lieber und einfacher wärs mir, wenn das OLEDragDrop-Ereignis (oder ein vergleichbares) auch in VBA Excel verfügbar wäre. Bitte helft mir ! lg, Matthias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
lb-racer Mitglied Techniker
Beiträge: 443 Registriert: 13.12.2005 System: ST10 MP12 auf Win10 Pro x64 CPU: i7-10750H Grafik: RTX 3080 16GB Laptop RAM: 32GB
|
erstellt am: 23. Jun. 2007 22:38 <-- editieren / zitieren --> Unities abgeben:
weiss wirklich niemand etwas darüber ? ich bräucht nur ein Statement ob man in Excel ein "Drop-Ereignis einer Datei" erfassen kann. hab jetzt schon ca. 4h in googeln investiert und einige Excel-VBA-Seiten und Foren abgeklappert, hab aber nirgendwo etwas zu dem Thema gefunden. möchte eigentlich nur gerne wissen, obs sowas gibt ... lg, Matthias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
runkelruebe Moderator Straßen- / Tiefbau
Beiträge: 8075 Registriert: 09.03.2006 MS-Office 365 ProPlus x86 WIN7(x64)
|
erstellt am: 23. Jun. 2007 23:16 <-- editieren / zitieren --> Unities abgeben: Nur für lb-racer
Sorry, aber per D&D weiß ich nicht, SE kenn ich nicht und über'n explorer zieh ich nix in Excel ;-) wenn Du aber z.B. eine Datei über Einfügen -> Objekt -> aus Datei erstellen -> verknüpfen einbindest, kommst Du mit Sheets(1).Shapes.Item(1).OLEFormat.Object.SourceName an den Pfad. Ob Dich das jetzt nach vorne bringt? Wie sieht's denn in VB6 aus? Rein interessehalber. ------------------ Gruß, runkelruebe Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
lb-racer Mitglied Techniker
Beiträge: 443 Registriert: 13.12.2005
|
erstellt am: 25. Jun. 2007 08:17 <-- editieren / zitieren --> Unities abgeben:
Danke für dein Posting, in VB6 hab ichs schon hinbekommen, ich wollte der Einfachkeit halber aber bei einer Excel-Tabelle bleiben. Die ist wunderbar editierbar - solche Funktionen musst einmal bei einem VB-Steuerelement hinbekommen . ich müsste halt nur dieses verfluchte DragDrop-Ereignis in Excel-VBA abfangen und hätte schon gewonnen. Das ist das einzige was mir fehlt und wo ich absolut keine Infos dazu finde vielleicht hast du einen Tipp für VBA-Seiten oder Foren ? lg, Matthias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
runkelruebe Moderator Straßen- / Tiefbau
Beiträge: 8075 Registriert: 09.03.2006 MS-Office 365 ProPlus x86 WIN7(x64)
|
erstellt am: 25. Jun. 2007 08:27 <-- editieren / zitieren --> Unities abgeben: Nur für lb-racer
|
lb-racer Mitglied Techniker
Beiträge: 443 Registriert: 13.12.2005
|
erstellt am: 25. Jun. 2007 09:12 <-- editieren / zitieren --> Unities abgeben:
|
bst Mitglied
Beiträge: 192 Registriert: 31.08.2004 .
|
erstellt am: 25. Jun. 2007 10:26 <-- editieren / zitieren --> Unities abgeben: Nur für lb-racer
Auch Hallo, nimm ein OLEDragDrop fähiges Steuerelement aus VB, z.B. ListView und lagere das in eine Excel-Userform ein. Dann geht das auch in Excel. Gruß, Bernd [Diese Nachricht wurde von bst am 25. Jun. 2007 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
lb-racer Mitglied Techniker
Beiträge: 443 Registriert: 13.12.2005
|
erstellt am: 27. Jun. 2007 00:41 <-- editieren / zitieren --> Unities abgeben:
Zitat: nimm ein OLEDragDrop fähiges Steuerelement aus VB, z.B. ListView und lagere das in eine Excel-Userform ein. Dann geht das auch in Excel.
super, haut hin ! da hätt ich aber auch selber draufkommen sollen herzlichen Dank für diesen Denkanstoss und sorry für die späte Antwort, bin leider grade erst dazugekommen, es auszuprobieren ... lg, Matthias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |