OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Developer Forums > VBA > CorelDRAW/Corel DESIGNER VBA

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 24-10-2006, 05:20
igor___
Guest
 
Posts: n/a
Default VBA & Photoshop. How Save File anover format?

Hi, all!
Help!!!
I want open file temp.psd with Photoshop
and SaveAs in tiff-format.

Quote:
Sub Macro1()

Photoshop.Visible = True
AppActivate Photoshop.Name
Photoshop.Open "C:\Temp\temp.psd" 'Photoshop open file temp.psd

Photoshop.ActiveDocument.SaveAs "C:\Temp\1.tif", , , psTIFFSave 'here is error:
'Illegual argument - argument 4
'Enumerated value expected
End Sub
Thanks for Help.

Last edited by igor___; 24-10-2006 at 09:31.
Reply With Quote
  #2  
Old 24-10-2006, 14:04
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,769
Blog Entries: 9
Send a message via ICQ to shelbym Send a message via AIM to shelbym Send a message via MSN to shelbym Send a message via Yahoo to shelbym
Default PhotoShop

This is a forum for CorelDRAW and PhotoPaint. Not sure you will find much help here for PhotoShop. Sorry :-(

Shelby
Reply With Quote
  #3  
Old 25-10-2006, 03:56
igor___
Guest
 
Posts: n/a
Default

Simplly I work in a couple Corel-Photoshop
Also I attempt to write VBA-macros for automation process of exchange files
Somebody can will suggest how correctly to write this code?
Reply With Quote
  #4  
Old 25-10-2006, 07:30
Lev
Guest
 
Posts: n/a
Default

There is a lot of samples and documentation in "C:\Program Files\Adobe\PhotoshopCS\Scripting Guide\..." I think the same concerns CS2.

Here is a sample of saving to tiff. You need to add a Reference to Photohop to execute it.
Code:
Sub tst_tiffsave()
  Dim PShop As New Photoshop.Application
  Dim doc As Photoshop.Document
  Set PShop = CreateObject("Photoshop.Application")
  Set doc = PShop.Open("C:\Temp\temp.psd")  'Photoshop open file temp.psd
  ' now save as tif with extra options.
  Dim psSaveOptions As Photoshop.TiffSaveOptions
  Set psSaveOptions = New Photoshop.TiffSaveOptions
  psSaveOptions.AlphaChannels = True
  psSaveOptions.Layers = True
  psSaveOptions.SpotColors = True
  doc.SaveAs "C:\Temp\temp.tif", psSaveOptions, False, extType
End Sub
Reply With Quote
  #5  
Old 26-10-2006, 05:40
igor___
Guest
 
Posts: n/a
Default

Oh, yes!
This is what I wanted!
Thanks so much!!!

Last edited by igor___; 26-10-2006 at 11:32.
Reply With Quote
  #6  
Old 30-11-2006, 11:28
LeonoCoder LeonoCoder is offline
Junior Member
 
Join Date: Nov 2006
Posts: 10
Default Corel Draw and Photoshop

Hi, is it possible to open a bitmap in a corel draw document with photoshop instead of photopaint, i was investigating but I didn't find an answer,

Pd. exists a way to create guidelines in photoshop using macros, i didn't find a guideline object???
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
CMX file format documentation Alex FAQ 1 02-08-2007 21:38
delete vba project from cdr file hotairballoon CorelDRAW/Corel DESIGNER VBA 1 18-05-2005 10:08
Is there a forum like this for Photoshop VBA? donphillipe CorelDRAW/Corel DESIGNER VBA 4 14-01-2005 19:44
VBA in Photoshop 7 Seelenquell CorelDRAW/Corel DESIGNER VBA 0 04-02-2004 07:24
CorelDRAW curves to Adobe Photoshop paths converter d-signer CorelDRAW/Corel DESIGNER VBA 8 15-01-2004 01:32


All times are GMT -5. The time now is 22:08.


Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
Copyright © 2011, Oberonplace.com