Voor degene die veel weten over koppelingen tussen Delphi en Excel of veel weten van het overzetten van Visual Basic Code naar Delphi:
Ik probeer vanuit Delphi een excel veld te sorteren. Als ik een macro maak in excel van hoe ik een selectie maak en die vervolgens sorteer krijg ik dit als code in Visual Basic Editor:
Visual Code (uitgaande van selectie) na macro in Excel 2000.
Selection.Sort Key1:=Range('A4'), Order1=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Als ik de parameters opvraag wat horen bij het sorteren binnen Delphi zijn dit de vereiste parameters:
Key1: Ole Variant; Order1: TOleENum; Key2: OleVariant; Type_: OleVariant; Order2: TOleEnum;
Key3: OleVariant; Order3: ToleEnum; Header: ToleEnum; OrderCustom: OleVariant;
MatchCase: OleVariant; Orientation: TOleEnum; SortMethod: TOleEnum;
IgnoreControlCharacters: OleVariant; IgnoreDiacritics: OleVariant; IgnoreKashida: OleVariant
Van daaruit heb ik dit zelf gemaakt:
WS.Range['A4','K125').Sort((Range['a4']),xlAscending,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,xlGuess,
1,False,xlTopToBottom,Emptyparam,Emptyparam,Emptyparam,Emptyparam);
Dit pikt hij echter niet."Variant type conversion" blijkt het probleem te zijn... Iemand een idee???
Thanx.
Ik probeer vanuit Delphi een excel veld te sorteren. Als ik een macro maak in excel van hoe ik een selectie maak en die vervolgens sorteer krijg ik dit als code in Visual Basic Editor:
Visual Code (uitgaande van selectie) na macro in Excel 2000.
Selection.Sort Key1:=Range('A4'), Order1=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Als ik de parameters opvraag wat horen bij het sorteren binnen Delphi zijn dit de vereiste parameters:
Key1: Ole Variant; Order1: TOleENum; Key2: OleVariant; Type_: OleVariant; Order2: TOleEnum;
Key3: OleVariant; Order3: ToleEnum; Header: ToleEnum; OrderCustom: OleVariant;
MatchCase: OleVariant; Orientation: TOleEnum; SortMethod: TOleEnum;
IgnoreControlCharacters: OleVariant; IgnoreDiacritics: OleVariant; IgnoreKashida: OleVariant
Van daaruit heb ik dit zelf gemaakt:
WS.Range['A4','K125').Sort((Range['a4']),xlAscending,Emptyparam,Emptyparam,Emptyparam,Emptyparam,Emptyparam,xlGuess,
1,False,xlTopToBottom,Emptyparam,Emptyparam,Emptyparam,Emptyparam);
Dit pikt hij echter niet."Variant type conversion" blijkt het probleem te zijn... Iemand een idee???
Thanx.