Running BEX7 workbook repeatedly from excel vba

On a monthly basis I have about 300 reports to run,all from the same bex7 workbook, just with slightly different variables.
I was able to setup a macro in bex 3.5 that would refresh a report and fill in values into the SAPBEXqueries hidden sheet. This would adjust each time and save each report with an individual name. Saved me about 3 hrs of sitting and running each report manually.
My company is now upgrading to BEX7 and I am having difficulty getting my head around how to run the same workbook in BEX7 through a VBA Macro and pass the variables to it.
I understand you can use SAPBEXsetVariables to pass variables along to the workbook but what format do the variables have to be in to communicate successfully with the workbook
Would someone have an example of the process?
I do not have access to modify the query at all as I am an end user and I am forced to come up with a solution on my own.
Any help would be appreciated.
Thank you
Dan Gerling

Hi Dan, in the same situation I'm afraid. Just posted this in a similar thread:
"Hi Alfredough, I'm afraid I'm in pretty much the same situation as yourself (although possibly slightly further down the line). The reason I add that possibility is because I'm pretty certain that SAPBEXsetVariables has been removed in 7.x.
It looks like there are some cludges which can be done to work through this (possibly), but the entire comparison of bexanalyzer.xla to sapbex.xla seems to involve features being removed, rather than added.
Here's the thread which seems to give a cludge, which I'm having trouble getting working: How to set variables values via VBA.
There's also some work which someone's done here around script objects: List BEx Analyzer 7.X variables and generate the associated PROCESS_VARIABLES commands

Similar Messages

Problem with controlling Annotations from Excel VBA

Hi,
I have a PDF document that has plenty of sticky notes attached to it. These sticky notes have been added by multiple authors on all pages of the document. I am trying to import the contents of these sticky notes, their author and the page number to an excel spreadsheet. I am using Excel 2007 and Acrobat Professional 9.0.
This is the code that I am currently using to import the sticky notes, but the problem that I am facing is that when I run the macro -
Same sticky note contents, author and page numbers are imported multiple times
Not all sticky notes are imported, only some of them appear in the final excel spreadsheet
When I compare the number of sticky notes to that in the original PDF file, the number is correct. But the content is repeated content and that is the reason why only some of the sticky notes are imported.
This is an activity that I need to do on regular basis and the number of sticky notes that I need to import to excel may range between 100 to 200. It is really difficult to do this task manually, so an excel VBA macro could prove really helpful.
Sub ImportComments_Click()
Dim Fpath As String
Dim WordObj As Object
Dim wbkOutput As Excel.Workbook
Dim iRow As Integer
Dim i, j, k As Integer
Dim lRet As Long
Dim objAcroAVDoc As New Acrobat.acroAVDoc
Dim objAcroPDDoc As Acrobat.AcroPDDoc
Dim numPages As Long
Dim lAnnotscnt As Long
Dim Subtype As String
Dim NumComments As Long
Dim AcroApp As Acrobat.AcroApp
Dim objAcroPDPage As Acrobat.AcroPDPage
Dim annot As Acrobat.AcroPDAnnot
Sheets("Defect Log").Select
Range("L3").Activate
Fpath = ActiveCell.Value
Sheets("Defect Log").Select
Range("A1").Activate
i = 0
Do While (Not (IsEmpty(ActiveCell.Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 1).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 2).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 3).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 4).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 5).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 6).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 7).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 8).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 9).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 10).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 11).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 12).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 13).Value)) Or Not (IsEmpty(ActiveCell.Offset(0, 14).Value)))
i = i + 1
ActiveCell.Offset(1, 0).Select
Loop
iRow = i + 1
Set wbkOutput = ActiveWorkbook
lRet = objAcroAVDoc.Open(Fpath, "")
Set objAcroPDDoc = objAcroAVDoc.GetPDDoc
numPages = objAcroPDDoc.GetNumPages()
Set objAcroPDPage = objAcroPDDoc.AcquirePage(0)
For k = 1 To numPages
lAnnotscnt = objAcroPDPage.GetNumAnnots()
For m = 0 To lAnnotscnt - 1
If lAnnotscnt = 0 Then Exit For
Set objAcroPDAnnot = objAcroPDPage.GetAnnot(m)
If (objAcroPDAnnot.GetContents <> "" And objAcroPDAnnot.GetSubtype = "Text") Then
Cells(iRow, 5).Value = k
Cells(iRow, 2).Value = objAcroPDAnnot.GetContents()
Cells(iRow, 11).Value = objAcroPDAnnot.GetTitle()
iRow = iRow + 1
End If
Next m
Set objAcroPDPage = objAcroPDDoc.AcquirePage(k)
Next k
lRet = objAcroAVDoc.Close(1)
Set objAcroAVDoc = Nothing
Set objAcroPDAnnot = Nothing
Set objAcroPDPage = Nothing
Set objAcroPDDoc = Nothing
End Sub

