Creating multiple Excel worksheet

Gurus,
I am downloading data into Excel from my web page by using the following:
Response.setContentType("application/vnd.ms-excel");
HtmlWriter out = aResponse.getWriter();
out.print(
I am able to view all the data in one Excel worksheet. Does anyone know of a way to create multiple worksheets?
Thanks in advance for your help.

Look at POI at http://jakarta.apache.org/poi/ for an open source library to write Excel with Java.
If you just want to produce a one-off, you can save an Excel workbook as XML and look at that to see how the sheets are produced in XML.
There are also commercial products like Formula One that provide support for reading and writing directly to/from Excel from Java.

Similar Messages

Uploading multiple EXCEL Worksheets to SAP

hello everyone.
i am new to SAP, and i wanted to create a program that would read multiple excel worksheets and appened the values of the file to an internal table.
can somebody help me with this?
here's what i wanted to do exactly:
excel tab:
worksheet 1:
pernr | begda | endda |
worksheet 2:
pernr | begda | endda | address line 1 | address line 2 | phone number
worksheet 3:
pernr | begda | endda | Annual salary |
i wanted those data to be in the following internal tables:
for worksheet 1: >>>> i_pa0002.
for worksheet 2: >>>> i_pa0006.
for worksheet 3: >>>> i_pa0008.
thanks a lot for future replies.
Mark

hi,
you can use fm
ALSM_EXCEL_TO_INTERNAL_TABLE
call function 'ALSM_EXCEL_TO_INTERNAL_TABLE'
exporting
    filename                      = 'File Path\File name.xlsx'
    i_begin_col                   = 'A'
    i_begin_row                   = 1
    i_end_col                     = 'E'
    i_end_row                     = 3
tables
    intern                        = itab
EXCEPTIONS
INCONSISTENT_PARAMETERS       = 1
UPLOAD_OLE                    = 2
OTHERS                        = 3
if sy-subrc 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
thanks

ABAP Internal Tables to Multiple Excel Worksheets in One Workbook

I have an ABAP List report that shows data from two dozen internal tables. Each internal table has different fields, formats, column headers, etc.
I need to allow the user to export this data into one Excel file. The file should contain multiple worksheets (each on a separate tab), but it should only be one XLS file. Each worksheet is formatted differently.
I just coded it with the OLE Automation commands. It runs too SLOW.... way way too slow. Is there another technique to use that runs faster? Examples?
Thanks in advance!

I should add...
the slow part of this process is setting the value of each cell.
SET PROPERTY OF gh_cell 'Value' = p_lv_value
I am looking into function modules XXL_SIMPLE_API and XXL_FULL_API. They appear to work faster, but they only create a single worksheet.
Maybe it would be fastest to use the XXL modules to create multiple spreadsheet files and then use the OLE commands to merge them into a single workbook file?

Create new excel worksheet

Hi all,
Kinldy let me know how to create a new worksheet if the records exceeds 65536 rows in excel.
Im using FM MS_EXCEL_OLE_STANDARD_DAT.
call function 'MS_EXCEL_OLE_STANDARD_DAT'
     exporting
          file_name                 = filepath
         create_pivot              = 0
         data_sheet_name           = 'Material List'
        pivot_sheet_name          = 'Material List1'
        PASSWORD                  = ' '
        PASSWORD_OPTION           = 0
    tables
        pivot_field_tab           =
         data_tab                  = it_bom_final
         fieldnames                = out
Am i missing any parameters in the FM or need to add additional logic??
Regards,
Senthil

Hi Senthil,
Refer sample code for generating multiple Workbook. You can write some logic to split. Hope this helps.
>
Multiple excel sheets generation in a workbook
CREATE OBJECT EXCEL 'EXCEL.SHEET'.
GET PROPERTY OF EXCEL 'Application' = APPLICATION.
SET PROPERTY OF APPLICATION 'Visible' = 1.
CALL METHOD OF APPLICATION 'Workbooks' = BOOKS.
CALL METHOD OF BOOKS 'Add' = BOOK.
CALL METHOD OF BOOK 'WORKSHEETS' = SHEET.
CALL METHOD OF SHEET 'ADD'.
Fill all the sheets with relavant data
PERFORM SHEET1 TABLES ITAB1.
PERFORM SHEET2 TABLES ITAB2.
PERFORM SHEET3 TABLES ITAB3.
PERFORM SHEET4 TABLES ITAB4.
Quit the excel after use
CALL METHOD OF EXCEL 'QUIT'.
FREE OBJECT: COLUMN,SHEET,BOOK,BOOKS,APPLICATION,EXCEL. "NO FLUSH.
CLEAR V_SHEET.
FORM FILL_CELL USING ROW COL VAL.
CALL METHOD OF SHEET 'cells' = CELL NO FLUSH
EXPORTING #1 = ROW #2 = COL.
SET PROPERTY OF CELL 'value' = VAL.
FREE OBJECT CELL NO FLUSH.
ENDFORM. " FILL_CELL
FORM SHEET1 TABLES ITAB1 STRUCTURE ITAB1.
V_SHEET = Sheet Name.
V_NO = V_NO + 1.
CALL METHOD OF BOOK 'worksheets' = SHEET NO FLUSH EXPORTING #1 = V_NO.
SET PROPERTY OF SHEET 'Name' = V_SHEET NO FLUSH.
PERFORM FILL_SHEET1 TABLES ITAB1 USING V_NO V_SHEET.
CALL METHOD OF SHEET 'Columns' = COLUMN.
FREE OBJECT SHEET.
CALL METHOD OF COLUMN 'Autofit'.
FREE OBJECT COLUMN.
ENDFORM.
Repeat above procedure for all sheets you want to add
FORM FILL_SHEET1
TABLES ITAB1 STRUCTURE ITAB1
USING V_NO V_SHEET.
ROW = 1.
PERFORM FILL_CELL USING ROW 1 'Column1 Name'.
PERFORM FILL_CELL USING ROW 2 'Column2 Name'.
PERFORM FILL_CELL USING ROW 3 'Column3 Name'.
ROW = ROW + 1.
LOOP AT ITAB1.
PERFORM FILL_CELL USING ROW 1 ITAB1-Column1.
PERFORM FILL_CELL USING ROW 2 ITAB1-Column2.
PERFORM FILL_CELL USING ROW 3 ITAB1-Column3.
ROW = ROW + 1.
ENDLOOP.
ENDFORM.
Repeat above procedure for all sheets you want to add
Reward points if this Helps.
Manish

Accessing same data in Multiple Excel Worksheets

I am trying to create a summary page based on data that is on subsequent worksheets via the Excel template in Bi Publisher 11g.
I wanted to know if there is a way to reference a Group. So if I had a Department (G_D) and a Employees (G_E) groups in the data model and then I wanted to reference G_D on both sheet 1 and Sheet 2 in the spreadsheet how would I do it.
I created the equivalent in the XDO_METADATa Sheet:
XDO_GROUP_?G_D1? <?(.//G_D)?>
XDO_?G_DNO1? <?(.//DEPTNO)?>
and the Template viewer ran but did not print out any departments. When I remove the XDO_GROUP_?G_D1? it prints out all of the departments in one row, rather than in columns as I would like.

Again, as I got no help from the forum, I resolved this by changing the data model within BI Publisher and created another query for the summary data and then referenced this on the other page.
Will leave thread open for a few days in case someone has a better way of doing it.
I wanted to reference the existing data because:
a) it is already there, why should I have to run another query
b) I am guaranteed to get the same results and won't have any rounding type issues when aggregating the individual values.

Report to multiple Excel Worksheets

Hi,
I have a report that has data from many data groups. Is it possible for me, using XML Publisher, to convert the groups of data into different worksheets within the same excel spreadsheet.
Currently, I have all four groups of data (or sets of data) displayed one after the other in one spreadsheet using the RTF template. Our users want the data to be displayed in different worksheets within an Excel file. Is it doable?
I am using version 5.6.3 of XML Publisher and 11.5.10.2 version of Oracle Apps.
Thanks in advance.
Regards,
Venkat

This is just a thought, as I am no Excel guru. Once the data is in one worksheet, you should be able to use Excel macros to split the data up and move it around (as long as the number of rows doesn't change).

Trying to create a excel style worksheet and i can't get the format even close. trying to create a style of sheet that allows horizontal text on the left (in landscape view) and text rotated sideways in the rows.

i am trying to re-create an excel worksheet in numbers that my command created. it is more of a tracking sheet with names on the left, and across the top having different things (to track as items completed) with the text vertical and reading sideways. i don't know how to do this formatting and i cannot access my work email from home. this is mildly frustrating. any help?

Short answer: Feature not supported.
Detail:
Text cannot be rotated in table cells in Numbers.
You can place text into a Text box or series of Text boxes, then rotate the box(es).
Requests for Numbers feature enhancements may be placed via the Provide Numbers Feedback item in the Numbers menu in Numbers. Don't expect to see results before at least the next full version of Numbers.
Regards,
Barry

Map Excel worksheet into Oracle tables repository

I am new to VB2005. I am working on VB code that can map(read) any table from excel worksheet and load it into Oracle table. Oracle table that I have are: 1)META_OBJECTTYPES(OBJECTTYPEID pk,OBJECTTYPENAME,OBJECTTYPEDESC, OBJECTMETATYPE,OBJECTDOMAIN).
2) META_OBJECTS(OBJECTKEY PK,OBJECTTYPEID FK,OBJECTNAME,OBJECTDESC).
3)META_OBJECTDEPENDENCIES(SRCOBJECTKEY FK, TGTOBJECTKEY FK,DEPENDENCYTYPE PK)
4)META_OBJECTATTRIBUTES((OBJECTKEY FK, OBJECTATTRNAME PK,OBJECTATTRVALUE). NOTICE META_OBJECTTYPES IS PARENT TO META_OBJECTS AND META_OBJECTS IS PARENT TO (META_OBJECTDEPENDENCIES AND META_OBJECTATTRIBUTES) AND ALL PARENT HAS 1 TO MANY REALTIONSHIP TO CHILD TABLES. For example I have employee table in Excel worksheet that has two columns employee_id number, employee_name varchar2(50) I need my vb code map table name employee with its 2 columns into my 4 tables that I have in Oracle repository,
My code so far just insert values into oracle tables in repository, but what is require is mapping table with contents into oracle tables.
Imports System
Imports System.Data ' VB.NET
Imports Oracle.DataAccess.Client ' ODP.NET Oracle data provider
Imports Excel = Microsoft.Office.Interop.Excel
Public Class Form1
'System.Data.OracleClient lets you access Oracle databases.
Public con As System.Data.OracleClient.OracleConnection = New System.Data.OracleClient.OracleConnection() 'Oracle.DataAccess.Client.OracleConnection()
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlWorkSheet As Excel.Worksheet
Dim range As Excel.Range
Dim rCnt As Integer
Dim cCnt As Integer
Dim Obj As Object
xlApp = New Excel.ApplicationClass
xlApp.Visible = True
xlWorkBook = xlApp.Workbooks.Open("c:\employee.xls")
xlWorkSheet = xlWorkBook.Worksheets("sheet1")
range = xlWorkSheet.UsedRange
For rCnt = 2 To range.Rows.Count
For cCnt = 1 To range.Columns.Count
Obj = CType(range.Cells(rCnt, cCnt), Excel.Range)
MsgBox(Obj.value)
Next
Next
xlWorkBook.Close()
xlApp.Quit()
releaseObject(xlApp)
releaseObject(xlWorkBook)
releaseObject(xlWorkSheet)
End Sub
Private Sub releaseObject(ByVal obj As Object)
Try
System.Runtime.InteropServices.Marshal.ReleaseComObject(obj)
obj = Nothing
Catch ex As Exception
obj = Nothing
Finally
GC.Collect()
End Try
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim daOracle As New OracleDataAdapter
Dim InsertCommand As New OracleCommand
daOracle.InsertCommand = New OracleCommand
'1.Create connection object to Oracle database
Dim con As OracleConnection = New OracleConnection()
Try
'2.Specify connection string
con.ConnectionString = ("Data Source=dprod;User Id=smughrabi; Password=Sul9966")
'3. Open the connection through ODP.NET
con.Open()
Dim cmd As OracleCommand = New OracleCommand
cmd.Connection = con
cmd.CommandType = CommandType.Text
cmd.CommandText = "insert into meta_objecttypes values (4,'TABLE', 'TABLES','ERstudio','Demo')"
cmd.ExecuteNonQuery()
'You have to commit to be inserted into DB
cmd.CommandText = "commit"
cmd.ExecuteNonQuery()
'Catch ex As Exception
'4.display if any error occurs
'MsgBox(ex.Message, Microsoft.VisualBasic.MsgBoxStyle.Exclamation, "OraScan")
Finally
' Close and Dispose OracleConnection object
con.Close()
con.Dispose()
End Try
End Sub
Private Sub Add_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Add.Click
Dim daOracle As New OracleDataAdapter
Dim InsertCommand As New OracleCommand
daOracle.InsertCommand = New OracleCommand
'1.Create connection object to Oracle database
Dim con As OracleConnection = New OracleConnection()
Try
If TableName.Text = "" Then
MsgBox("Please enter the tablename", MsgBoxStyle.Exclamation, "OraScan")
Exit Sub
End If
MsgBox(TableName.Text, MsgBoxStyle.Exclamation, "OraScan")
'2.Specify connection string
con.ConnectionString = ("Data Source=gema;User Id=dare; Password=rtae")
'3. Open the connection through ODP.NET
con.Open()
Dim cmd As OracleCommand = New OracleCommand
cmd.Connection = con
cmd.CommandType = CommandType.Text
cmd.CommandText = "select * from user_objects where object_name='" + UCase(TableName.Text) + "' and object_type='TABLE'"
cmd.ExecuteNonQuery()
'You have to commit to be inserted into DB
'cmd.CommandText = "commit"
'cmd.ExecuteNonQuery()
MsgBox("Command executed successfully", MsgBoxStyle.Exclamation, "OraScan")
'Catch ex As Exception
'4.display if any error occurs
'MsgBox(ex.Message, Microsoft.VisualBasic.MsgBoxStyle.Exclamation, "OraScan")
Finally
' Close and Dispose OracleConnection object
con.Close()
con.Dispose()
End Try
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TableName.TextChanged
End Sub
End Class

Thanks Lyndon, what I need is map any table someone create in Excel worksheet to Oracle repository.For example to map Excel worksheet(employee)table with its 2 columns to oracle table META_OBJECTTYPES(OBJECTTYPEID pk,OBJECTTYPENAME,OBJECTTYPEDESC, OBJECTMETATYPE,OBJECTDOMAIN). In my case I have 2 objecttypes 1)table(employee) and 2nd columns:employee_id,employee_name
--for inserting table info manually into DB:
INSERT INTO META_OBJECTS
(OBJECTKEY, OBJECTTYPEID,OBJECTNAME,OBJECTDESC)
VALUES
(META_OBJECTS_SEQ.NEXTVAL,
4, --TABLE
'employee',--notice this is table name from Excel worksheet
'Table to store employee info')
--for inserting columns info:
INSERT INTO META_OBJECTS
(OBJECTKEY, OBJECTTYPEID,OBJECTNAME,OBJECTDESC)
VALUES
(META_OBJECTS_SEQ.NEXTVAL,5,'employee_id or name','employee column')
notice above I insert manually Excel worksheet employee table with its two cols into oracle meta_objecttypes. What I want is VB to do this I mean if I go to Toad and erase what I insert in meta_objecttypes when I run vb, the program should map table employee with its 2 cols to Toad(DB). I hope it is clear now. Please refer to 1 st post for 3 other tables in DB

