Excel - DropDown-Menü in einer Zelle erzeugen

[mkinzler]

Wie gesagt, verwendet COM/OLE die selbe Schnittstelle

Delphi-Quellcode:

Uses ...,ComObj, ActiveX, ...

...
var
  Excel, WorkBook, WorkSheet, Range: OleVariant;
begin
    try
      Excel := GetActiveOleObject('Excel.Application');
    except
      Excel := CreateOleObject('Excel.Application');
    end;
    WorkBook := Excel.ActiveWorkBook;
    WorkSheet := WorkBook.ActiveSheet;
    Range := WorkSheet.Range['A1:A4'];
    Range.Validation.Delete;
    Range.Validation.Add(3, 1, 1, 'Join(MyList, ",")', null);
...
end;