Make sure you are current with 9.x patches, just on general principles.
The code seems fine – nothing jumping out at me.
You can also look at using the JSObject methods and trying this via the JavaScript stuff – that will give you more access to the Annotation information…
From: Adobe Forums <[email protected]<mailto:[email protected]>>
Reply-To: "[email protected]<mailto:[email protected]>" <[email protected]<mailto:[email protected]>>
Date: Thu, 24 Nov 2011 04:25:12 -0800
To: Leonard Rosenthol <[email protected]<mailto:[email protected]>>
Subject: Problem with controlling Annotations from Excel VBA
Problem with controlling Annotations from Excel VBA
created by apreeti<http://forums.adobe.com/people/apreeti> in Acrobat SDK - View the full discussion<http://forums.adobe.com/message/4044740#4044740

How can I run a BW Function from EXCEL-IN-PLACE (BPS)??? Please give any ex

How can I run a BW Function from EXCEL-IN-PLACE (BPS)using VBA??? Please give any example.
I would like to run my function module ZMY from EXCEL-IN-PLACE using VBA and get a result.

if you are using excel in place in the web application environment I doubt you can, you've never really had any macro functionalty there.
If you are in the gui environemnt (Planning folders) it will depend on how you want to invoke the module...

How to call a labview dll from excel-VBA?

How to call a simple Labview DLL from Excel VBA?
I have seen examples of DLL calls from VB but does it work the same way for VBA? I have 2000 excel and Labview 8.5. I created the DLL and tried to call it from VBA using the same type of code as in NI's website example(ofcourse its a bit diff with 8.5)
http://zone.ni.com/devzone/cda/tut/p/id/...
BUT it errors out when called from excel
ERROR: The object invoked has disconnected from its client

You would need to provide more details about the LabVIEW DLL, such as the prototypes of the functions (VIs) that you're trying to call, and your actual VBA code. Specifically, what object you're trying to create. You should also make sure the Run-Time Enginer is installed, as well as any required libraries such as the VISA Run-Time if you're using VISA. Have you made sure to enable the ActiveX server for the DLL?
A search yielded the following items that you may wish to peruse:
http://forums.ni.com/ni/board/message?board.id=170&message.id=261345&requireLogin=False
http://forums.ni.com/ni/board/message?board.id=170&message.id=45099&requireLogin=False
http://forums.ni.com/ni/board/message?board.id=170&message.id=299209&requireLogin=False
http://forums.ni.com/ni/board/message?board.id=170&message.id=195846&requireLogin=False

Acrobat 9.0 Standard. Setting PDF file password from Excel VBA

Acrobat 9.0 Standard. Setting PDF file password from Excel VBA
Hi: I am trying to find a call to set the password of a PDF file that I am creating from Excel Workbook using a VBA call.
I basically have this Excel VBA code that works fine and creates a file.
            pBook.PrintOut Copies:=1, preview:=False, ActivePrinter:="Adobe PDF", _
                           PrintToFile:=True, collate:=True, PrToFileName:=PSFileName
            ' Convert the postscript file to .pdf
            Dim myPDF As PdfDistiller
            Set myPDF = New PdfDistiller
            myPDF.FileToPDF PSFileName, "", ""
BUT, I need to set the password on this PDF file and do not see an option to do so.
Can you provide a solution for this situation? Appreciate your response in advance.
Thanks.

There is no way to set password programmatically using any other dll or any other kit?
I am creating a bunch of PDF files for users programmatically but then they have to go in and set password themselves? This is very inconvenient for users.

How to read ssas cube and role from Excel vba

Hi,
I want to read all roles and cubes in SSAS Db from Excel Vba.
1. First i want to read all the roles which was assigned to me
2. based on the role, i have to read all cube name
Please help me to
accomplish this task.

Hi Jack,
In Analysis Services, Each role contains members, by Windows username or by Windows group, and permissions (read, process, administrator). If the user has the permission to access SSAS database, then the account was contained in one or more roles. When connect
to SSAS database, we need to use an account to log on it, and SSAS will list all the cubes' name based on the role automatically.
Reference
Using Excel to interact with a SSAS cube
Regards,
Charlie Liao
TechNet Community Support