Creating multiple columns in Excel spreadsheet

Hi
I am using the sample code from this link:
http://www.sapdevelopment.co.uk/ms/ms_excel.htm
How would I write to the worksheet with multiple columns corresponding to each column field of the internal table?
Create second Excel sheet
CALL METHOD OF application 'Worksheets' = sheet
                               EXPORTING #1 = 2.
SET PROPERTY OF sheet 'Name' = 'Sheet2'.
CALL METHOD OF sheet 'Activate'.
LOOP AT itab2.
    index = row_max * ( sy-tabix - 1 ) + 1. " 1 - column name
    CALL METHOD OF sheet 'Cells' = cells EXPORTING #1 = index.
    SET PROPERTY OF cells 'Value' = itab2-last_name.
ENDLOOP.
Say I have the internal table itab2 with the following fields:
data: begin of itab2 occurs 0,
        field1(10),
        field2(9),
        field3(3),
        field4(12),
        field5(3),
        etc.
end of itab2.
Would someone recommend me on this issue?
Thanks,
RT
Message was edited by: Rob Thomas

*& Report ZETA_EXCEL_DOWNLOAD_CLIPBOARD                               *
report zeta_excel_download_clipboard           .
include ole2incl.
data: w_cell1     type ole2_object,
       w_cell2     type ole2_object.
