Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Leere Excel-Zelle (https://www.delphipraxis.net/140578-leere-excel-zelle.html)

JPSelter 21. Sep 2009 13:37


Leere Excel-Zelle
 
Wie kann ich abfragen, ob eine Excel-Zelle leer ist? Im Moment frage ich über

Code:
if Excel.Cells[i,j]='' then machmawas;
Ich bekomme da aber eine Exception, dass der Datentyp nicht stimmen würde. Die Zellen sind innerhalb von Excel als "Zahl" deklariert, aber wie soll ich da ganz allgemein abfragen, ob die Zelle leer ist. Gibts sowas wie "isEmpty"?

fajac 21. Sep 2009 13:43

Re: Leere Excel-Zelle
 
Ungetestet:
Delphi-Quellcode:
var
  cellContent : Variant;
  text       : AnsiString;
begin
  cellContent := Excel.Cells [i, j];
  if VarIsNull (cellContent) or VarIsEmpty(cellContent) then
    text := ''
  else
    text := VarToStr (cellContent);

himitsu 21. Sep 2009 13:43

Re: Leere Excel-Zelle
 
da würde ich mal schauen, die schaust dich in der Unit Variants um ... da gibt es passende Funktionen

JPSelter 21. Sep 2009 13:53

Re: Leere Excel-Zelle
 
Folgendes nimmt er kommentarlos an...

Code:
if VarIsNull(Excel.Cells[i,j]) then
  Excel.Cells[i,j].value:=0;
... aber in die Anweisung läuft er niemals rein.

Chemiker 21. Sep 2009 13:53

Re: Leere Excel-Zelle
 
Hallo JPSelter,

versuch es mal mit:

Delphi-Quellcode:
if Excel.cells[i,j].value = ‘’ then
In Excel gibt es die empty-Konstante auf der man prüfen kann.

Bis bald Chemiker

JPSelter 21. Sep 2009 15:15

Re: Leere Excel-Zelle
 
Achja, da war ja was mit empty ;-) Danke, klappt nun!


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:21 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz