Office操作エクセル編０１：特殊文字を貼り付けてみよう♪

日記帳

本ページはプロモーションが含まれています

カテゴリー

Links: blog(ブログ)マスター; アンドロイドの巣; ゼロから始めるベランダ菜園; タイトル

2025年2月

Office操作エクセル編０１：特殊文字を貼り付けてみよう♪

カテゴリー: Office

2005-02-04

Excelに特殊文字を貼り付けてみよう♪

procedure TForm1.Button1Click(Sender: TObject);
   var
   W : _Workbook;
   v : Variant;
   wStr : WideString;
begin
   ExcelApplication1.Connect;
   W := ExcelApplication1.Workbooks.Add(xlWBATWorksheet ,1);
   if w.Sheets.Count>0 then
   begin
      v := w.Sheets.Item[1];
      ShowMessage(v.name);
      wStr := WChar($329E);
      v.Cells[1,1] := wStr;
   end
end;