Doing telnet from excel VBA?

Is it possible to do 'telnet' from excel VBA? The code should get host name/server ip , then username and password from the user. After, it will telnet to the server by providing the username and password...
It should execute some commands in the server too...
Any help appreciable

Hi,
For coding issue, you can ask the question in the Excel for Developers forum:
http://social.msdn.microsoft.com/Forums/en/exceldev/threads
Best Regards,
Sally Tang

Call Transaction from Excel VBA macro and download ALV list object results

I have a situation that must be very common u2013 but I canu2019t find any clear information on how to get it done!
We frequently run SAP transactions, download the results (orders or inventory) into Excel, do some calculations and create a spreadsheet report.
I would like to automate this process using Excel VBA so that a macro will perform these steps:
1. Run our custom SAP report "YSD033" that summarizes orders using the previous day as the [From Date] parameter. (The user already has an active ECC 6 R3 session running.)   If possible, can the TC be run using a specific variant "G111BIZ" ?
2. Download the list object that appears in an ALV grid as a table to an empty spreadsheet in the active workbook (export XXL list object)
3. Save the resulting workbook and close Excel.
Should the solution use u201Ccall transactionu201D or a GuiXT script?
Any help would be much appreciated, and some sample VBA code would be great!
Thanks.
Glenn

Good suggestion, but
I get "permission denied" for   SapGuiAuto.GetScriptingEngine
I also tried the method below, but received this RFC error message:
User PPPPPPP has no RFC authorization for function group SYST.
Sub LoginCheck()
If login = False Then
    ' Setting the necessary variables for R/3 connection
    Set objBAPICortrol = CreateObject("SAP.Functions")
    Set objConnection = objBAPICortrol.Connection
    ' Establish a connection
If objConnection.Logon(0, False) Then
    login = True
    MsgBox "Connection Established"
    CommandButton1.Caption = "Disconnect"
End If
Else
    CommandButton1.Caption = "Connect 2 SAP"
    login = False
    objConnection.Logoff
    Set objConnection = Nothing
    Set objBAPICortrol = Nothing
End If
End Sub
I was told that these kinds of authority open up too big of a window that can't be monitored adequately...
I'm considering an approach like what is below if I can't convince security to grant me permissions...
    Application.Wait Now + TimeValue("00:00:01")
    SendKeys EnterKey, False
Since blocked RFC security settings are preventing the solution from being installed, I am markgin this question as answered.
I will post different questions about 1. how to convince the security team that it will be safe to allow the use of RFC calls, and /or 2. how use some windows-level scripting code to run the SAP jobs.
Thanks.
Edited by: GlennWebster on Mar 1, 2010 4:34 PM

Need to checkout MS Project file from Excel VBA

I have a VBA Excel macro that can open an MS Project file, and extract data. It works fine when the MS Project file is on my hard drive or other location where no check out is required. But often the MPP files I need to access are stored in SharePoint,
in document libraries, that have checkin/checkout enabled. I am aware of the the way to do this for an Excel file, such as the following code snippet.
' Determine if workbook can be checked out.
If Workbooks.CanCheckOut(Filename:=docCheckOut) = True Then
  Workbooks.CheckOut (Filename:=docCheckOut)
Else
  MsgBox "You are unable to check out this document at this time."
End If
I need to be able to do the same thing for MPP files. Here is the code I have; however, I get a compile error on the CheckOut line, indicating "wrong number of arguments or invalid property assignment". My research suggests that I should
get this compile error, as it only works on certain collections. Even the line containing "CanCheckOut", while it does not give me a compile or run time error, it does not return the proper response.
Dim mpApp As MSProject.Application
Set mpApp = New MSProject.Application
AppActivate "Project Professional"
' Determine if mpp file can be checked out.
If mpApp.CanCheckOut(mppFileToOpen) = True Then
  mpApp.CheckOut (mppFileToOpen)
    Else
        MsgBox "Unable to check out this document at this time."
   End If
Is there a way to checkout an MS Project file stored in SharePoint from within Excel VBA? Thanks.
Ray

Rod,
Thanks very much. This was, indeed, the solution. Don't know how I could have missed this.
I did run into some issues with ensuring proper object references, checking back in, and being able to handle files that may be on a laptop, SharePoint site with checkout requirements, or SharePoint site without checkout requirements. Also faced an
issue checking back in; part of my macro opens the MPP file (that is checked out), acquires various pieces of data, then runs a macro in the MPP file that exports data to an excel spreadsheet. After this macro runs (does a save-as using a map), check
in is no longer possible. Fortunately, I could checkout the MPP file, open it, get all the required data elements, make a few changes to the MPP file, check it back in (but not close), then run the macro, then close without saving. In the end,
it all works like a champ. Thanks very much for your advice.
Ray