*--- Ole data Declarations
data: h_excel     type ole2_object,        " Excel object
      h_mapl      type ole2_object,        " list of workbooks
      h_map       type ole2_object,        " workbook
      h_zl        type ole2_object,        " cell
      h_f         type ole2_object,        " font
      gs_interior type ole2_object,        " Pattern
      worksheet   type ole2_object,
      h_cell      type ole2_object,
      h_cell1     type ole2_object,
      range       type ole2_object,
      h_sheet2    type ole2_object,
      h_sheet3    type ole2_object,
      gs_font     type ole2_object,
      flg_stop(1) type c.
          Internal table Declaration
data: begin of t_excel occurs 0,
vkorg(20) type c, "Sales Org
vbtyp(20) type c, "Document Category
auart(20) type c, "Document Type
ernam(20) type c, "Created By
vbeln(20) type c, "Document Number
posnr(20) type c, "Item Number
erdat(20) type c, "Created Date
vdatu(20) type c, "Header Requested Delivery Date
reqdat(20) type c, "Request date
condat(20) type c, "Confirm date
lifsk(20) type c, "Header Block
txt30(30) type c, "Order User Status Description
lifsp(20) type c, "Line Block
dispo(20) type c, "MRP Controller
dsnam(20) type c, "MRP Controller Description
vmsta(20) type c, "Material Sales Status
kunnr(20) type c, "Sold To
cname(35) type c, "Sold To Name
regio(20) type c, "State
cufd(10) type c, "CUD
bstnk(20) type c, "PO#
bsark(20) type c, "Ordering Method
matnr(20) type c, "Material
maktx(35) type c, "Material Description
t200(20) type c, "T200
vtext(20) type c, "T200 Description
matkl(20) type c, "Material Group
zzbomind(7) type c, "BOM Indicator
ostat(20) type c, "Order Status
cmgst(20) type c, "CRD
inco1(20) type c, "Incoterms
oqty(20) type c, "Order Quantity
pqty(20) type c, "Open Quantity
unit(20) type c, "UOM
onet(20) type c, "Order Value
pnet(20) type c, "Open Value
curr(20) type c, "Currency key
so_bezei like tvkbt-bezei,"Sales Office
sg_bezei like tvgrt-bezei,"Sales Group
bname(20) type c, "Ordering Party
contact(20) type c, "Contact Name
telf1(20) type c, "Contact telf1
reqqty(20) type c, "Item Request qty
reqval(20) type c, "Item Request value
conqty(20) type c, "Item Confirm qty
conval(20) type c, "Item Confirm value
zzrev(02) type c, "Revenue recognition acceptance
bezei(20) type c, "Revenue recognition text
vgbel(20) type c, "Reference Order for RETURNS
0008text(255) type c, "Internal Order Comment Text
end of t_excel.
data: t_excel_bckord like t_excel occurs 0 with header line,
      t_excel_bcklog like t_excel occurs 0 with header line,
      t_excel_blkord like t_excel occurs 0 with header line.
