scusa, ma se usassi solo Excel ?
giusto per esempio ....
Codice PHP:
Sub import_data_xls() Elem1 = "A4"
SourceDataSheet = "Table1"
TemplateSheet = "CY_TO"
Call import_data_xls_1
SourceDataSheet = "Table3"
TemplateSheet = "CY_FCST"
Call import_data_xls_1
SourceDataSheet = "Table4"
TemplateSheet = "CY_BDG"
Call import_data_xls_1
Public EvaluationArea As String
' Current year turnover ( till the last analysis date )
LastUpdDateFlg = month_act
Sheets("CY_TO").Select
' middle east distributors sales analysis
If ElemArray1(3) = "ME" Or ElemArray1(3) = "MT-CY" Then
sqlquery = "select trn003004,trn003008,trn003012," & sql_sum & _
"from strn003mo where " & _
"trn003002 = 'CON' and trn003003 = 'FATTN' and " & _
"trn003004 = " & year_act & _
" and trn003005 = 'F001' " & _
" and trn003012 <> 571700 and trn003022 in ('0001','0090') " & _
"group by trn003004,trn003008,trn003012"
End If
Sub import_data_orcl_1()
Set rsuserlist = tdb.Execute(sqlquery)