Powershell Variable from Excel.VBA Macro

Hi Guys!
I don't know if what i'm asking you is achievable.
I've learned how to pass variables/arguments from powershell to Excel/VBA Macro but i need to do the opposite thing.
This is an example of what i want:
Powershell
Excel/VBA Macro
$Input=1 ----------------------------------------------------------------> Sub Macro(input)
$excel.Run("Macro",$Input)
Output=input +6
$output (Expected 7) <---------------------------------------------------- return Output
I don't know how to do this can you help me please?
A

Ok guys those are the script.
Macro:
Sub CreatePWD()
Dim PWD As String
Dim i As Integer
Dim Max As Integer
Dim F1 As Worksheet
Set F1 = ThisWorkbook.Worksheets("Foglio1")
Max = F1.Range("A1").Value
For i = 1 To Max
If Int((2 * Rnd) + 1) = 1 Then
PWD = PWD & Chr(Int((90 - 65 + 1) * Rnd + 65))
Else
PWD = PWD & Int((9 - 0 + 1) * Rnd + 0)
End If
Next i
MsgBox PWD
End Sub
Powershell:
$Excel = New-Object -ComObject excel.application
$Excel.visible=$false
$Version = "C:\Users\Alberto Corona\Desktop\Cartel1.xlsm"
$WorkBook= $Excel.workbooks.open($Version)
$WorkSheet= $WorkBook.worksheets.item(1)
$WorkSheet.cells.item(1,1)=5
$Excel.Run("CreatePWD")
$WorkBook.save()
$WorkBook.close()
$Excel.quit()
The result of macro is like "52UT7" i want a variable in powershell called $PWD that contain the value of the macro.
Hope the problem is clear now.
Thanks
A

Running an apple script from excel

I have been trying to find some visual basic code to run an apple script from an excel workbook for weeks now, but after searching everehwere online and asking in multiple excel forums I have yet to find an answer. It appears it should be possible (as windows users of excel are able to do it, although running different files not apple scripts), but I cant get it to work on a mac, and I have not been able to come accross someone that is running excel on OSX that has an answer. Hoping I can find some mac excel users with apple script and visual basic knowledge here that might have an answer.
This is a link to the question I posted on excel forum a couple of weeks ago:
http://www.excelforum.com/excel-programming-vba-macros/962375-vb-code-to-run-a-f ile-on-mac.html

I use http://macchampion.com/scenario_features.shtml
dual-core G5/2.3 Mac OS X (10.4.6) dual screens

Calling UDF (MS Access) from Excel VBA

Hi,
I need to run a query on an MS Access database that has to perform a weekday calculation between two date columns,
and this query has two date parameters that it receives dynamically. I am using Excel VBA as the front end.
Select AgeRange, count(*) from
(Select IIF(networkdays(date1,date())<=2, "0-2 days","over 2 days")) as AgeRange
from table1
where date2 >= startdt
and date2 <=enddt
) d
group by AgeRange
The actual query is more complex, but this will help illustrate the issue. I build a string variable with
the query, and substitute Startdt and enddt variables with the actual values. I then create a new QueryDef object and get the results from OpenRecordSet.
Except, Networkdays is not a valid function in MS Access. So, this query fails.
I created a WorkDays UDF in MS Access, and used that instead - the query works fine in MS Access, but when
I try to pass it in the QueryDef object, it fails with 3085 error (function not available).
I'm not sure how to get around this, and could use some help.
In summary, I need to run a select query that will calculate weekdays or workdays between two columns (query
is dynamic - dates are variable) from VBA to MS Access, get the results back to VBA so that I can populate the results. Any suggestions are appreciated and welcome.
Thanks!
I tried using datediff with the "w" parameter, but that doesn't work as I had hoped - it gives the
number of weeks between the dates instead of weekdays
I realize that I could get all the data (without doing the group by) down into Excel and then, do the networkdays
formula calculation there, and summarize after that, but that is a very inefficient way - and defeats the purpose of having an access database in the first place. Getting tens of thousands of records is going to cause space issues in Excel too.