types: data1(1500) type c,
         ty          type table of data1.
data: it          type ty with header line,
it_2          type ty with header line,
it_3          type ty with header line,
         rec         type sy-tfill,
         deli(1)     type c,
         l_amt(18)   type c.
data: begin of hex,
         tab type x,
        end of hex.
field-symbols: <fs>      .
constants cns_09(2) type n value 09.
assign deli to <fs> type 'X'.
hex-tab = cns_09.
<fs> = hex-tab.
data gv_sheet_name(20) type c .
M A C R O Declaration
define ole_check_error.
if &1 ne 0.
    message e001(zz) with &1.
    exit.
endif.
end-of-definition.
t_excel_bckord-vkorg = 'ABC'.
t_excel_bckord-vbtyp = 'DEF'.
t_excel_bckord-auart = 'GHI'.
t_excel_bckord-ernam = 'JKL'.
t_excel_bckord-vbeln = 'MNO'.
t_excel_bckord-0008text = 'XYZ'.
append t_excel_bckord.
t_excel_bckord-vkorg = 'ABC1'.
t_excel_bckord-vbtyp = 'DEF1'.
t_excel_bckord-auart = 'GHI1'.
t_excel_bckord-ernam = 'JKL1'.
t_excel_bckord-vbeln = 'MNO1'.
t_excel_bckord-0008text = 'XYZ1'.
append t_excel_bckord.
t_excel_bckord-vkorg = 'ABC2'.
t_excel_bckord-vbtyp = 'DEF2'.
t_excel_bckord-auart = 'GHI2'.
t_excel_bckord-ernam = 'JKL2'.
t_excel_bckord-vbeln = 'MNO2'.
t_excel_bckord-0008text = 'XYZ2'.
append t_excel_bckord.
t_excel_bcklog-vkorg = 'ABC'.
t_excel_bcklog-vbtyp = 'DEF'.
t_excel_bcklog-auart = 'GHI'.
t_excel_bcklog-ernam = 'JKL'.
t_excel_bcklog-vbeln = 'MNO'.
t_excel_bcklog-0008text = 'XYZ'.
append t_excel_bcklog.
t_excel_bcklog-vkorg = 'ABC1'.
t_excel_bcklog-vbtyp = 'DEF1'.
t_excel_bcklog-auart = 'GHI1'.
t_excel_bcklog-ernam = 'JKL1'.
t_excel_bcklog-vbeln = 'MNO1'.
t_excel_bcklog-0008text = 'XYZ1'.
append t_excel_bcklog.
t_excel_bcklog-vkorg = 'ABC2'.
t_excel_bcklog-vbtyp = 'DEF2'.
t_excel_bcklog-auart = 'GHI2'.
t_excel_bcklog-ernam = 'JKL2'.
t_excel_bcklog-vbeln = 'MNO2'.
t_excel_bcklog-0008text = 'XYZ2'.
append t_excel_bcklog.
t_excel_bcklog-vkorg = 'ABC3'.
t_excel_bcklog-vbtyp = 'DEF3'..
t_excel_bcklog-auart = 'GHI3'.
t_excel_bcklog-ernam = 'JKL3'.
t_excel_bcklog-vbeln = 'MNO3'.
t_excel_bcklog-0008text = 'XYZ3'.
append t_excel_bcklog.
t_excel_blkord-vkorg = 'ABC'.
t_excel_blkord-vbtyp = 'DEF'.
t_excel_blkord-auart = 'GHI'.
t_excel_blkord-ernam = 'JKL'.
t_excel_blkord-vbeln = 'MNO'.
t_excel_blkord-0008text = 'XYZ'.
append t_excel_blkord.
t_excel_blkord-vkorg = 'ABC1'.
t_excel_blkord-vbtyp = 'DEF1'.
t_excel_blkord-auart = 'GHI1'.
t_excel_blkord-ernam = 'JKL1'.
t_excel_blkord-vbeln = 'MNO1'.
t_excel_blkord-0008text = 'XYZ1'.
append t_excel_blkord.
t_excel_blkord-vkorg = 'ABC2'.
t_excel_blkord-vbtyp = 'DEF2'.
t_excel_blkord-auart = 'GHI2'.
t_excel_blkord-ernam = 'JKL2'.
t_excel_blkord-vbeln = 'MNO2'.
t_excel_blkord-0008text = 'XYZ2'.
append t_excel_blkord.
t_excel_blkord-vkorg = 'ABC3'.
t_excel_blkord-vbtyp = 'DEF3'..
t_excel_blkord-auart = 'GHI3'.
t_excel_blkord-ernam = 'JKL3'.
t_excel_blkord-vbeln = 'MNO3'.
t_excel_blkord-0008text = 'XYZ3'.
append t_excel_blkord.
t_excel_blkord-vkorg = 'ABC4'.
t_excel_blkord-vbtyp = 'DEF4'..
t_excel_blkord-auart = 'GHI4'.
t_excel_blkord-ernam = 'JKL4'.
t_excel_blkord-vbeln = 'MNO4'.
t_excel_blkord-0008text = 'XYZ4'.
append t_excel_blkord.
loop at t_excel_bckord.
concatenate
t_excel_bckord-vkorg
t_excel_bckord-vbtyp
t_excel_bckord-auart
t_excel_bckord-ernam
t_excel_bckord-vbeln
t_excel_bckord-posnr
t_excel_bckord-erdat
t_excel_bckord-vdatu
t_excel_bckord-reqdat
t_excel_bckord-condat
t_excel_bckord-lifsk
t_excel_bckord-txt30
t_excel_bckord-lifsp
t_excel_bckord-dispo
t_excel_bckord-dsnam
t_excel_bckord-vmsta
t_excel_bckord-kunnr
t_excel_bckord-cname
t_excel_bckord-regio
t_excel_bckord-cufd
t_excel_bckord-bstnk
t_excel_bckord-bsark
t_excel_bckord-matnr
t_excel_bckord-maktx
t_excel_bckord-t200
t_excel_bckord-vtext
t_excel_bckord-matkl
t_excel_bckord-zzbomind
t_excel_bckord-ostat
t_excel_bckord-cmgst
t_excel_bckord-inco1
t_excel_bckord-oqty
t_excel_bckord-pqty
t_excel_bckord-unit
t_excel_bckord-onet
t_excel_bckord-pnet
t_excel_bckord-curr
t_excel_bckord-so_bezei
t_excel_bckord-sg_bezei
t_excel_bckord-bname
t_excel_bckord-contact
t_excel_bckord-telf1
t_excel_bckord-reqqty
t_excel_bckord-reqval
t_excel_bckord-conqty
t_excel_bckord-conval
t_excel_bckord-zzrev
t_excel_bckord-bezei
t_excel_bckord-vgbel
t_excel_bckord-0008text
into it
separated by deli.
append it.
    clear it.
