diff --git a/dlls/ole32/moniker.c b/dlls/ole32/moniker.c
index cc83d95b59..33ad36c35e 100644
--- a/dlls/ole32/moniker.c
+++ b/dlls/ole32/moniker.c
@@ -1677,3 +1677,27 @@ void __RPC_USER MIDL_user_free(void *p)
 {
     HeapFree(GetProcessHeap(), 0, p);
 }
+
+/***********************************************************************
+ *           CreatePointerMoniker (OLE32.@)
+ *
+ * Creates a moniker which represents a pointer.
+ *
+ * PARAMS
+ *  punk [I] Pointer to the object to represent.
+ *  ppmk [O] Address that receives the pointer to the created moniker.
+ *
+ * RETURNS
+ *  Success: S_OK.
+ *  Failure: Any HRESULT code.
+ */
+HRESULT WINAPI CreatePointerMoniker(LPUNKNOWN punk, LPMONIKER *ppmk)
+{
+    FIXME("(%p, %p): stub\n", punk, ppmk);
+
+    if (!ppmk)
+        return E_INVALIDARG;
+
+    *ppmk = NULL;
+    return E_NOTIMPL;
+}
diff --git a/dlls/ole32/ole32.spec b/dlls/ole32/ole32.spec
index 25a195587b..e1b2250280 100644
--- a/dlls/ole32/ole32.spec
+++ b/dlls/ole32/ole32.spec
@@ -92,7 +92,7 @@
 @ stdcall CreateItemMoniker(wstr wstr ptr)
 @ stub CreateObjrefMoniker
 @ stdcall CreateOleAdviseHolder(ptr)
-@ stub CreatePointerMoniker       #@ stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED
+@ stdcall CreatePointerMoniker(ptr ptr)
 @ stdcall CreateStreamOnHGlobal(ptr long ptr)
 @ stdcall DllDebugObjectRPCHook(long ptr)
 @ stdcall -private DllGetClassObject (ptr ptr ptr)