Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
Caran

Anmeldungsdatum: 11.03.2007 Beiträge: 290 Wohnort: Lörrach
|
Verfasst am: 18.07.2009, 21:39 Titel: Datenformat in der Zwischenablage |
|
|
Hallo nochmal,
über diesen Code lese ich den Inhalt der Zwischenablage aus:
Code: |
Function get_clipboard () As String
Dim As Zstring Ptr s_ptr
Dim As HANDLE hglb
Dim As String s = ""
If (IsClipboardFormatAvailable(CF_TEXT) = 0) Then Return ""
If OpenClipboard( NULL ) <> 0 Then
hglb = GetClipboardData(CF_TEXT)
s_ptr = GlobalLock(hglb)
If (s_ptr <> NULL) Then
s = *s_ptr
GlobalUnlock(hglb)
End If
CloseClipboard()
End If
Return s
End Function |
Das Programm soll Excel-Tabellen (mit Formatierung) aus der Zwischenablage holen. Bedauerlicher Weise, erhalte ich zwar eine Tabelle, allerdings ohne weitere Informationen, wie Schriftgröße o.Ä. Kann mir jemand sagen, wie man das ändern kann? _________________ Eine Erkenntnis von heute kann die Tochter eines Irrtums von gestern sein. |
|
Nach oben |
|
 |
St_W

Anmeldungsdatum: 22.07.2007 Beiträge: 956 Wohnort: Austria
|
|
Nach oben |
|
 |
OneCypher
Anmeldungsdatum: 23.09.2007 Beiträge: 802
|
Verfasst am: 19.07.2009, 15:57 Titel: |
|
|
Hi!
Ich hatte mal eine art Wrapper für Excel geschrieben:
http://forum.qbasic.at/viewtopic.php?t=6404
Der Wrapper benutzt den Disphelper aber ist natürlich bei weitem nicht vollständig.
Und leider gibts in der Version auch keine Implementierung um Formatierungen im VBA-üblichen Stil abzufragen. Aber prinzipiell wäre das kein Problem reinzubauen!
Ich hatte mich eher auf grundsätzliches Werte ein/auslesen konzentriert und vom Syntax her an VBA orientiert, soweit es möglich war.
Mich würds natürlich echt freuen wenn es dir weiterhilft! .. und erst recht natürlich wenn du etwas code beisteuerst  |
|
Nach oben |
|
 |
Caran

Anmeldungsdatum: 11.03.2007 Beiträge: 290 Wohnort: Lörrach
|
Verfasst am: 21.07.2009, 20:02 Titel: |
|
|
Vielen Dank Weiterhelfen tut's auf jeden Fall
Zitat: |
und erst recht natürlich wenn du etwas code beisteuerst zwinkern
|
Da muss ich dich leider enttäuschen: Ich bin neuerdings nicht mehr so aktiver FB-Programmierer, da ich auf c++ umgestiegen bin. Naja, danke nochmal.  _________________ Eine Erkenntnis von heute kann die Tochter eines Irrtums von gestern sein. |
|
Nach oben |
|
 |
|