endloop.
loop at t_excel_bcklog.
concatenate
t_excel_bcklog-vkorg
t_excel_bcklog-vbtyp
t_excel_bcklog-auart
t_excel_bcklog-ernam
t_excel_bcklog-vbeln
t_excel_bcklog-posnr
t_excel_bcklog-erdat
t_excel_bcklog-vdatu
t_excel_bcklog-reqdat
t_excel_bcklog-condat
t_excel_bcklog-lifsk
t_excel_bcklog-txt30
t_excel_bcklog-lifsp
t_excel_bcklog-dispo
t_excel_bcklog-dsnam
t_excel_bcklog-vmsta
t_excel_bcklog-kunnr
t_excel_bcklog-cname
t_excel_bcklog-regio
t_excel_bcklog-cufd
t_excel_bcklog-bstnk
t_excel_bcklog-bsark
t_excel_bcklog-matnr
t_excel_bcklog-maktx
t_excel_bcklog-t200
t_excel_bcklog-vtext
t_excel_bcklog-matkl
t_excel_bcklog-zzbomind
t_excel_bcklog-ostat
t_excel_bcklog-cmgst
t_excel_bcklog-inco1
t_excel_bcklog-oqty
t_excel_bcklog-pqty
t_excel_bcklog-unit
t_excel_bcklog-onet
t_excel_bcklog-pnet
t_excel_bcklog-curr
t_excel_bcklog-so_bezei
t_excel_bcklog-sg_bezei
t_excel_bcklog-bname
t_excel_bcklog-contact
t_excel_bcklog-telf1
t_excel_bcklog-reqqty
t_excel_bcklog-reqval
t_excel_bcklog-conqty
t_excel_bcklog-conval
t_excel_bcklog-zzrev
t_excel_bcklog-bezei
t_excel_bcklog-vgbel
t_excel_bcklog-0008text
into it_2
separated by deli.
append it_2.
    clear it_2.
