Ergebnis der Suchanfrage

• Forum: Datenbanken

  AW: excel tabsheet einlesen , OLE fehler

   
    by Jumpy, 23. Nov 2015
  Beim nochmaligen Nachdenken habe ich überlegt, dass es vllt. helfen könnte, denn Zellwert bereits in Excel auf den für das StringGrid benötigten String zu casten, was evtl. mit diesem Trick gehen könnte:
  
  
  AGrid.Cells := XLApp.WorksheetFunction.Text(Sheet.Cells.value,Sheet.Cells.NumberFormat);
• Forum: Datenbanken

  AW: excel tabsheet einlesen , OLE fehler

   
    by Jumpy, 23. Nov 2015
  Kann man das Ganze nicht gefühlt sauberer eindampfen zu:
  
  
  function Xls_To_StringGrid(AGrid: TStringGrid; AXLSFile: string): Boolean;
  var
  XLApp, workbook, Sheet: OLEVariant;
  row, col: Integer;
  begin
  Result := False;
  XLApp := CreateOleObject('Excel.Application');