При всавке кирилицы в ячейку напрямую все нормально.
Cell_1.OlePropertySet("FormulaR1C1",
type_zak->Items->Strings[type_zak->ItemIndex]+" на "+DateToStr(cur));
Через буфер получается абракадабра.
Clipboard()->Clear();
Clipboard()->SetTextBuf(Buf.c_str());
xlSheet.OleProcedure("Select");
Range=xlSheet.OlePropertyGet("Range",AnsiString(Cells.OlePropertyGet("Item",5,1).OlePropertyGet("Address"))
+":"+AnsiString(Cells.OlePropertyGet("Item", Rows,11).OlePropertyGet("Address")));
Range.OleProcedure("Select");
xlSheet.OleProcedure("Paste");
Причем в Винде 98 рус,2000 англ.,2000 англ(но руссифицированной) все нормально, а в некоторых 2000 рус и Хр зюки.Слышал эта глюк винды и где то в реестре можно подправить если кто знает подскажите.

Всё вопрос снят.