Hi Bob,
One solution is to create a table in the Access database storing all the dates in these years, add a column to determine if this date is a week day or not. And create another table to store the dates that are to be excluded from the working days.
In this way, you need to create a separate query to count the valid working days based on the two tables. So the most difficult thing is to create the table that contains all the dates, please check this VBA code snippet which helps you to insert all the
dates into the table.
Sub InsertDatesIntoTable()
Dim StartDate As Date
Dim EndDate As Date
Dim d As Date
Dim w As Integer
Dim IsWorkDay As Boolean
StartDate = #1/1/2015#
EndDate = #12/31/2015#
For d = StartDate To EndDate
Debug.Print d
w = Weekday(d, vbSunday) 'first day of the week is Sunday
If w = 1 Or w = 7 Then ' if the current day is Sunday or Satuday
IsWorkDay = False
Else
IsWorkDay = True
End If
'Here you can insert d and IsWorkDay into the table
Next d
End Sub
We are trying to better understand customer views on social support experience, so your participation in this interview project would be greatly appreciated if you have time. Thanks for helping make community forums a great place.
Click
HERE to participate the survey.

Download Data From Excel - VBA Code to SAP Using BDC

Hi ,
I am Sudhir Dure, working with Satyam Computers.
I need help on the below query:
I have an excel file which download data from Excel to SAP using RFC function & with the help of VBA interface.
In this VBA code I have used BDC recording of SAP Transaction KE21N to post data into SAP.
Now I am facing problem to find sub screen (tab page screen ) in SAP from VBA code .
How to pass BDC Subscreen details from VBA code to SAP using below code?
BDCTABLE.Rows.Add
BDCTABLE.Cell(J, "PROGRAM") = PROGRAMNAME
BDCTABLE.Cell(J, "DYNPRO") = "0200"
BDCTABLE.Cell(J, "DYNBEGIN") = "X"
BDCTABLE.Cell(J, "FNAM") = "BDC_OKCODE"
BDCTABLE.Cell(J, "FVAL") = "=NEXT"
Thanks,
Sudhir Dure
9972097464

can anyone tell me how to get the PurchaseOrder number and item quantity from the Salesorder...? what are the fields here as given below..??
For Each oItem In oSalesOrder.items
wsTemplate.Range(cols(3) & Indexv).Value = oItem.material.material
'wsTemplate.Range(cols(4) & Indexv).Value = ' I need item quantity here ????
wsTemplate.Range(cols(1) & Indexv).Value = sapSoNumber
wsTemplate.Range(cols(2) & Indexv).Value = ' I need purchase order number here>???
Indexv = (Indexv + 1)
Next
reply fast. please .. thanks

Send SMS from excel (VBA)

I need help to find a solution that always works to my current problem:
Using Excel 2007 VBA I need to send a similar text message to say 50-100 people using Nokia PC suite. Has anyone found a way of doing this?
I have found a way of opening and then initially controlling PC Suite in VBA by using sendkeys, however it always falls over at some point as it loops through all the staff.
Scenario is simple - I have built a rota for where I work. Each employee receives an email with their rota in it for the coming week; I also want to send a short text message to each employee telling them that their rota is in their email inbox and details of their next shift.
So, the VBA code loops through each staff member, customises the text message contents but always falls over for no apparent part way through the loop. I have succeeded in getting it to work for 5 people, but it falls over when it gets into double figures.
I could get it to send bundles of 5 but there must be an easier way; someone must have tried doing what i'm doing and succeded!
Thanks

Hi,
I would like to know the way in which I can achieve the above. i.e. Send SMS from Excel. even 2-5 sms will work for me..
Thanks...

Printing to Adobe PDF repeatedly from Excel macro causes Adobe PDF to ignore preferences

I have an Excel macro that uses Acrobat's virtual "Adobe PDF" printer to save each sheet of an Excel spreadsheet to a separate PDF file. To do this, I have set up the PDF printer to save automatically to the folder C:\PDF without prompting and not to open each PDF file after it is created. These preferences are respected when the macro prints the first sheet, but when it prints the second and third sheets, the PDF printer starts displaying its "Save As" dialog again and opening each PDF file after it is created. When I go back to the printer preferences after the macro finishes, the preferences that I set are still there, and if I run the macro again I get exactly the same behavior. This behavior is problematic because the macro expects each PDF file to be saved to a predictable location so that it can rename them. Side note: this print-then-rename technique works fine when I use the open source PDFCreator program instead of Acrobat. (Hello, Adobe?)

Use the settings in the Acrobat Distiller API Reference. You can find this document in the Acrobat SDK.

Running BEX7 workbook repeatedly from excel vba

Similar Messages

Maybe you are looking for