Hi
Sorry me for my english
I'm trying to import bank statement from excel, but i'm new in all of this about SDK
The excel structure is:

And the macro is:
Public Sub Import_bankst() Dim SboGuiApi As New SAPbouiCOM.SboGuiApi Dim SBO_App As SAPbouiCOM.Application Dim oCompany As New SAPbobsCOM.Company Dim row As Long SboGuiApi.Connect ("0030002C0030002C00530041005000420044005F00440061007400650076002C0050004C006F006D0056004900490056") Set SBO_App = SboGuiApi.GetApplication() Set oCompany = SBO_App.Company.GetDICompany() Dim oBnkStSrv As SAPbobsCOM.BankStatementsService Dim oCmpSrv As SAPbobsCOM.CompanyService Dim oBankStatement As SAPbobsCOM.BankStatement Dim oBnkStRow As SAPbobsCOM.BankStatementRow Dim MultiPayment As SAPbobsCOM.MultiplePayment Set oCmpSrv = oCompany.GetCompanyService Set oBnkStSrv = oCmpSrv.GetBusinessService(SAPbobsCOM.ServiceTypes.BankStatementsService) Set oBankStatement = oBnkStSrv.GetDataInterface(SAPbobsCOM.BankStatementsServiceDataInterfaces.bssBankStatement) row = 2 oBankStatement.BankAccountKey = ActiveSheet.Cell(row, 1) Do While ActiveSheet.Cell(row, 1) <> "" oBnkStRow = oBankStatement.BankStatementRows.Add() oBnkStRow.DueDate = ActiveSheet.Cell(row, 2) oBnkStRow.DebitAmountLC = ActiveSheet.Cell(row, 3) oBnkStRow.CreditAmountLCo = ActiveSheet.Cell(row, 4) oBnkStRow.Details = ActiveSheet.Cell(row, 5) oBnkStSrv.AddBankStatement (oBankStatement) row = row + 1 Loop oCompany.Disconnect End Sub
I follow examples from SDK help and some are successful
If someone can tell me what is wrong.
Best Regards.
Felipe