No.3ベストアンサー
- 回答日時:
VBAで良ければ、2007で動くかどうか不明です(当方2000)が、選択範囲をクリップボード経由で、emf形式で保存するコードです。
selectionToEMFfileを実行します。
保存後、Word2000の例では、挿入/図/ファイルからで、読み込めます。
Option Explicit
Private Type GUID
Data1 As Long
Data2 As Integer
Data3 As Integer
Data4(0 To 7) As Byte
End Type
Private Type PICTDESC
cbSizeofstruct As Long
picType As Long
hEmf As Long
Padding(0 To 1) As Long
End Type
Const PICTYPE_ENHMETAFILE = 4
Private Declare Function OleCreatePictureIndirect Lib "olepro32.dll" (lpPictDesc As PICTDESC, riid As GUID, ByVal fOwn As Long, lplpvObj As Object) As Long
Private Declare Function OpenClipboard Lib "user32" (ByVal hWndNewOwner As Long) As Long
Private Declare Function CloseClipboard Lib "user32" () As Long
Private Declare Function GetClipboardData Lib "user32" (ByVal uFormat As Long) As Long
Const CF_ENHMETAFILE = 14
Private Declare Function CopyEnhMetaFile Lib "gdi32" Alias "CopyEnhMetaFileA" (ByVal hemfSrc As Long, ByVal lpszFile As String) As Long
Private Declare Function DeleteEnhMetaFile Lib "gdi32" (ByVal hEmf As Long) As Long
Sub selectionToEMFfile()
If TypeName(Selection) <> "Range" Then Exit Sub
Selection.Copy
SavePicture CreatePictureFromCB(), "c:\saveEmfTest.emf"
End Sub
'CreatePictureFromCB()は下記より
'http://www.moug.net/faq/viewtopic.php?t=34259
Private Function CreatePictureFromCB() As Object
'そのまま載せて良いか分かりかねますので、リンク先をご覧下さい。
End Function
No.2
- 回答日時:
PDFファイル上で「A4などの紙の上に表が貼り付いている状態」と「画像のよう状態」との違いは何ですか?
言葉不足で申し訳ありません。現在はphotoshopで手動で切り抜いているので、その手間を省きたいのです。大量のexcelの表をこの操作をしなければならないもので...
No.1
- 回答日時:
ということなら、画像にしてしまうというのは?
スクリーンキャプチャ(ファンクションキーのならびにあるPrint Screen キー)で画面をコピーして
ペイントなどに貼り付け必要な個所のみ残して保存すれば、画像ファイルは簡単に出来ますが?
早速の回答ありがとうございます。
画像化も試しましたが、画質の劣化、その後の編集などやはりPDFで扱いたいのです。最終的にはmacで使用したく、現在は、windowsのexcelでPDF化、photoshopで手動で表部分を切り取り、その後macのphotoshopで読み取りとかなり面倒なことをしています。(mac-officeのexcelは表の変形やフォント問題があるため使用しないようにしています)
言葉足らずで申し訳ありません。やはりできないのでしょうか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルシートのPDFでの保存 2 2022/09/06 13:05
- PDF PDFの表がエクセルに貼り付けられなくなってしまいました。 5 2022/06/03 09:07
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Excel(エクセル) エクセル2013「次のページ数に合わせて印刷」が小さすぎる 9 2023/03/28 10:18
- Excel(エクセル) EXCELのグラフを画像(JPG形式)で保存、通常実行がうまく行かない。ステップインはうまく行く 3 2022/08/30 12:06
- 画像編集・動画編集・音楽編集 WIN10で「切り取り&スケッチ」が上手く使えません。 1 2022/09/01 22:56
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- その他(プログラミング・Web制作) python OpenPyXLを使って出力結果をエクセルに書き込み 2 2022/06/04 19:46
- PDF PDFを自動添付したメールを送信してくれるツールを探しています。 2 2023/02/07 15:19
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ペイントの画像をワードに貼り...
-
メールでもらった画像をコピー...
-
adobe reader8で画像コピー・貼...
-
エクセルの表を画質を落とさず...
-
一太郎などからJPG画像を取...
-
JPEG保存の圧縮率
-
エクセルの表をビットマップに...
-
EXCELに貼ってある画像を綺麗に...
-
PC画面の一部を切り取ってコ...
-
パワーポイントの図をJPEGかGIF...
-
画面印刷(プリントスクリーン...
-
win7 ペイントの吹き出し...
-
WORDでの作成文書を画像データ...
-
プリントスクリーンの画像をい...
-
画像の「ふち」をぼかす方法
-
wordに添付されている画像だけ...
-
スクリーンショットの写真が小...
-
画像をドラッグして簡単に、メ...
-
パワーポイントにネット上の表...
-
PAINTでフリーハンドで塗...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
メールでもらった画像をコピー...
-
ペイントの画像をワードに貼り...
-
adobe reader8で画像コピー・貼...
-
画像の「ふち」をぼかす方法
-
エクセルの表を画質を落とさず...
-
パワーポイントからエクセルへ...
-
エクセルの表をビットマップに...
-
パワーポイントにネット上の表...
-
画像をドラッグして簡単に、メ...
-
WORDでの作成文書を画像データ...
-
パワーポイントの図をJPEGかGIF...
-
画面印刷(プリントスクリーン...
-
スクリーンショットの写真が小...
-
プリントスクリーンの画像をい...
-
一太郎などからJPG画像を取...
-
エクセルのドロップダウンリス...
-
プリントスクリーンの機能が言...
-
エクセルに貼り付けた、俳優の...
-
表を作成して画像として保存す...
-
画像を傾ける方法
おすすめ情報