MARS reference in VBA

Hi,
I was looking for a MARS reference in VBA. I know that there is an equivalent reference in JS (AcroJS if i am not wrong). Is there one in VBA?
Thanks,
Shashank

On the Macintosh, there is no OLE interface to Acrobat at all. The
Acrobat SDK describes the different Macintosh interfaces.
Aandi Inston

Similar Messages

Acrobat Distiller, Excel, Adding a reference in VBA

I have a snippet of VBA to generate a PDF through Excel. I expected to see "Acrobat Distiller" in the references under the menu option Tools/References in the Visual Basic editor. It's not there. Can anyone help?

On the Macintosh, there is no OLE interface to Acrobat at all. The
Acrobat SDK describes the different Macintosh interfaces.
Aandi Inston

Facing problem to Checkin and checkout file from starteam using vba

Hi,
Im trying to checkin and checkout file in starteam through vba. I have imported the
StarTeamSDK104.dll in reference in vba project and tried to accomplish my task.
I am able to locate the file, but not able to checkout/checkin the file. I am not sure how to use checkin/checkout function in vba. I am getting an error at the checkout code(hichlighted in bold in the below code). Also I was able to
do it in java but i want it in vba.
Could someone help me on this.
Below is the code im using.
Sub ST_Test()
Dim strAddress As String
Dim nPort As Long
Dim strUser As String
Dim strPassword As String
Dim strProjectName As String
strAddress = "Sample Address"
nPort = 1234
strUser = "Sample Username"
strPassword = "Sample Password"
strProjectName = "Sample Project"
Dim Factory As New StServerFactory
Dim Server As StServer
Set Server = Factory.Create(strAddress, nPort)
Server.Connect
Server.logOn strUser, strPassword
Dim project As StProject
Set project = FindProject(Server, strProjectName)
Dim view As StView
Dim finder As StStarTeamFinder
Dim Folder As Stfolder
Set view = project.DefaultView
Set Folder = view.RootFolder
For Each chk In Folder.getItems(Server.TypeNames.File)
    Dim fileitem As StFile
    Set fileitem = chk
    If fileitem.Name = "Filename.txt" Then
        fileitem.checkout(0,False,True,False )
    End If
Next chk
End Sub

Hi,
As for the checkout method, please refer to the following link:
http://msdn.microsoft.com/en-us/library/office/aa223821(v=office.11).aspx
The syntax is:
expression.CheckOut(FileName)
Jaynet Zhang
TechNet Community Support

Relink and Update links in CS5 using VBA

Hi everyone,
Does anyone have a link to an online reference for VBA Scripting in CS5? Most of what I find online is for CS2. That said, I have a VBA script that is written for CS2 that goes through an InDesign document and relinks every link to a certain file path variable, then updates the link (code below). When I run this in CS5, the links do not update. I am not sure how to tell if it is the .Relink() function that is not working, or the .Update funtion that is not working because I do not receive any errors. It just doesn't update. Any help would be really great. Thank you so much!
(this code works perfectly in CS2)
Dim idLink
For Each idLink In idDoc.Links
idLink.Relink (pathvariable & idLink,Name)
idLink.Update
Next idLink

Robohelp has always had a problem. Their help instructions leave the user saying, "I asked a question and your answer is way too ambiguous to be meaningful." They talk about "breadcrumbs" as though you know what breadcrumbs are and can follow what they are saying. To me, "breadcrumbs" are crumbs left by brittle bread. They tell you how to make them without telling you how they look or what they are supposed to do.
It is all over Robohelp. I had to look on Google to find out what a T.O.C. is because they don't say anywhere that it refers to the table of contents.
Robohelp needs to follow this rule: Define a word before you use it. Otherwise no matter how you describe it, the description has no value.
This is why they do things shoddily when talking about VBA. In VBA you have to have "Subs" and "Functions" before you have a place to put the script. In Robohelp they simply show you the lines of code without telling you how to make a sub routine or function. They don't tell you how to dim the variable in Robohelp. It doesn't work the same in Robohelp as it does in MS Access, MS Word or any other application that uses VBA.
Robohelp is trying hard but the people who write things are not communicators. They are obfuscators.
Now for those who need to learn VBA. I teach it after work free. contact me at [email protected] and I can share with you my 18 years of experience using it in MS Access, Word, Excel, Outlook and other applications. However I can't tell you how to use it in Robohelp yet because they don't clue me in on it. They break the rules.

Mars format content