endloop.
loop at t_excel_blkord.
concatenate
t_excel_blkord-vkorg
t_excel_blkord-vbtyp
t_excel_blkord-auart
t_excel_blkord-ernam
t_excel_blkord-vbeln
t_excel_blkord-posnr
t_excel_blkord-erdat
t_excel_blkord-vdatu
t_excel_blkord-reqdat
t_excel_blkord-condat
t_excel_blkord-lifsk
t_excel_blkord-txt30
t_excel_blkord-lifsp
t_excel_blkord-dispo
t_excel_blkord-dsnam
t_excel_blkord-vmsta
t_excel_blkord-kunnr
t_excel_blkord-cname
t_excel_blkord-regio
t_excel_blkord-cufd
t_excel_blkord-bstnk
t_excel_blkord-bsark
t_excel_blkord-matnr
t_excel_blkord-maktx
t_excel_blkord-t200
t_excel_blkord-vtext
t_excel_blkord-matkl
t_excel_blkord-zzbomind
t_excel_blkord-ostat
t_excel_blkord-cmgst
t_excel_blkord-inco1
t_excel_blkord-oqty
t_excel_blkord-pqty
t_excel_blkord-unit
t_excel_blkord-onet
t_excel_blkord-pnet
t_excel_blkord-curr
t_excel_blkord-so_bezei
t_excel_blkord-sg_bezei
t_excel_blkord-bname
t_excel_blkord-contact
t_excel_blkord-telf1
t_excel_blkord-reqqty
t_excel_blkord-reqval
t_excel_blkord-conqty
t_excel_blkord-conval
t_excel_blkord-zzrev
t_excel_blkord-bezei
t_excel_blkord-vgbel
t_excel_blkord-0008text
into it_3
separated by deli.
append it_3.
    clear it_3.
endloop.
if h_excel-header = space or h_excel-handle = -1.
start Excel
    create object h_excel 'EXCEL.APPLICATION'.
endif.
PERFORM err_hdl.
*--- get list of workbooks, initially empty
call method of h_excel 'Workbooks' = h_mapl.
PERFORM err_hdl.
set property of h_excel 'Visible' = 1.
add a new workbook
call method of h_mapl 'Add' = h_map.
PERFORM err_hdl.
*GV_SHEET_NAME = '1st SHEET'.
gv_sheet_name = 'Back Orders'.
get property of h_excel 'ACTIVESHEET' = worksheet.
set property of worksheet 'Name' = gv_sheet_name .
*--Formatting the area of additional data 1 and doing the BOLD
call method of h_excel 'Cells' = w_cell1
exporting
#1 = 1
#2 = 1.
call method of h_excel 'Cells' = w_cell2
exporting
#1 = 1
#2 = 50.
call method of h_excel 'Range' = h_cell
exporting
#1 = w_cell1
#2 = w_cell2.
*CALL METHOD OF gs_cells 'Select' .
get property of h_cell 'Font' = gs_font .
set property of gs_font 'Bold' = 1 .
        data l_rc type i.
