Fehler unter 64 bit Windows

28/12/2012 - 19:17 von Peter Ostermann | Report spam
Hallo,

folgende Decalres lassen VBA abstürzen:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA"
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long)
As Long
Private Declare Function EmptyClipboard Lib "user32" () As Long
Private Declare Function CloseClipboard Lib "user32" () As Long

Unter einem 32 bit Windows laufen die Makros fehlerfrei, ebenso nach
auskommentieren.

Eigentlich weiß ich gar nicht ob die Mappe an Funktionalitàt einbüßt
ohne diese Funktionen. Auch kann ich mich nicht erinnern wann und zu
welchem Zweck dieser Code eingefügt wurde.

Ich bin versucht diese Funktionen zu löschen, es sei denn sie lassen
sich abàndern damit unter beiden Windows lauffàhig.

Wer weiß Rat? Welcher Verweis unter einem 32 bit (das verfügbare
Entwicklungs)-Windows würde z.B. dem Nutzer der Mappe im 64 bit Windows
die fehlende Bibliothek eingebunden mitliefern?

Schöne Grüsse an die Experten und danke im Voraus
Peter
 

Lesen sie die antworten

#1 Claus Busch
28/12/2012 - 19:44 | Warnen spam
Hallo Peter,

Am Fri, 28 Dec 2012 19:17:30 +0100 schrieb Peter Ostermann:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA"
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long)
As Long
Private Declare Function EmptyClipboard Lib "user32" () As Long
Private Declare Function CloseClipboard Lib "user32" () As Long



für die 64-bit Version musst du nach Declare PtrSafe einfügen, also
z.B.:
Private Declare PtrSafe Function FindWindow Lib "user32" Alias
"FindWindowA"
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Um es passend zu machen für alle Varianten, schau mal hier rein:
http://support.microsoft.com/kb/983043


Mit freundlichen Grüßen
Claus Busch
Win XP Prof SP3 / Vista Ultimate SP2
Office 2003 SP3 /2007 Ultimate SP3

Ähnliche fragen