The mars format is an XML based format.
Checking at the mars sample file's content with an
hexadecimal editor, I noticed that the content has nothing to see
with XML.
The Draft version of the mars reference guide provides part
of sample XML content.Can you provide a complete basic mars file
with a real standard XML content?

Oups...
The mars file IS a zip file that contain a structure of files
with dedicated XML files for the data...

Illustrator and Office 2011 mac

Good evening,
I search the Illustrator library to connect as Reference in VBA on Mac
set myAi = createobject("Illustrator.application.cs4) give me an error and there is no library in VBA for Illustrator
I'm new on Mac
Thanks for your help
Patrice Brel

Patrice, to be honest my first thoughts were that you would not be able to use VBA (which I know nothing of) on the mac OS. It does look like the new MS Office Suite for 11 has this. Before this you could only use AppleScript on the mac. I have never seen posts of anybody using VBA on the mac with Illustrator. As I have never seen posts in this forum from any of the Illustrator scripting team (or what ever they call themselves)… You are probably very much in the minority with this. Im sorry but I don't know where you can look into this… You could always turn to using ExtendScript with Illustrator then the OS would not matter? Good luck and enjoy the mac thou…

TRIM() not found? Compile error: Can't find project or library in Excel 2007

I am preparing to make a few alterations to a spreadsheet that another person built. I have NOT made any changes to it yet.
They put in a button that allows portions of the worksheet to print. I am now using Excel 2007. Their code ran fine in 2003.
The button had worked in Excel 2003- but now (without any changes) throws an error "Compile Error: Cant find project or library."
TRIM is highlighted in the following code: (See below for the whole sub)
If Trim(Worksheets("Measurements").Cells(RowCounter, ColumnCounter).Value) <> "" Then
                If RowCounter > PrintRowMarker Then
                    PrintRowMarker = RowCounter
                End If
                If ColumnCounter > PrintColumnMarker Then
                    PrintColumnMarker = ColumnCounter + 1
                End If
            End If
I have added in the following references into Excel via the big button in the upper left and the "Excel Options" screens:
Analysis Toolpak and Analysis Toolpak-VBA. The sheet "Measurements" is present.
1) Are these the right packages for the TRIM function?
2) Is there a different Add-in that is needed?
3) Is there an additional step I must use to actually add in these packages?
4) Is there something else I should do?
Thanks-
Loralee
P.S. Access 2003 finds (it's version of) TRIM fine- so a version is on the machine. This spreadsheet if failing in the same way on 2 machines- both with Office 2007 installed.
Private Sub BtnPrint_Click()
    Dim RowStarter As Integer      'Where to start checking rows for content
    Dim RowCounter As Integer      'The current row being checked
    Dim ColumnCounter As Integer   'The current column being checked
    Dim PrintRowMarker As Long   'The last row with data
    Dim PrintColumnMarker As Long 'The last column with data
    Dim NoMoreData As Boolean       'Look for a blank record
    Dim RangeValue As String        'Define the range string value
    Dim EndRangeValue As String
    PrintColumnMarker = 0
    PrintRowMarker = 0              'Initialize the row printing marker
    RowStarter = 5                  'Print Starting Point
    For RowCounter = 2005 To RowStarter Step -1
        For ColumnCounter = 50 To 2 Step -1
            If Trim(Worksheets("Measurements").Cells(RowCounter, ColumnCounter).Value) <> "" Then
                If RowCounter > PrintRowMarker Then
                    PrintRowMarker = RowCounter
                End If
                If ColumnCounter > PrintColumnMarker Then
                    PrintColumnMarker = ColumnCounter + 1
                End If
            End If
        Next ColumnCounter
            If PrintRowMarker > 0 Then
            End If
    Next RowCounter
    EndRangeValue = IndexToString(PrintRowMarker, PrintColumnMarker)
    RangeValue = "$A$1:" & EndRangeValue
    Worksheets("Measurements").PageSetup.PrintArea = RangeValue
    Worksheets("Measurements").PageSetup.PrintGridlines = True      'Turn on gridlines
    Worksheets("Measurements").PrintPreview                         'PRINT THAT PUPPY!
End Sub

Appears OK to me but the error message " Cant find project or library." suggests it could possibly be the references in VBA.
In VBA select menu item Tools - References.
Ensure that the following are checked:-
Visual Basic for Applications
Microsoft Excel 12.0 Object Library
OLE Automation
Microsoft Office 12.0 Object Library
It there are any references displayed as Missing then scroll down to find the equivalent reference and check it and then uncheck the Missing one/s.
Regards, OssieMac

SQL Drill through??

I am new to the Essbase world. We have a few business requirements that requires us to report on a flat measure (it does not make sense to be a part of the cube as it can not be aggregated across dimensions) along with other measures from the cube. We were thinking about doing a drill through to relational db.We do not have integration server installed. The server options on the Application manager indicate that we have SQL Drill through & SQL interface options. But what I am not sure is how to specify a measure as drill through & how would I be able to drill through a specific relational table. Could some one tell me if I can do this without HIS? Any ideas or suggestions would be greatly appreciated.Thanks,Nithya

with vba, you can easily issue a sql query on a relational data source base and have the results placed in it's own sheet. (for free)look under ado (access data objects) in programming references for vba or vb.If you have any vb programmers in house, they could set something up for you in minutes.This is an often overlooked method of retrieving relational information based on the multidimensional criteria from an Essbase report.howard314-406-4022

Where do I find examples of how to use formula functions? Online help only provides syntax

Hello,
I would like to run a formula ( for my custom field in Project 2013) that allows me to see the Finish Time e.g. 17:15 for a task. I am trawling through the online help to determine which one is best but I would like to read some examples
of how a function can be used. I hoped Help may do this but no.
Hope you can point me into the right direction. Thanks in advance.
Alan

Alan,
Yeah I agree, the on-line help is lacking in information on how to actually USE a function. However, there are some places that may help. Here are a couple, I'm sure there are many others.
https://support.office.com/en-nz/article/Project-functions-for-custom-fields-7e525143-380f-4083-8d5a-3ecc6ba44f22
https://msdn.microsoft.com/en-us/library/office/ee767700(v=office.14).aspx
Since many of the custom field formulas are also used in VBA, I've found the object library reference for VBA to be very helpful in understanding and setting up custom field formulas. To get the the object library, go to Developer/Code group/Visual Basic.
Once the Visual Basic Editor window opens, hit View/Object Browser. Hit the Help menu and select the Help for Visual Basic. Type in the function of interest.
However, you say you want a custom formula to see the finish time for a task. You don't need any customization to see that. Simply go to File/Options/General tab and select a date format that includes the time.
Hope this helps.
John

Adobe X pro, export forms data to fdf, then import into new form using automation?

Is there a faster way to export 13 page forms pdf data out to fdf and then import I back into a new pdf form. There are a total of 167 pdf files with total of 130 some field on each form. The fields are all the same in each document. I want to make a macro or script to automate this process. I don’t want to to open all 167 files then export them one at a time. then creat167 new files and import all that data back in. Also each file is the name of the person who filled it out. I could automate the copying of the new 2012 pdf to make 167 new ones each with their name using VBA. But if that could be automated in adobe great.
We have to make new admission forms for next year. Currently all the dates and fees are this year. So I had to update all the pages in Publisher and reprint them to pdf. We are sending the forms back to people with the data already entered since 95% of it did not change. This helps save them time in having to re-fill out the entire form again.
Or any other suggestions
TIA

try67, I do have Pro as stated in the title “Adobe X pro, …”
George,
the position of the forms fields is exactly the same. But now that I think of it the data in the pdf’s is slightly older than the exported info in Access as I explain further below.
George, I can create 167 files in an instant using VBA, I in fact have all the names in Access and did this already.
I also forgot, I have all the data from all the forms in Access now. So it would be better to use that since it is more up to date than the pdf forms. Any email and phone number changes were changed in Access. I clicked Manage Form data/ export to txt in Adobe and imported that into Access with a VBA and a macro.
So I really just need to open each particular file and import the data into it.
So can I call the whole process from VBA? Using a Active-X reference in VBA to get to control Adobe?
I write VBA in my sleep so if it can be done there, Fantastic.

Error in VBA reference for Adobe Photoshop CS4 Object Library

Hello,
I'm using Windows 7 Pro, MS Office 2010 Pro and Creative Suite CS4 (with all updates).
I will automate Photoshop via Visual Basic for Applications in MS Access.
Befor using there the Adobe Photoshop CS4 Object Library I must reference it in VBA.
But when I will du this, I get the message "Error loading DLL".
When I will manually reference to the WIASupport.8LI File, I get the error: "Cannot reference this file"
Can you give a tip, how I can solve this problem?
Regards

I have the same problem! I have photoshop cc2014 (which we own) and the object library shows, but not for cs 5.1 (30 day trial).
Does registering unlock something?
Help please!!

? Office 2013 to support Excel 2003 (XLS) spreadsheets containing VBA CommandBars references

Thanks in advance for reading this and offering any wisdom you have! I am not an expert in any of the following, so apologies if off base.
The basic problem is: I need to use Excel 2013 to support Excel 2003 (XLS) spreadsheets containing VBA 'CommandBars' references which don't seem to work in Excel 2013. Details below.
Most of our users are still using older desktop windows PCs and Office 2003! We are beginning to upgrade to laptops running Windows 8.1 with Office 2013. Of course, we IT technical people are using the new laptops first. These new laptops are
64 bit.
Years ago, someone did a lot of development with spreadsheets here in Excel 2003 file formats that automates many activities and routines. Now we with the new laptops are having to support this development using new machines.
There is a basic compatibility issue that appears when first opening these Excel 2003 files that have VBA code that I'll detail below; I seem able to get by that problem.
The current problem appears to be that the existing Excel 2003 VBA code has many references to: "For Each bar In Application.CommandBars". As I've learned, the Application.CommandBars VBA functionality is focused on older MS Office versions' menu
commands, but "...Starting from Office 2007 the Fluent UI is used instead." In other words, because MS Office isn't menu-driven beginning with version 2007 (uses 'the ribbon'), it appears that these references to: "For Each bar In Application.CommandBars"
create a basic incompatibility to opening these spreadsheets in Office 2013.
For a spreadsheet, after I resolve the issue detailed below and save it, when I reopen it I encounter error "Compile error: can't find project or library."
For example, the following code snippet:
Private Sub Workbook_Open()
For Each bar In Application.CommandBars
bar.Enabled = False
Next
results in: "Compile error: can't find project or library."
(Sorry, can't include images yet, I am not a VERIFIED USER of this forum yet.)
I went into VBE's menu: Tools>References and check for anything marked MISSING, which I deselected. But I am still receiving this error.
I don't want to get into changing the code a lot to support both Excel 2003 and 2013 (I am no VBA expert, just a dabbler).
And Microsoft officially says that Office 2003 is incompatible with Windows 8 although Application.CommandBars seem to be somewhat supported in Office 2013 .
Are you aware of a quick VBA workaround to get by this?
•I could comment out the validations, commands for: "For Each bar In Application.CommandBars" but then the spreadsheet code probably won't work for users using Office 2003.
Alternatives would be:
•Installing Office 2003 on my Win 8.1 64 bit laptop anyway, in spite of MS's saying incompatible, since this thread discusses at least one person has been able to use Office 2003
•Keeping one older PC with Office 2003 on it for us to support the old Office 2003 code until everyone upgrades their systems
Thanks
Basic compatibility issue that seems solvable:
Opening these spreadsheets displays this error:
Compile error:
The code in this project must be updated for use on 64-bit systems.
Please review and update Declare statements and then mark them with the PtrSafe attribute.
This seems resolvable by going into the VBA code and just adding element 'PtrSafe' where functions are declared; in other words, replacing VBA code "Declare Function" with "Declare PtrSafe Function" seems to get by this.

Hi Allan_L,
Please try the methods that provided above. And this is the forum to discuss questions and feedback for Microsoft Excel, your issue is related to Excel DEV, if you have further question, I recommend you post the question to the MSDN forum for Excel
http://social.msdn.microsoft.com/Forums/en-US/home?forum=exceldev&filter=alltypes&sort=lastpostdesc
The reason why we recommend posting appropriately is you will get the most qualified pool of respondents, and other partners who read the forums regularly can either share their knowledge or learn from your interaction with us. Thank you for your understanding.
George Zhao
TechNet Community Support
It's recommended to download and install
Configuration Analyzer Tool (OffCAT), which is developed by Microsoft Support teams. Once the tool is installed, you can run it at any time to scan for hundreds of known issues in Office
programs.

VBA Photoshop reference

Any ideas on why Photoshop doesn't show up in VBA / Tools / Reference?
I want to program in VBA using excel and effecting photoshop, but can not find the reference library for photoshop
Using CS2 and Windows for Mac...macbook pro
Thanks

Yes, another user has the issue with windows "mandatory profiles", where rights are severely limited for users (french forum): http://forums.adobe.com/thread/948264

Help, cannot set references to Photoshop.Application in VBA

Hello,
I have used CS5 in the past and have had a well-functioning VBA program (running within Access 2010) that ran fine, opens 32-bit Photoshop, and controlled photoshop CS5 normally, allowing me to manipulate photos, read metadata, etc. (It was my understanding that at least for CS5, scripting programs including VBA needed to run the 32 bit version of Photoshop, not the 64 bit version.)
I installed CS6 about 6 months ago and the VBA program continued to work just fine, provided it still opened the 32 bit version. (I had to be sure I was not running 64 bit Photoshop when I started the VBA program). CS5 was still installed but not being used.
I just uninstalled CS5, leaving CS6 installed. For some reason, this left the VBA program disrupted in that the References (which you set in the VBA code window with Tools > References) no longer appear to be valid. I am unable to set a new Reference to Photoshop.Application and the program has become unusable. That is, the "Available References" no longer list Adobe Photoshop CS6 Type Library or Adobe Photoshop CS6 Object Library. I browsed to the the file C:\Program Files\Adobe\Adobe Photoshop CS6 (64 Bit)\TypeLibrary.tlb to add this reference manually. The programs still does not compile (i.e., Dim appRef As New Photoshop.Application causes an error "User Defined Type not defined"). I get the same failure to compile if I browse to and install a reference to the 32-bit version, C:\Program Files (x86)\Adobe\Adobe Photoshop CS6\TypeLibrary.tlb. In the past, I also had a reference to the "Adobe Photoshop CS6 Object Library". I have tried to manually set this to C:\Program Files (x86)\Adobe\Adobe Photoshop CS6\Photoshop.exe or to the 64 bit version of Photoshop.exe, but these files are not accepted and I do not otherwise know the file location of the Object Library.
I very much need help from someone who knows how to fix this problem in transitioning from CS5 to CS6 for using VBA.
Thank you,
EGibbon

There are global keys that get overwritten with each version of Photoshop. Photoshop.Application for example gets set for each install of Photoshop. When you uninstalled CS5 those keys got removed.
Can you install CS6 again? You don't need to uninstall. Just install again if it will let you.
I have a script that wil set them but I don't really like to use it on other folks machines as it messes with the registry and I don't want to make it worse for you.

Reference partial row in VBA?

Hi, I'm trying to parse through some financial data in Sheet1, and populate other sheets based on criteria. I did find some vba code that does what I want (almost). This code copies the entire row to the destination sheet, which works, but I'd
like to put some calculations off to the right side of the data (for totals, etc). With this code, if the entire row is copied to the destination sheet, it overwrites my formulas. Can someone tell me how to reference a partial row for both the
source and destination sheets so that it only copies the data I need? Instead of c.EntireRow, I'm hoping there's a better reference.
Of course, if there's a better way entirely, please share! Any help is greatly appreciated.
Kevin
Sub OJC_Copy()
Dim MyRange As Range, CopyRange As Range
Set Src = Sheets("Sheet1") 'Source data
Set dst = Sheets("OJC") 'Destination sheet
dst.UsedRange.ClearContents
LastRow = Src.Cells(Cells.Rows.Count, "A").End(xlUp).Row
Set MyRange = Src.Range("H2:H" & LastRow)
For Each c In MyRange
If (c.Value) Like "SJ*" Then
        If CopyRange Is Nothing Then
                Set CopyRange = c.EntireRow
        Else
                Set CopyRange = Union(CopyRange, c.EntireRow)
        End If
    End If
Next
If Not CopyRange Is Nothing Then
CopyRange.Copy Destination:=dst.Range("a1")
End If
End Sub

So, my latest iteration of this is below: If I set a watch on Src.Range("H" & Myrow).Value Like "MV*"
It does evaluate to "true" when the code hits it, but it then skips right over the last line: CopyRange.Copy Destination:=dst.Range("a1"), and never runs the code in between (doesn't even try).
It also halts with run-time error '91' Object variable or With Block variable not set, Which I think is related to the fact that CopyRange never populates with anything.
As usual, any advice will be greatly appreciated.
Thanks!
Kevin
Sub Filter_MVH()
Dim MyRange As Range, CopyRange As Range
Set Src = Sheets("Sheet1") 'Source data
Set dst = Sheets("MVH") 'Destination sheet
dst.Range("A:L").ClearContents
For Myrow = 2 To LastRow
If Src.Range("H" & Myrow).Value Like "MV*" Then
    If CopyRange Is Nothing Then
        Set CopyRange = Src.Range("A" & Myrow & ":L" & Myrow)
    Else
        Set CopyRange = Union(CopyRange, Src.Range("A" & Myrow & ":L" & Myrow))
    End If
End If
Next Myrow
CopyRange.Copy Destination:=dst.Range("a1")
End Sub

MARS reference in VBA

Similar Messages

Maybe you are looking for