nutz mal bitte die Delphi-tags, wenn du Code postest.
probier mal das, habe ich in meinen Testprojekten gefunden. Ich weiß jetzt aber nicht mehr wieso weshalb warum
, mußt Du dir selber anpassen.
Delphi-Quellcode:
//Var erg:excelrange;
erg:= ExcelWorksheet1.Range['A1','F10'].Find(
'Personal',
emptyparam {ExcelWorksheet1.Cells.Item[Arow,Acol], },
xlValues,
xlWhole,
xlByRows,
xlNext,
false,
false,
EmptyParam);
if erg<>NIL then
begin
Memo1.Lines.Add('juhu');
Memo1.Lines.Add(inttostr(erg.Column)+'/'+inttostr(erg.Row));
end
else
Memo1.Lines.Add('nix gefunden');
dann mal das ganze xl... durch emptyparam zu ersetzen, an was es dann wirklich liegt und wo eine Angabe zwingend erforderlich ist.
Gruß Frank