call method cl_gui_frontend_services=>clipboard_export
    importing
      data                 = it[]
    changing
      rc                   = l_rc
    exceptions
      cntl_error           = 1
      error_no_gui         = 2
      not_supported_by_gui = 3
      others               = 4.
call method of h_excel 'Cells' = w_cell1
    exporting
      #1 = 1
      #2 = 1.
call method of h_excel 'Cells' = w_cell2
    exporting
      #1 = 1
      #2 = 1.
PERFORM err_hdl.
   call method of h_excel 'Range' = range
    exporting
      #1 = w_cell1
      #2 = w_cell2.
call method of range 'Select'.
PERFORM err_hdl.
call method of worksheet 'Paste'.
PERFORM err_hdl.
CALL METHOD OF h_excel 'QUIT'.
*GV_SHEET_NAME = '2ND SHEET'.
gv_sheet_name = 'Backlog'.
get property of h_excel 'Sheets' = h_sheet2 .
call method of h_sheet2 'Add' = h_map.
set property of h_map 'Name' = gv_sheet_name .
get property of h_excel 'ACTIVESHEET' = worksheet.
*--Formatting the area of additional data 1 and doing the BOLD
call method of h_excel 'Cells' = w_cell1
exporting
#1 = 1
#2 = 1.
call method of h_excel 'Cells' = w_cell2
exporting
#1 = 1
#2 = 50.
call method of h_excel 'Range' = h_cell
exporting
#1 = w_cell1
#2 = w_cell2.
get property of h_cell 'Font' = gs_font .
set property of gs_font 'Bold' = 1 .
call method cl_gui_frontend_services=>clipboard_export
    importing
      data                 = it_2[]
    changing
      rc                   = l_rc
    exceptions
      cntl_error           = 1
      error_no_gui         = 2
      not_supported_by_gui = 3
      others               = 4.
call method of h_excel 'Cells' = w_cell1
    exporting
      #1 = 1
      #2 = 1.
call method of h_excel 'Cells' = w_cell2
    exporting
      #1 = 1
      #2 = 1.
PERFORM err_hdl.
   call method of h_excel 'Range' = range
    exporting
      #1 = w_cell1
      #2 = w_cell2.
call method of range 'Select'.
PERFORM err_hdl.
call method of worksheet 'Paste'.
*GV_SHEET_NAME = '3rd SHEET'.
gv_sheet_name = 'Blocked Orders'.
get property of h_excel 'Sheets' = h_sheet3 .
call method of h_sheet3 'Add' = h_map.
set property of h_map 'Name' = gv_sheet_name .
get property of h_excel 'ACTIVESHEET' = worksheet.
*--Formatting the area of additional data 1 and doing the BOLD
call method of h_excel 'Cells' = w_cell1
exporting
#1 = 1
#2 = 1.
call method of h_excel 'Cells' = w_cell2
exporting
#1 = 1
#2 = 50.
call method of h_excel 'Range' = h_cell
exporting
#1 = w_cell1
#2 = w_cell2.
get property of h_cell 'Font' = gs_font .
set property of gs_font 'Bold' = 1 .
call method cl_gui_frontend_services=>clipboard_export
    importing
      data                 = it_3[]
    changing
      rc                   = l_rc
    exceptions
      cntl_error           = 1
      error_no_gui         = 2
      not_supported_by_gui = 3
      others               = 4.
call method of h_excel 'Cells' = w_cell1
    exporting
      #1 = 1
      #2 = 1.
call method of h_excel 'Cells' = w_cell2
    exporting
      #1 = 1
      #2 = 1.
PERFORM err_hdl.
   call method of h_excel 'Range' = range
    exporting
      #1 = w_cell1
      #2 = w_cell2.
call method of range 'Select'.
PERFORM err_hdl.
call method of worksheet 'Paste'.
*--- disconnect from Excel
free object h_zl.
free object h_mapl.
free object h_map.
free object h_excel.

Create PDF button gone from Excel worksheet

Recently had to restore computer back to factory. I installed full CS4 WebSuite which includes Acrobat. I used to have a PDF button in Excel that would let me create a PDF from an Excel worksheet. How do I get that back? I used to use Office 2003 and now I use Office 2013.
Thanks so much in advance!

The store is at http://www.adobe.com/products/acrobatpro/buying-guide-upgrade-pricing.html. If you click the upgrade option, you will see the option to upgrade to AA XI from the AA X Suite (whatever that is, I assume CS) or from individual products. In your case it is not an individual product, but a suite. If you have questions or want to see if you can get a deal, you will have to call the Adobe sales folks. We can only repeat what we see and have heard from others (except for those folks who have the suite).
You can still print to the Adobe PDF printer from Excel 2013, if you can get AA9 to work on Win8 (an outside chance, but may require some workarounds). You would just not get links or bookmarks. You might see if there is a MS plugin for creating PDFs from Excel. If there is, you might be able to create the PDFs that way and edit in Acrobat 9.

