[PS CC2026] Открытие Word в Photoshop

Можно, всё можно.
2026-03-27_15-44-48.png
 
  • Спасибо
Реакции: izrukvruki
хотя вот я всё же не понял - если всякий раз в разных, то как это понимать?
Я имел в виду размеры подписи и печати, а их распололожение на странице конечно разное...
 
Если ворд открыть в ФШ нельзя, то томе исчерпала себя
 
Если ворд открыть в ФШ нельзя, то томе исчерпала себя
Ну напрямую нельзя, но, как я говорил, легко сделать костыль, который будет открывать ворд в фотошопе однокликово.
Или вам все таки шашечки?
 
  • Спасибо
Реакции: izrukvruki
Ну напрямую нельзя, но, как я говорил, легко сделать костыль, который будет открывать ворд в фотошопе однокликово.
Или вам все таки шашечки?
Я алгоритм понял: чем-то автоматизировать перевод doc в pdf, нацелить какой-то конвертер на некую папку, и уже открывать сконвертированный pdf
 
Вот такой . bat можно попробовать, врать не буду, сам не проверял, лежал на диване с телефоном
Код:
@echo off
setlocal

rem === Проверка аргумента ===
if "%~1"=="" (
    echo Usage:
    echo   %~nx0 "C:\path\file.docx"
    exit /b 1
)

set "INPUT=%~f1"

if not exist "%INPUT%" (
    echo File not found:
    echo %INPUT%
    exit /b 1
)

rem === Проверка расширения ===
set "EXT=%~x1"
if /I not "%EXT%"==".doc" if /I not "%EXT%"==".docx" (
    echo Only .doc and .docx are supported.
    exit /b 1
)

rem === Путь выходного PDF ===
set "OUTPDF=%~dpn1.pdf"

rem === Путь к Photoshop (при необходимости поправь) ===
set "PHOTOSHOP_EXE=C:\Program Files\Adobe\Adobe Photoshop 2024\Photoshop.exe"

if not exist "%PHOTOSHOP_EXE%" (
    if exist "C:\Program Files\Adobe\Adobe Photoshop 2025\Photoshop.exe" (
        set "PHOTOSHOP_EXE=C:\Program Files\Adobe\Adobe Photoshop 2025\Photoshop.exe"
    ) else if exist "C:\Program Files\Adobe\Adobe Photoshop 2023\Photoshop.exe" (
        set "PHOTOSHOP_EXE=C:\Program Files\Adobe\Adobe Photoshop 2023\Photoshop.exe"
    )
)

rem === Временный VBS для Word COM ===
set "VBSFILE=%TEMP%\doc2pdf_%RANDOM%%RANDOM%.vbs"

> "%VBSFILE%" echo On Error Resume Next
>>"%VBSFILE%" echo Dim wordApp, doc, inFile, outFile
>>"%VBSFILE%" echo inFile = WScript.Arguments(0)
>>"%VBSFILE%" echo outFile = WScript.Arguments(1)
>>"%VBSFILE%" echo Const wdExportFormatPDF = 17
>>"%VBSFILE%" echo Set wordApp = CreateObject("Word.Application")
>>"%VBSFILE%" echo If Err.Number ^<^> 0 Then
>>"%VBSFILE%" echo   WScript.Echo "ERROR: Microsoft Word is not installed or unavailable."
>>"%VBSFILE%" echo   WScript.Quit 2
>>"%VBSFILE%" echo End If
>>"%VBSFILE%" echo wordApp.Visible = False
>>"%VBSFILE%" echo wordApp.DisplayAlerts = 0
>>"%VBSFILE%" echo Set doc = wordApp.Documents.Open(inFile, False, True)
>>"%VBSFILE%" echo If Err.Number ^<^> 0 Then
>>"%VBSFILE%" echo   wordApp.Quit
>>"%VBSFILE%" echo   WScript.Echo "ERROR: Cannot open source document."
>>"%VBSFILE%" echo   WScript.Quit 3
>>"%VBSFILE%" echo End If
>>"%VBSFILE%" echo doc.ExportAsFixedFormat outFile, wdExportFormatPDF
>>"%VBSFILE%" echo If Err.Number ^<^> 0 Then
>>"%VBSFILE%" echo   doc.Close False
>>"%VBSFILE%" echo   wordApp.Quit
>>"%VBSFILE%" echo   WScript.Echo "ERROR: PDF export failed."
>>"%VBSFILE%" echo   WScript.Quit 4
>>"%VBSFILE%" echo End If
>>"%VBSFILE%" echo doc.Close False
>>"%VBSFILE%" echo wordApp.Quit
>>"%VBSFILE%" echo WScript.Quit 0

echo Converting to PDF...
cscript //nologo "%VBSFILE%" "%INPUT%" "%OUTPDF%"
set "ERR=%ERRORLEVEL%"

del "%VBSFILE%" >nul 2>&1

if not "%ERR%"=="0" (
    echo Conversion failed. Error code: %ERR%
    exit /b %ERR%
)

if not exist "%OUTPDF%" (
    echo PDF was not created:
    echo %OUTPDF%
    exit /b 5
)

echo PDF created:
echo %OUTPDF%

rem === Открытие PDF в Photoshop ===
if exist "%PHOTOSHOP_EXE%" (
    start "" "%PHOTOSHOP_EXE%" "%OUTPDF%"
) else (
    echo Photoshop not found. Opening PDF with default application...
    start "" "%OUTPDF%"
)

exit /b 0
 
  • Спасибо
Реакции: izrukvruki
Можно на контекстное меню повесить.
Забавно, что у меня в какой-то момент надстройка, конвертирующая word в pdf, стала крашится, и я так и не смог заставить ее работать нормально, так что я гоню через pdf-принтер
 
почему нельзя наоборот — эти печати/подписи ставить в ворд?
Он же сказал, на скан должно быть похоже
Надо сделать файл, в который нельзя/сложно внести правки... Типо скана, чтоб это было - т.е. как будто мы распечатали, поставили печать, отсканили и выслали
надстройка, конвертирующая word в pdf
В Ворде есть штатный сохранить как PDF, без акробатовского addin
 
Последнее редактирование:
В Ворде нет прямого экспорта в JPEG и нет наложения, а печать и подпись обычно все равно нужно тащить в Фотошоп, фон на их сканах/фотках всегда не белый и контраст плохой.
 
печать и подпись обычно все равно нужно тащить в Фотошоп, фон на их сканах/фотках всегда не белый и контраст плохой.
Печати и подписи готовятся в фотошопе один раз с удалением фона, а используются многократно.
В Ворде нет прямого экспорта в JPEG и нет наложения
Картинки подписей и печатей можно подкладывать ниже текста. Это хуже, чем мультиплай, но тоже годится. А для получения jpg, да, придется использовать костыли.

И да, все это эрзац. Изготовление качественной подделки требует аккуратной работы в фотошопе, и для многих проще (при наличии многофункционального принтера-сканера) распечатать, подписать и отсканировать.
 
Изготовление качественной подделки
Вот давайте не будем переводить разговор в уголовное русло.
Мы не подделываем документы а массово электронную печать ставим на вполне законном основании.
 
  • Спасибо
Реакции: zollinger
На вполне законном основании мне присылает банк - там печать и подпись не имитируют "живые".
Так и здесь же изготавливается всего-лишь копия документа, который можно получить в "живом" виде при необходимости.
ЗЫ а то по вашей логике, в магазине можно расплачиваться джипегами ассигнаций.
 
Последнее редактирование:
  • Спасибо
Реакции: Любимцев