BorlandTalk.com Borland discussion newsgroups   Archives   FAQ   Search   Memberlist   Usergroups   Register   Profile   Log in to check your private messages   Log in  A Sort issue with Excel 2000          BorlandTalk.com Forum Index -> Delphi OLE Automation View previous topic :: View next topic   Author Message M.E. Guest Posted: Fri Jul 21, 2006 4:00 am    Post subject: A Sort issue with Excel 2000 Still struggling to understand those differences among Excel versions, I am getting an EOleSysError of invalid number of parameters with this sort method with Excel 2000, although it works perfectly with Excel 97 and Excel 2003. DadosCriacao := PlanilhaRed.Range['A1:P' + Trim(IntToStr(Contagem))]; DadosCriacao.Sort( DadosCriacao.Range['P2'], // Key1, xlDescending, // Order1, DadosCriacao.Range['O2'], // Key2, EmptyParam, // Type xlDescending, // Order2, DadosCriacao.Range['E2'], // Key3, xlDescending, // Order3, xlGuess, // Header, 1, // OrderCustom, False, // MatchasCase, xlTopToBottom, // Orientation, EmptyParam, // SortMethod, EmptyParam, // IgnorcontrolCharacters, EmptyParam, // IgnoreDiacritics, EmptyParam // IgnoreKashida ); Why would the parameters be different in an intermediate version of Excel??!! What is missing or exceeding? Thanks, Marcio Back to top Oliver Townshend Guest Posted: Fri Jul 21, 2006 4:18 am    Post subject: Re: A Sort issue with Excel 2000 Quote: Why would the parameters be different in an intermediate version of Excel??!! What is missing or exceeding? If you look at the different type libraries that Delphi can generate, you may see different methods for the same feature. I don't remember any differences with Sort, but they might be there. The alternative when late binding doesn't work is to use early binding, i.e. a Variant. It's a bit slower but it can work. Define DadosCriacao as OleVariant and see if your routine works. Oliver Townshend Back to top M.E. Guest Posted: Fri Jul 21, 2006 4:25 am    Post subject: Re: A Sort issue with Excel 2000 Oliver, It was already... I'll try to record a macro to see what Excel 2000 does. Marcio "Oliver Townshend" <oliveratzipdotcomdotau> escreveu na mensagem news:44c00f32 (AT) newsgroups (DOT) borland.com... > Define DadosCriacao as OleVariant and see if your routine works. Back to top M.E. Guest Posted: Fri Jul 21, 2006 4:45 am    Post subject: Re: A Sort issue with Excel 2000 This is what I got recording a macro Selection.Sort Key1:=Range("P2"), Order1:=xlDescending, Key2:=Range("O2"), Order2:=xlDescending, Key3:=Range("E2"), Order3:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom Nevertheless, the sort method failed with this code, which seemed to me to be right: DadosCriacao.Sort( DadosCriacao.Range['P2'], // Key1, xlDescending, // Order1, DadosCriacao.Range['O2'], // Key2, xlDescending, // Order2, DadosCriacao.Range['E2'], // Key3, xlDescending, // Order3, xlGuess, // Header, 1, // OrderCustom, False, // MatchCase, xlTopToBottom // Orientation, ); Any hint? Marcio "M.E." <noone (AT) noserver (DOT) com> escreveu na mensagem > I'll try to record a macro to see what Excel 2000 does. Back to top Oliver Townshend Guest Posted: Fri Jul 21, 2006 4:46 am    Post subject: Re: A Sort issue with Excel 2000 Quote: Oliver, It was already... Oh well, in that case declare it as a Range and see what happens. Oliver Townshend Back to top Oliver Townshend Guest Posted: Fri Jul 21, 2006 5:05 am    Post subject: Re: A Sort issue with Excel 2000 Quote: DadosCriacao.Sort( DadosCriacao.Range['P2'], // Key1, xlDescending, // Order1, DadosCriacao.Range['O2'], // Key2, xlDescending, // Order2, DadosCriacao.Range['E2'], // Key3, xlDescending, // Order3, xlGuess, // Header, 1, // OrderCustom, False, // MatchCase, xlTopToBottom // Orientation, ); What is DadosCriacao really? You're using it to define your ranges and your selection, which is a contradiction. If DadosCriacao is a worksheet, then you should do something like: DadosCriacao.Selection.Sort( DadosCriacao.Range['P2'], // Key1, xlDescending, // Order1, DadosCriacao.Range['O2'], // Key2, xlDescending, // Order2, DadosCriacao.Range['E2'], // Key3, xlDescending, // Order3, xlGuess, // Header, 1, // OrderCustom, False, // MatchCase, xlTopToBottom // Orientation, ); Back to top M.E. Guest Posted: Fri Jul 21, 2006 5:18 am    Post subject: Re: A Sort issue with Excel 2000 Oliver, DadosCriacao is just a range: DadosCriacao := PlanilhaRed.Range['A1:P' + Trim(IntToStr(Contagem))]; PlanilhaRed is the sheet. What I don't get is this code works fine for Excel 97 and Excel 2003!!! How then would I define a selection? BTW, I'm not using TExcelApplication, but calling CreateOleObject('Excel.Application'). I never knew which one is early which is late binding. :/ Thanks a lot for your help. Marcio "Oliver Townshend" <oliveratzipdotcomdotau> escreveu na mensagem > Quote: What is DadosCriacao really? You're using it to define your ranges and your selection, which is a contradiction. Back to top Oliver Townshend Guest Posted: Fri Jul 21, 2006 6:18 am    Post subject: Re: A Sort issue with Excel 2000 Quote: What I don't get is this code works fine for Excel 97 and Excel 2003!!! How then would I define a selection? BTW, I'm not using TExcelApplication, but calling CreateOleObject('Excel.Application'). I never knew which one is early which is late binding. :/ That's late binding. Early binding is normally faster, and provides syntax checking, code completion and other features which I normally prefer. Oliver Townshend Back to top M.E. Guest Posted: Fri Jul 21, 2006 7:07 am    Post subject: Re: A Sort issue with Excel 2000 Oliver, I must thank you for all your orientation. I'll try to change it later to early binding. By now, this is how I made it work. Is there a way to simplify things? DadosCriacao := PlanilhaRed.Range['A1:P' + Trim(IntToStr(Contagem))]; Excel.Sheets['Redatores'].Select; XLSSelection := Excel.Selection; XLSSelection.Sort( DadosCriacao.Range['P2'], // Key1, xlDescending, // Order1, DadosCriacao.Range['O2'], // Key2, EmptyParam, // Type xlDescending, // Order2, DadosCriacao.Range['E2'], // Key3, xlDescending, // Order3, xlGuess, // Header, 1, // OrderCustom, False, // MatchCase, xlTopToBottom // Orientation, ); end; Thank you very, very much. Marcio "Oliver Townshend" <oliveratzipdotcomdotau> escreveu: Quote: That's late binding. Early binding is normally faster, and provides syntax checking, code completion and other features which I normally prefer. Back to top Oliver Townshend Guest Posted: Fri Jul 21, 2006 8:12 am    Post subject: Re: A Sort issue with Excel 2000 The following might work, but is it simpler? I don't know: Excel.Sheets['Redatores'].Select; Excel.Selection.Sort( ... It only saves one line. Oliver "M.E." <noone (AT) noserver (DOT) com> wrote in message news:44c0373b (AT) newsgroups (DOT) borland.com... Quote: Oliver, I must thank you for all your orientation. I'll try to change it later to early binding. By now, this is how I made it work. Is there a way to simplify things? DadosCriacao := PlanilhaRed.Range['A1:P' + Trim(IntToStr(Contagem))]; Excel.Sheets['Redatores'].Select; XLSSelection := Excel.Selection; XLSSelection.Sort( DadosCriacao.Range['P2'], // Key1, xlDescending, // Order1, DadosCriacao.Range['O2'], // Key2, EmptyParam, // Type xlDescending, // Order2, DadosCriacao.Range['E2'], // Key3, xlDescending, // Order3, xlGuess, // Header, 1, // OrderCustom, False, // MatchCase, xlTopToBottom // Orientation, ); end; Thank you very, very much. Marcio "Oliver Townshend" <oliveratzipdotcomdotau> escreveu: That's late binding. Early binding is normally faster, and provides syntax checking, code completion and other features which I normally prefer. Back to top Oliver Townshend Guest Posted: Fri Jul 21, 2006 8:12 am    Post subject: Re: A Sort issue with Excel 2000 Quote: I must thank you for all your orientation. I'll try to change it later to early binding. When you do, you might want to read up on refactoring before you do. It may not be worth the effort if it works. Oliver Townshend Back to top Display posts from previous: All Posts1 Day7 Days2 Weeks1 Month3 Months6 Months1 Year Oldest FirstNewest First         BorlandTalk.com Forum Index -> Delphi OLE Automation All times are GMT Page 1 of 1   Jump to: Select a forum C++ Builder Newsgroups----------------C++ BuilderC++ Builder (ActiveX)C++ Builder (Announcements)C++ Builder (Command Line Tools)C++ Builder DatabasesC++ Builder Databases (ADO)C++ Builder Databases (Desktop)C++ Builder Databases (InterBase Express)C++ Builder Databases (Multi-Tier)C++ Builder Databases (SQL Servers)C++ Builder (Graphics)C++ Builder (IDE)C++ Builder (Internet)C++ Builder (Internet Socket)C++ Builder (Internet Web)C++ Builder (Jobs)C++ Builder (Language)C++ Builder (Language C++)C++ Builder (Compatibility with MFC)C++ Builder (Native API)C++ Builder (Non-Technical)C++ Builder (Students)C++ Builder (Third Party Tools)C++ Builder (Upgrade)C++ Builder (VCL)C++ Builder (VCL Components Usage)C++ Builder (VCL Components Development)C++ Builder (VCL Usage)C++ Builder (WinAPI)C++ Builder Installation Delphi Newsgroups----------------Delphi (General)Delphi ActiveX Controls UsageDelphi ActiveX Controls DevelopmentDelphi As400Delphi DatabasesDelphi Databases (ADO)Delphi Databases (dbExpress)Delphi Databases (Desktop)Delphi Databases (InterBase Express)Delphi Databases (Multi-Tier)Delphi Databases (SQL Servers)Delphi DeploymentDelphi GraphicsDelphi IDEDelphi InternationalizationDelphi InternetDelphi Internet Isapi-WebBrokerDelphi Internet WebSnapDelphi Internet WinsockDelphi JobsDelphi Language BASMDelphi Language ObjectPascalDelphi Model Driven Architecture (General)Delphi Model Driven Architecture (Third Party)Delphi MultimediaDelphi Native APIDelphi Non-TechnicalDelphi ObjectPascalDelphi OLE AutomationDelphi OO designDelphi OpenToolsAPIDelphi Reporting-ChartingDelphi RTLDelphi StudentsDelphi TeamSourceDelphi Thirdparty ToolsDelphi Thirdparty Tools (General)Delphi Thirdparty Tools (IntraWeb)Delphi Thirdparty Tools (RaveReports)Delphi UpgradeDelphi VCLDelphi VCL ComponentsDelphi VCL Components UsingDelphi VCL Components WritingDelphi WebServices SOAPDelphi WinAPIDelphi XMLDelphi Installationcomp.lang.pascal.delphi.components.misccomp.lang.pascal.delphi.components.usagecomp.lang.pascal.delphi.components.writingcomp.lang.pascal.delphi.databasescomp.lang.pascal.delphi.misccomp.sources.delphi JBuilder Newsgroups----------------JBuilderJBuilder AnnouncementsJBuilder Applet IssuesJBuilder As400JBuilder CompilerJBuilder CORBA/RMIJBuilder DatabasesJBuilder DB SwingJBuilder DebuggerJBuilder DeploymentJBuilder DocumentationJBuilder EnterpriseJBuilder HandheldJBuilder IDEJBuilder JavaJBuilder JavaAPIJBuilder Java LanguageJBuilder Java SwingJBuilder Java BeansJBuilder Java Beans UsageJBuilder Java Beans DevelopmentJBuilder JBCLJBuilder JDataStoreJBuilder JobsJBuilder LinuxJBuilder MacintoshJBuilder & MobileSetJBuilder MultiLingual AppsJBuilder Non-TechnicalJBuilder OpenToolsJBuilder Servlets (JSP)JBuilder StudentsJBuilder Team DevelopmentJBuilder Thirdparty ToolsJBuilder UpgradeJBuilder Installation InterBase Newsgroups----------------InterBaseInterBase Bug DiscussionInterBase GeneralInterBase IBConsoleInterBase OpenSourceInterBase ReplicationInterBase SQLInterBase ThirdpartyInterBase Installation Miscellaneous Borland Newsgroups----------------AppCenterAppServerEnteraVisiBroker  You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum Powered by phpBB © 2001, 2006 phpBB Group SEO toolkit © 2004-2006 webmedic.