Create multiple grid in a worksheet

my smartivew version is 11.1.2.2, this relase should support to create multiple grid in a worksheet.
but when i try to add the second grid, i only see the 3 options:
"clear sheet contents and POV"
"Reuse sheet contents only"
"Reuse sheet contents and POV"
not able to see the fourth option.
i do have selected multiple cells.
where am i wrong?

my smartivew version is 11.1.2.2, this relase should support to create multiple grid in a worksheet.
but when i try to add the second grid, i only see the 3 options:
"clear sheet contents and POV"
"Reuse sheet contents only"
"Reuse sheet contents and POV"
not able to see the fourth option.
i do have selected multiple cells.
where am i wrong?

Cant create adobe files from multiple excel or word files

This is the first time I have placed anything on this forum so please forgive me if I am in the wrong p
lace. I have been frustrated by an error message I get when I try to convert multiple excel files or word files to
PDF. The files exist on a network location, and when I select 5 or 6 at random
and then right click and choose "Convert to PDF", the operation bombs with a message that reads:
"The file you selected does not contain any data (zero length file). Please select another file." I can
not find anything on this on Adobe's website, or google. I used to d
o it fine until a few days ago, now it won't convert and I get the above message. Anybody have any idea? I a
m using Windows XP SP3 and Office 2007 SP1. Thanks
Steve Szabo

I can copy these files to the local drive and do the operation fine. I can also convert files that are already on the hard drive.
Just cannot convert the ones that are in the network location. I used to be able to do it, but not now.
Steve

How do I create multiple sheets in an xls workbook email attachment?

Hello,
I've been looking at report BCS_EXAMPLE_7 to see how to attach an excel document to an email but I don't see how to create an excel workbook with multiple worksheets. The example creates one workbook with one worksheet. I'd like to have multiple worksheets in the workbook (one for each time bucket in the report).
I'm guessing I need to insert something into the binary_content but I need some help finding where to start.
Thank you,
Michael

Hi ,
You can try the below link and it will definately solve your problem:
http://www.sapdevelopment.co.uk/ms/ms_excel.htm
Regards,
Ashish Arora

Import Multiple Excel Into Sql Server

I have 4 Excel spreadsheets all with different formatting and column names that I want to use powershell to import into ONE Sql Server Table that I will want to create with powershell. I have found several instances of importing one workbook, but I
haven't found one where you can import multiple workbooks into the same table. Can someone show sample code for a reference on how to import multiple spreadsheets into the same table with powershell please? I found this link which looks like a
GREAT starting point, but unfortunately it is only showing how to do one table, and I am WAY new to powershell so can't tweak it on my own to set it to import multiple
http://www.sqlserver-dba.com/2013/01/sql-server-export-excel-data-to-sql-server-with-powershell.html

Hi IndigoMontoya,
As a workaroud, how about merge mutiple excel files into one file, then import this excel file to sql table?
To merge excel files, please refer to this script:
$Files = 'd:\merge1.xlsx','d:\merge2.xlsx'
#Launch Excel, and make it do as its told (supress confirmations)
$Excel = New-Object -ComObject Excel.Application
$Excel.Visible = $True
$Excel.DisplayAlerts = $False
#Open up a new workbook
$Dest = $Excel.Workbooks.Add()
#Loop through files, opening each, selecting the Used range, and only grabbing the first 6 columns of it. Then find next available row on the destination worksheet and paste the data
ForEach($File in $Files[0..4]){
$Source = $Excel.Workbooks.Open($File,$true,$true)
If(($Dest.ActiveSheet.UsedRange.Count -eq 1) -and ([String]::IsNullOrEmpty($Dest.ActiveSheet.Range("A1").Value2))){ #If there is only 1 used cell and it is blank select A1
[void]$source.ActiveSheet.Range("A1","F$(($Source.ActiveSheet.UsedRange.Rows|Select -Last 1).Row)").Copy()
[void]$Dest.Activate()
[void]$Dest.ActiveSheet.Range("A1").Select()
}Else{ #If there is data go to the next empty row and select Column A
[void]$source.ActiveSheet.Range("A1","F$(($Source.ActiveSheet.UsedRange.Rows|Select -Last 1).Row)").Copy()
[void]$Dest.Activate()
[void]$Dest.ActiveSheet.Range("A$(($Dest.ActiveSheet.UsedRange.Rows|Select -last 1).row+1)").Select()
[void]$Dest.ActiveSheet.Paste()
$Source.Close()
$Dest.SaveAs("d:\merge3.xlsx",51)
$Dest.close()
$Excel.Quit()
Reference from:
How to use powershell to copy several excel worksheets and make a new one?
I hope this helps.

Download to multiple excel sheets in the backgraoud

Hi,
I am trying to download data into multiple excel sheets in the background. I was able to create comma delimited csv file in the server, which can be opened as excel file. This is good when it does not have more that one worksheets.
I have three internal table and to send these internal tables in different worksheets in the same excel file.
Is it possible to have multiple sheets excel file from the csv file?

Check the following thread !!
Re: Downloading data into excel
Hope thisll give you idea!!
<b>P.S award the points.</b>
Good luck
Thanks
Saquib Khan
"Some are wise and some are otherwise"

Creating multiple Excel worksheet

Similar Messages

Maybe you are looking for