Год назад в нашей компании возникла задача написать на C# приложение для импорта данных из Excel, в том числе с помощью буфера обмена и drag'n'drop. Excel при копировании в буфер кладет туда данные в нескольких форматах. Часть из них стандартные типа CF_TEXT, CF_CSV и т.п. Однако, если нужно иметь дело с объединенными ячейками и прочими радостями, то может понадобиться получить доступ непосредственно к объекту Range, который был перетащен или скопипастен. Для этого нужно воспользоваться форматом CF_LINKSOURCE и лежащим в нем интерфейсом IMoniker. О том, как это сделать, читайте под хабракатом.

В теории, все просто как в сказке про Кащея: Range лежит в IMoniker, IMoniker в IStream, IStream в IDataObject, IDataObject в Clipboard. Именно так и будет выглядеть метод, вызываемый из клиентского кода:

public static Range GetRange() { IDataObject dataObject = System.Windows.Forms.Clipboard.GetDataObject() as IDataObject; IStream iStream = IStreamFromDataObject(dataObject); IMoniker compositeMoniker = IMonikerFromIStream(iStream); return RangeFromCompositeMoniker(compositeMoniker); }

Нюанс здесь только один: нам нужен не System.Windows.Forms.IDataObject, возвращаемый Clipboard.GetDataObject(), а System.Runtime.InteropServices.ComTypes.IDataObject. Благо, решается это простым приведением.

Получить IStream из IDataObject тоже несложно. Обратите внимание, что среди пары десятков форматов, помещенных в буфер обмена Excel'ем, нам нужен CF_LINKSOURCE.

private const string CF_LINKSOURCE_ID = "Link Source"; private static IStream IStreamFromDataObject(IDataObject dataObject) { STGMEDIUM medium; FORMATETC formatEtc = new FORMATETC(); formatEtc.cfFormat = (short)System.Windows.Forms.DataFormats.GetFormat(CF_LINKSOURCE_ID).Id; formatEtc.dwAspect = DVASPECT.DVASPECT_CONTENT; formatEtc.lindex = -1; formatEtc.ptd = new IntPtr(0); formatEtc.tymed = TYMED.TYMED_ISTREAM; dataObject.GetData(ref formatEtc, out medium); return Marshal.GetObjectForIUnknown(medium.unionmember) as IStream; }

Так, IStream получили. Теперь нужно вытащить из него IMoniker. Здесь обнаружился первый нюанс: IStream необходимо перемотать в начало. Иначе OleLoadFromStream вернет STG_E_READFAULT. Кстати, OleLoadFromStream надо импортировать из ole32.dll. Нам в этом поможет pinvoke.net. Единственное, в нашем коде заменим вовзращаемый ей результат с int на HRESULT, описанный там же.

private static IMoniker IMonikerFromIStream(IStream iStream) { iStream.Seek(0, 0, IntPtr.Zero); Guid guid = Marshal.GenerateGuidForType(typeof(stdole.IUnknown)); object obj; if (ole32.OleLoadFromStream(iStream, ref guid, out obj)) return obj as IMoniker; else return null; }

Есть IMoniker! Дальше в теории всё должно было бы быть очень просто. Вызываем из ole32.dll функцию BindMoniker, в которую передаем IMoniker и Guid класса Range, и на выходе получаем Range. На самом деле однако, вместо этого мы получим ошибку MK_E_NOOBJECT. Дело здесь вот в чем. Моникеры бывают нескольких типов: File Moniker, Item Moniker, Composite Moniker и проч. В нашем случае из буфера обмена мы получаем моникер типа Composite. Который объединяет в себе два других — File и Item. Первый указывает на Workbook, а второй — на Range внутри Workbook. Формировать составные моникеры Excel, как мы видим, умеет. А вот разбирать — нет. Что ж, придется ему помочь.

private static Range RangeFromCompositeMoniker(IMoniker compositeMoniker) { List<IMoniker> monikers = SplitCompositeMoniker(compositeMoniker); if (monikers.Count != 2) throw new ApplicationException("Invalid moniker"); IBindCtx bindctx; if (!ole32.CreateBindCtx(0, out bindctx) || bindctx == null) throw new ApplicationException("Can't create bindctx"); object obj; Guid workbookGuid = Marshal.GenerateGuidForType(typeof(Workbook)); monikers[0].BindToObject(bindctx, null, ref workbookGuid, out obj); Workbook workbook = obj as Workbook; ExcelItemMonikerHelper helper = new ExcelItemMonikerHelper(monikers[1], bindctx); return helper.GetRange(workbook); } private static List<IMoniker> SplitCompositeMoniker(IMoniker compositeMoniker) { List<IMoniker> monikerList = new List<IMoniker>(); IEnumMoniker enumMoniker; compositeMoniker.Enum(true, out enumMoniker); if (enumMoniker != null) { IMoniker[] monikerArray = new IMoniker[1]; IntPtr fetched = new IntPtr(); HRESULT res; while (res = enumMoniker.Next(1, monikerArray, fetched)) { monikerList.Add(monikerArray[0]); } return monikerList; } else throw new ApplicationException("IMoniker is not composite"); }

С помощью SplitCompositeMoniker мы разбиваем Composite moniker на File moniker и Item moniker, после чего у файлового моникера просто вызываем BindToObject и получаем объект Workbook. А дальше делаем работу за Excel и получаем по Item moniker объект Range. Для этого мы написали хелпер. Код в статье я приводить не буду, вы можете посмотреть его в демо-проекте. По сути он парсит свойство DisplayName моникера, вытаскивает оттуда имя листа и границ выделенной области и получает по ним нужный Range из Workbook стандартными методами Microsoft.Office.Interop.Excel.

Тут и сказочке конец. А кто слушал — молодец и таким же образом сможет добраться до объектов любого приложения, которое кладет моникер в буфер обмена.
Демо-проект лежит здесь. Не смотря на то, что ссылка ведет на кодпроджект, статью я не скопипастил, как можно подумать =) Просто, зимой кармы на опубликование статьи здесь еще не хватало, и чтобы не забыть материал, я опубликовал его там.

Спасибо за внимание!

Получение через IMoniker объекта Range, скопированного из Excel в буфер обмена