Có cách nào chuyển từng trang trong Word sang dạng ảnh (.JPEG) không?

Liên hệ QC
LinDan

LinDan

Thành viên tiêu biểu
Tham gia
8/2/12
Bài viết
412
Được thích
111
File Word (dạng file mềm) của em có khoảng 10 trang, nay em muốn chuyển từng trang sang một sang dạng file ảnh (đuôi JPEG) có được không ah? Liệu có cách nào làm nhanh được thay vì cứ phải chụp ảnh màn hình từng trang?

Em rất mong mọi người chỉ dùm (kể cả cách sử dụng Code cũng được ah)?

------
Em đang rất cần chuyển sang dạng file ảnh đuôi JPEG, JPE (chứ không phải dạng PDF) ah.
 
LinDan đã viết:
File Word (dạng file mềm) của em có khoảng 10 trang, nay em muốn chuyển từng trang sang một sang dạng file ảnh (đuôi JPEG) có được không ah? Liệu có cách nào làm nhanh được thay vì cứ phải chụp ảnh màn hình từng trang?

Em rất mong mọi người chỉ dùm (kể cả cách sử dụng Code cũng được ah)?

------
Em đang rất cần chuyển sang dạng file ảnh đuôi JPEG, JPE (chứ không phải dạng PDF) ah.
Nhấp chuột vào đây để mở rộng...

Nếu bạn dùng Office 2010 thì bạn nên xem qua bài này:
http://www.wikihow.com/Change-a-Word-Document-to-JPEG-Format
Thậm chí là không cần bất cứ phần mềm nào cũng chuyển được tuốt. Nguyên tắc là chuyển Word sang OneNote, từ đó muốn làm gì tiếp cứ tùy ý ---> Mỗi trang word sẽ là 1 Picture
 
ndu96081631 đã viết:
Nếu bạn dùng Office 2010 thì bạn nên xem qua bài này:
http://www.wikihow.com/Change-a-Word-Document-to-JPEG-Format
Thậm chí là không cần bất cứ phần mềm nào cũng chuyển được tuốt. Nguyên tắc là chuyển Word sang OneNote, từ đó muốn làm gì tiếp cứ tùy ý ---> Mỗi trang word sẽ là 1 Picture
Nhấp chuột vào đây để mở rộng...

Đúng ý của em rồi ah, nhưng em cài Word2010 từ chiều mà chưa được, tuy nhiên em chưa hiểu lắm về:
1) Chức năng của Word2010 ở đây có tác dụng gì trong việc chuyển đổi? Office2007 có chức năng này không?

2) Theo như thày ở đoạn trên "Nguyên tắc là chuyển Word sang OneNote" em tạm hiểu là chuyển sang đối tượng thông minh? Em chưa thực hiện được bước kéo thả (Click and drag the box over the document) này như thế nào?

Phiền thày chỉ giúp cho ah.
 
LinDan đã viết:
Đúng ý của em rồi ah, nhưng em cài Word2010 từ chiều mà chưa được, tuy nhiên em chưa hiểu lắm về:
1) Chức năng của Word2010 ở đây có tác dụng gì trong việc chuyển đổi? Office2007 có chức năng này không?

2) Theo như thày ở đoạn trên "Nguyên tắc là chuyển Word sang OneNote" em tạm hiểu là chuyển sang đối tượng thông minh? Em chưa thực hiện được bước kéo thả (Click and drag the box over the document) này như thế nào?

Phiền thày chỉ giúp cho ah.
Nhấp chuột vào đây để mở rộng...

Tôi không biết Word 2007 có làm được không, tuy nhiên tôi thí nghiệm trên Word 2010 như sau:
1> Mở 1 file word
2> Vào File\Print. Mục Printer chọn Send to OneNote
3> Nếu trên máy tính chưa lần lần nào khởi động OneNote, nó sẽ yêu cầu bạn khởi động 1 lần trước khi thực hiện thao tác Print
4> Chạy lệnh Print xong, OneNote sẽ mở ra với tài liệu Word đã được convert
5> Trong cửa sổ OneNote, bạn có thể click phải từng tấm hình rồi SaveAs tùy thích
6> Muốn Save 1 lần nhiều hình, ta tiến hành bước 7
7> Trong cửa số OneNote, SaveAs tài liệu thành dạng Word Document
8> Mở tài liệu đã Save từ OneNote (bằng MS Word) ---> Tài liệu mới này sẽ hoàn toàn khác với tài liệu gốc vì bây giờ mỗi trang sẽ là 1 hình
9> Muốn Save toàn bộ hình vào đĩa cứng, có thể viết code để thực thị 1 lần
Có thể tham khảo cách biến các Object thành Picture tại đây:
http://www.giaiphapexcel.com/forum/showthread.php?46973-Tạo-ListBoxt-với-RowSoure-là-các-hình-vẽ
Nếu bạn không làm được, cứ đưa file word lên đây, tôi làm giúp cho
---------------
Tóm lại, nguyên tắc là:
- Mở word rồi convert tài liệu sang OneNote, mục đích để nó chuyển mỗi trang thành 1 hình
- Mở OneNote, SaveAs lại thành Word
- Từ Word, có thể Save hình bằng tay hoặc thực thi Save nhiều hình cùng lúc bằng code
- Nếu không quá chú trọng về định dạng hình, có thể từ Word, Save As thành Web Page ----> Tài liệu sau khi Save thành Web Page sẽ có đủ tất cả các hình bạn cần (có điều chúng có thể không phải định dạng JPG)
 
Lần chỉnh sửa cuối:
ndu96081631 đã viết:
Tôi không biết Word 2007 có làm được không, tuy nhiên tôi thí nghiệm trên Word 2010 như sau:
1> Mở 1 file word
2> Vào File\Print. Mục Printer chọn Send to OneNote
3> Nếu trên máy tính chưa lần lần nào khởi động OneNote, nó sẽ yêu cầu bạn khởi động 1 lần trước khi thực hiện thao tác Print
4> Chạy lệnh Print xong, OneNote sẽ mở ra với tài liệu Word đã được convert
5> Trong cửa sổ OneNote, bạn có thể click phải từng tấm hình rồi SaveAs tùy thích
Nhấp chuột vào đây để mở rộng...
Word2007 em làm bắt đầu đến bước này rồi nhưng chưa biết... Save as như thế nào để ra JPEG cả, nhờ thày chỉ cho ah.
 

File đính kèm

  • 123.rar
    621.7 KB · Đọc: 52
LinDan đã viết:
Word2007 em làm bắt đầu đến bước này rồi nhưng chưa biết... Save as như thế nào để ra JPEG cả, nhờ thày chỉ cho ah.
Nhấp chuột vào đây để mở rộng...

Bạn mở file word lên, bấm Alt + F11, chèn 1 Module. Xong copy code dưới đây paste vào:
PHP: 
Private Type GUID
  Data1 As Long
  Data2 As Integer
  Data3 As Integer
  Data4(0 To 7) As Byte
End Type
 
Private Type uPicDesc
  Size As Long
  Type As Long
  hPic As Long
  hPal As Long
End Type
     
Private Declare Function IsClipboardFormatAvailable Lib "user32" (ByVal wFormat As Integer) As Long
Private Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetClipboardData Lib "user32" (ByVal wFormat As Integer) As Long
Private Declare Function CloseClipboard Lib "user32" () As Long
Private Declare Function OleCreatePictureIndirect Lib "olepro32.dll" (PicDesc As uPicDesc, RefIID As GUID, ByVal fPictureOwnsHandle As Long, IPic As IPicture) As Long
Private Declare Function CopyEnhMetaFile Lib "gdi32" Alias "CopyEnhMetaFileA" (ByVal hemfSrc As Long, ByVal lpszFile As String) As Long
Private Declare Function CopyImage Lib "user32" (ByVal handle As Long, ByVal un1 As Long, ByVal n1 As Long, ByVal n2 As Long, ByVal un2 As Long) As Long
Public sPath
PHP: 
[php]
Function PictureFromObject(ByVal Target As Object) As IPictureDisp
  Dim hPtr As Long, hCopy As Long, PicType As Long
  Const CF_BITMAP = 2
  Const CF_PALETTE = 9
  Const CF_ENHMETAFILE = 14
  Const IMAGE_BITMAP = 0
  Const LR_COPYRETURNORG = &H4
  Const PicType_BITMAP = 1
  Const PicType_ENHMETAFILE = 4
  Target.CopyAsPicture 
  PicType = IIf(IsClipboardFormatAvailable(CF_BITMAP) <> 0, CF_BITMAP, CF_ENHMETAFILE)
  If IsClipboardFormatAvailable(PicType) <> 0 Then
    If OpenClipboard(0) > 0 Then
      hPtr = GetClipboardData(PicType)
      If PicType = CF_BITMAP Then
        hCopy = CopyImage(hPtr, IMAGE_BITMAP, 0, 0, LR_COPYRETURNORG)
      Else
        hCopy = CopyEnhMetaFile(hPtr, vbNullString)
      End If
      CloseClipboard
      If hPtr <> 0 Then
        Dim uPicInfo As uPicDesc, IID_IDispatch As GUID, IPic As IPictureDisp
        With IID_IDispatch
          .Data1 = &H7BF80980
          .Data2 = &HBF32
          .Data3 = &H101A
          .Data4(0) = &H8B
          .Data4(1) = &HBB
          .Data4(2) = &H0
          .Data4(3) = &HAA
          .Data4(4) = &H0
          .Data4(5) = &H30
          .Data4(6) = &HC
          .Data4(7) = &HAB
        End With
        With uPicInfo
          .Size = Len(uPicInfo)
          .Type = IIf(PicType = CF_BITMAP, PicType_BITMAP, PicType_ENHMETAFILE)
          .hPic = hCopy
        End With
        OleCreatePictureIndirect uPicInfo, IID_IDispatch, True, IPic
        Set PictureFromObject = IPic
      End If
    End If
  End If
End Function
PHP: 
Sub Main()
  Dim IPic As IPictureDisp, shp As Object, i As Long
  Dim shl As Object, fso As Object
  On Error GoTo ExitSub
  Set shl = CreateObject("Shell.Application")
  Set fso = CreateObject("Scripting.FileSystemObject")
  If (Len(sPath) = 0) Or (Not fso.FolderExists(sPath)) Then
    sPath = shl.BrowseForFolder(0, "", 1).Self.Path
  End If
  If TypeName(sPath) = "String" Then
    If Right(sPath, 1) <> "\" Then sPath = sPath & "\"
    If fso.FolderExists(sPath) Then
      With ActiveDocument
        For i = 1 To .InlineShapes.Count
          .InlineShapes(i).Select
          Set shp = Selection
          Set IPic = PictureFromObject(shp)
          SavePicture IPic, sPath & "Pic" & i & ".jpg"
        Next
      End With
    End If
  End If
ExitSub:
End Sub
Xong, chạy Sub Main sẽ có ngay kết quả
Có thể xem code chi tiết trong file đính kèm
 

File đính kèm

  • 123.rar
    631.8 KB · Đọc: 95
ndu96081631 đã viết:
Bạn mở file word lên, bấm Alt + F11, chèn 1 Module. Xong copy code dưới đây paste vào:
PHP: 
Private Type GUID
  Data1 As Long
  Data2 As Integer
  Data3 As Integer
  Data4(0 To 7) As Byte
End Type
 
Private Type uPicDesc
  Size As Long
  Type As Long
  hPic As Long
  hPal As Long
End Type
     
Private Declare Function IsClipboardFormatAvailable Lib "user32" (ByVal wFormat As Integer) As Long
Private Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetClipboardData Lib "user32" (ByVal wFormat As Integer) As Long
Private Declare Function CloseClipboard Lib "user32" () As Long
Private Declare Function OleCreatePictureIndirect Lib "olepro32.dll" (PicDesc As uPicDesc, RefIID As GUID, ByVal fPictureOwnsHandle As Long, IPic As IPicture) As Long
Private Declare Function CopyEnhMetaFile Lib "gdi32" Alias "CopyEnhMetaFileA" (ByVal hemfSrc As Long, ByVal lpszFile As String) As Long
Private Declare Function CopyImage Lib "user32" (ByVal handle As Long, ByVal un1 As Long, ByVal n1 As Long, ByVal n2 As Long, ByVal un2 As Long) As Long
Public sPath
PHP: 
[php]
Function PictureFromObject(ByVal Target As Object) As IPictureDisp
  Dim hPtr As Long, hCopy As Long, PicType As Long
  Const CF_BITMAP = 2
  Const CF_PALETTE = 9
  Const CF_ENHMETAFILE = 14
  Const IMAGE_BITMAP = 0
  Const LR_COPYRETURNORG = &H4
  Const PicType_BITMAP = 1
  Const PicType_ENHMETAFILE = 4
  Target.CopyAsPicture 
  PicType = IIf(IsClipboardFormatAvailable(CF_BITMAP) <> 0, CF_BITMAP, CF_ENHMETAFILE)
  If IsClipboardFormatAvailable(PicType) <> 0 Then
    If OpenClipboard(0) > 0 Then
      hPtr = GetClipboardData(PicType)
      If PicType = CF_BITMAP Then
        hCopy = CopyImage(hPtr, IMAGE_BITMAP, 0, 0, LR_COPYRETURNORG)
      Else
        hCopy = CopyEnhMetaFile(hPtr, vbNullString)
      End If
      CloseClipboard
      If hPtr <> 0 Then
        Dim uPicInfo As uPicDesc, IID_IDispatch As GUID, IPic As IPictureDisp
        With IID_IDispatch
          .Data1 = &H7BF80980
          .Data2 = &HBF32
          .Data3 = &H101A
          .Data4(0) = &H8B
          .Data4(1) = &HBB
          .Data4(2) = &H0
          .Data4(3) = &HAA
          .Data4(4) = &H0
          .Data4(5) = &H30
          .Data4(6) = &HC
          .Data4(7) = &HAB
        End With
        With uPicInfo
          .Size = Len(uPicInfo)
          .Type = IIf(PicType = CF_BITMAP, PicType_BITMAP, PicType_ENHMETAFILE)
          .hPic = hCopy
        End With
        OleCreatePictureIndirect uPicInfo, IID_IDispatch, True, IPic
        Set PictureFromObject = IPic
      End If
    End If
  End If
End Function
PHP: 
Sub Main()
  Dim IPic As IPictureDisp, shp As Object, i As Long
  Dim shl As Object, fso As Object
  On Error GoTo ExitSub
  Set shl = CreateObject("Shell.Application")
  Set fso = CreateObject("Scripting.FileSystemObject")
  If (Len(sPath) = 0) Or (Not fso.FolderExists(sPath)) Then
    sPath = shl.BrowseForFolder(0, "", 1).Self.Path
  End If
  If TypeName(sPath) = "String" Then
    If Right(sPath, 1) <> "\" Then sPath = sPath & "\"
    If fso.FolderExists(sPath) Then
      With ActiveDocument
        For i = 1 To .InlineShapes.Count
          .InlineShapes(i).Select
          Set shp = Selection
          Set IPic = PictureFromObject(shp)
          SavePicture IPic, sPath & "Pic" & i & ".jpg"
        Next
      End With
    End If
  End If
ExitSub:
End Sub
Xong, chạy Sub Main sẽ có ngay kết quả
Có thể xem code chi tiết trong file đính kèm
Nhấp chuột vào đây để mở rộng...

Em làm kết quả rất tốt thày ah.
------
Nhưng quả là em vẫn không biết cách Save as thủ công thế nào để nó ra từng ảnh. Xin thày và mọi nguời chỉ giúp
 
LinDan đã viết:
Em làm kết quả rất tốt thày ah.
------
Nhưng quả là em vẫn không biết cách Save as thủ công thế nào để nó ra từng ảnh. Xin thày và mọi nguời chỉ giúp
Nhấp chuột vào đây để mở rộng...

Bạn click phải vào từng hình, chọn Save As Picture thôi
(không biết Word 2007 có chức năng này không?)

Untitled.jpg


















------------------------
Nhân đây xin hỏi những ai rành về VBA trong word vấn đề: Làm sao duyệt qua các Picture có trong Document mà không phải Select từng tấm hình?
Trong code tôi có đoạn:
Mã: 
.InlineShapes(i).Select
Set shp = Selection
Duyệt qua rồi Select... rất vô duyên nhưng lại không biết làm sao khắc phục? Ctrl + A, rồi copy toàn bộ hình "quăng" qua Excel làm xem bộ khỏe hơn (Word nó rắc rối quá)
 
Lần chỉnh sửa cuối:
ndu96081631 đã viết:
Bạn click phải vào từng hình, chọn Save As Picture thôi
(không biết Word 2007 có chức năng này không?)
Nhấp chuột vào đây để mở rộng...

Em cũng đoán thế, nhưng đúng là Word2007 nó không có chức năng này thày ah. Vậy trong trường hợp này mình có giải pháp gì để làm được cho nhanh (hay buộc phải copy sang Photoshop sau đó Save sang JPEG)?
 
Lưu ảnh trong file Word thành file riêng biệt

Em tìm ra phương pháp chuyển hàng loạt trong Word rồi, cách làm khá đơn giản nhưng lại rất hiệu quả thày ah.

-------------
Trong Word 2007, Microsoft giới thiệu một định dạng file mới nền tảng XML là .docx. ĐỊnh dạng này là một ZIP Container, chứa nhiều file XML và mọi ảnh nhúng. Để truy cập vào những ảnh nhúng trong file .docx bạn hãy thực hiện các thao tác sau:

  • Nếu file này chưa phải là một file .docx (chưa được định dạng .docx) thì bạn hãy mở nó Word 2007 sau đó lưu file dưới dạng Word Document (*.docx).

  • Thay đổi phần mở rộng file trên file gốc từ .docx sang .zip (hình 4).
3f3bc9ff35a66752878423579aa0781c.jpg

Hình 4: Chuyển đổi đuôi .docx sang .zip.

  • Sau đó sử dụng ứng dụng ZIP để mở file .zip này, khi đó những file ảnh sẽ được hiển thị trên đầu danh sách (hình 5).
62e3e572acceae1cbde218c863e86787.jpg

Hình 5: Sử dụng ứng dụng ZIP mở file .zip
Và bạn đã có thể copy những file ảnh này vào vị trí mong muốn.
 
LinDan đã viết:
Em tìm ra phương pháp chuyển hàng loạt trong Word rồi, cách làm khá đơn giản nhưng lại rất hiệu quả thày ah.

-------------
Trong Word 2007, Microsoft giới thiệu một định dạng file mới nền tảng XML là .docx. ĐỊnh dạng này là một ZIP Container, chứa nhiều file XML và mọi ảnh nhúng. Để truy cập vào những ảnh nhúng trong file .docx bạn hãy thực hiện các thao tác sau:

  • Nếu file này chưa phải là một file .docx (chưa được định dạng .docx) thì bạn hãy mở nó Word 2007 sau đó lưu file dưới dạng Word Document (*.docx).
  • Thay đổi phần mở rộng file trên file gốc từ .docx sang .zip (hình 4).

Hình 4: Chuyển đổi đuôi .docx sang .zip.

  • Sau đó sử dụng ứng dụng ZIP để mở file .zip này, khi đó những file ảnh sẽ được hiển thị trên đầu danh sách (hình 5).

Hình 5: Sử dụng ứng dụng ZIP mở file .zip
Và bạn đã có thể copy những file ảnh này vào vị trí mong muốn.
Nhấp chuột vào đây để mở rộng...
Cách đó cũng tương tự như cách bài 5 tôi đã giới thiệu rồi còn gì
ndu96081631 đã viết:
- Nếu không quá chú trọng về định dạng hình, có thể từ Word, Save As thành Web Page ----> Tài liệu sau khi Save thành Web Page sẽ có đủ tất cả các hình bạn cần (có điều chúng có thể không phải định dạng JPG)
Nhấp chuột vào đây để mở rộng...
Cách đổi đuôi thành ZIP hoặc RAR chỉ áp dụng được với định dạng docx hoặc xlsx trong khi cách Save As Web Page áp dụng được tất tần tật
 
ndu96081631 đã viết:
Nhân đây xin hỏi những ai rành về VBA trong word vấn đề: Làm sao duyệt qua các Picture có trong Document mà không phải Select từng tấm hình?
Trong code tôi có đoạn:
Mã: 
.InlineShapes(i).Select
Set shp = Selection
Duyệt qua rồi Select... rất vô duyên nhưng lại không biết làm sao khắc phục? Ctrl + A, rồi copy toàn bộ hình "quăng" qua Excel làm xem bộ khỏe hơn (Word nó rắc rối quá)
Nhấp chuột vào đây để mở rộng...
Cuối cùng cũng mò ra được cách vượt qua cái "cùi bắp" kia
Mã: 
Sub Main()
  Dim IPic As IPictureDisp,[COLOR=#ff0000] shp As InlineShape[/COLOR], i As Long
  Dim shl As Object, fso As Object
  On Error GoTo ExitSub
  Set shl = CreateObject("Shell.Application")
  Set fso = CreateObject("Scripting.FileSystemObject")
  If (Len(sPath) = 0) Or (Not fso.FolderExists(sPath)) Then
    sPath = shl.BrowseForFolder(0, "", 1).Self.Path
  End If
  If TypeName(sPath) = "String" Then
    If Right(sPath, 1) <> "\" Then sPath = sPath & "\"
    If fso.FolderExists(sPath) Then
      With ActiveDocument
        For Each shp In .InlineShapes
          i = i + 1
          Set IPic = PictureFromObject([COLOR=#ff0000]shp.Range[/COLOR])
          SavePicture IPic, sPath & "Pic" & i & ".jpg"
        Next
      End With
    End If
  End If
ExitSub:
End Sub
Không cần phải Select gì cả
Code này chắc chắn sẽ có ngày dùng tới
 
LinDan đã viết:
File Word (dạng file mềm) của em có khoảng 10 trang, nay em muốn chuyển từng trang sang một sang dạng file ảnh (đuôi JPEG) có được không ah? Liệu có cách nào làm nhanh được thay vì cứ phải chụp ảnh màn hình từng trang?

Em rất mong mọi người chỉ dùm (kể cả cách sử dụng Code cũng được ah)?

------
Em đang rất cần chuyển sang dạng file ảnh đuôi JPEG, JPE (chứ không phải dạng PDF) ah.
Nhấp chuột vào đây để mở rộng...
Mình cũng có 1 câu hỏi tương tự như vậy nhưng nội dung chính xác cần là hình của toàn 1 trang Word cụ thể chứ không phải là những hình nằm trong trang Word đó (giống preview của trang). Mình có thử một số nhưng lại chỉ hiện thị được phần thân thân trang, còn header/footer thì đi mất. Có thể có vài 3rd component làm sẵn cho việc này, nhưng mình chỉ muốn sử dụng các thành phần gói gọn trọng bộ MS-Office hoặc sẵn có của HĐH Windows (nếu áp dụng được cho Word 2003 thì càng tuyệt).

Các bạn có giải đáp nào sát theo nghĩa này không?
 
Lần chỉnh sửa cuối:
app đã viết:
Mình cũng có 1 câu hỏi tương tự như vậy nhưng nội dung chính xác cần là hình của toàn 1 trang Word cụ thể chứ không phải là những hình nằm trong trang Word đó (giống preview của trang). Mình có thử một số nhưng lại chỉ hiện thị được phần thân thân trang, còn header/footer thì đi mất. Có thể có vài 3rd component làm sẵn cho việc này, nhưng mình chỉ muốn sử dụng các thành phần gói gọn trọng bộ MS-Office hoặc sẵn có của HĐH Windows (nếu áp dụng được cho Word 2003 thì càng tuyệt).

Các bạn có giải đáp nào sát theo nghĩa này không?
Nhấp chuột vào đây để mở rộng...

Thì Print kiểu Send to OneNote nó bao gồm luôn Header/footer đấy mà bạn
Có điều nếu bạn dùng Office 2003 thì... TÔI KHÔNG BIẾT
Nếu bạn có nhu cầu, tôi nghĩ đàng nào bạn cũng phải cài 1 phần mềm nào đó, đúng không? Vậy thôi cài Office 2010 cho rồi
 
Lần chỉnh sửa cuối:
ndu96081631 đã viết:
Thì Print kiểu Send to OneNote nó bao gồm luôn Header/footer đấy mà bạn
Thử xem!
Nhấp chuột vào đây để mở rộng...
Em quên đặt điều kiện là chỉ dùng những cái của Word/Excel hay Windows vì nhiều khi cũng chỉ cài 2 phần đó. Nếu anh dùng Office từ 2007 trở lên thì nó có hỗ trợ Preview trang đầu tiên cho mỗi file Word.
Hình như trong cấu trúc docx/xlsx cũng nhúng sẵn hình chụp của trang đầu tiên còn với doc/xls (Office 2003) thì không có.
 
app đã viết:
Em quên đặt điều kiện là chỉ dùng những cái của Word/Excel hay Windows vì nhiều khi cũng chỉ cài 2 phần đó. Nếu anh dùng Office từ 2007 trở lên thì nó có hỗ trợ Preview trang đầu tiên cho mỗi file Word.
Hình như trong cấu trúc docx/xlsx cũng nhúng sẵn hình chụp của trang đầu tiên còn với doc/xls (Office 2003) thì không có.
Nhấp chuột vào đây để mở rộng...

Mình cũng không biết!
Nhưng mình thấy rằng nhiều khi đi tìm phần mềm này phần mềm nọ.. đến cuối cùng mới phát hiện trong máy mình có sẵn
Ví dụ khi trước dùng Windows XP + Office 2003, khi cần chụp hình màn hình thì phải đi tìm 1 phần mềm nào đó (nếu không dùng nút Print Screen). Giờ dùng Windows 7 + Office 2010 thì khỏi cần (cả trong Win và Office đều có Tool chụp hình và xử lý hình)
----------------
Trở lại vấn đề convert trang word thành picture, mình thấy dù gì cũng phải cần 1 phần mềm nào đó. Vậy nếu ta thấy Windows 7 + Office 2010 thừa sức làm điều này thì có phải ta nên dùng nó không (thay vì phải cài 1 phần mềm khác) ---> Đằng nào cũng CÀI, thôi thì cái 1 món mà xài được nhiều món khác cũng ngon lành mà
Ẹc... ẹc...
 
LinDan đã viết:
Thưa thày em không hiểu bản chất của Print kiểu Send to OneNote là gì? Tại sao lại cứ phải có máy in dạng ảo ah. Kính mong thày và mọi người chỉ dùm em.
Nhấp chuột vào đây để mở rộng...

Ai mà biết đâu nè
Thật ra cái link tôi cho bạn ở trên tôi chỉ đọc sơ qua, thấy có công đoạn Send to OneNote thì lập tức thí nghiệm... Phần sau đó tôi tự làm toàn bộ
Thí nghiệm thì thấy vậy chứ tôi cũng chưa xài OneNote bao giờ (nó có vẻ giống giống Power Point nhỉ)
 
ndu96081631 đã viết:
Ai mà biết đâu nè
Thật ra cái link tôi cho bạn ở trên tôi chỉ đọc sơ qua, thấy có công đoạn Send to OneNote thì lập tức thí nghiệm... Phần sau đó tôi tự làm toàn bộ
Thí nghiệm thì thấy vậy chứ tôi cũng chưa xài OneNote bao giờ (nó có vẻ giống giống Power Point nhỉ)
Nhấp chuột vào đây để mở rộng...

Em thấy nó giống máy in ảo, nó thiêt lập những cái giống như từng trang của Print Preview vào các trang của OneNote. Thật sự em cũng chưa biết phải dùng nó như thế nào, nhưng với máy tính mà không kết nối với máy in, nó hay chuyển qua OneNote.
 
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.
Web KT

Bài viết mới nhất

S
Hướng dẫn gán 1 biến workbook
Trả lời
11
Đọc
122
DMQ
DMQ
GPE-Trợ Lý
Đà Nẵng - Đăng ký tham dự sinh nhật GIAIPHAPEXECL lần thứ 18 ngày 05/10/2024
    • Thích
    • Yêu thích
Trả lời
10
Đọc
214
SA_DQ
SA_DQ
chip07
Tách 1 dòng trong sheet thành 1 file riêng có thể cập nhật được
Trả lời
3
Đọc
54
Hoàng Tuấn 868
H
U
VLOOKUP nhiều cột
    • Chấp nhận
Trả lời
9
Đọc
301
uronmapu
U
M
Không định dạng được dưới dạng Short Date
Trả lời
1
Đọc
37
ptm0412
ptm0412
D
Phân công và sắp xếp lịch trực
Trả lời
10
Đọc
266
HieuCD
H
befaint
Chia sẻ tâm tư, xả nỗi lòng
    • Thích
35 36 37
Trả lời
736
Đọc
43K
SA_DQ
SA_DQ
PhanTuHuong
Các địa phương thiệt hại nặng nề do bão lũ 2024
    • Thích
2
Trả lời
23
Đọc
811
SA_DQ
SA_DQ
T
  • Question
Tính tồn đầu , tồn cuối , nhập trong kỳ , xuất trong kỳ
Trả lời
11
Đọc
277
thierry henry
T
GPE-Trợ Lý
TP.HCM - Đăng ký tham dự sinh nhật GIAIPHAPEXCEL lần thứ 18 ngày 06/10/2024
    • Thích
2
Trả lời
21
Đọc
1K
ptm0412
ptm0412
T
Hàm Sumifs nhiều điều kiện bị lỗi value hoặc trả về 0
Trả lời
14
Đọc
234
ptm0412
ptm0412
ongke0711
  • Question
Trộn dữ liệu từ Excel sang Word mở rộng (phiên bản ongke0711)
    • Thích
    • Yêu thích
    • Cảm ơn
11 12 13
Trả lời
255
Đọc
23K
ngochienbmt
N
C
Công thức gộp 2 cột thành 1 (dữ liệu gộp so le)
Trả lời
10
Đọc
963
nguyenhuyen0805
N
H
  • Question
Lập trình số liệu Nhập-Xuất-Tồn
2
Trả lời
23
Đọc
424
HUONGHCKT
H
A
  • Question
Nhờ tìm lỗi code không delete các dòng theo điều kiện
    • Cười
2
Trả lời
29
Đọc
476
SA_DQ
SA_DQ
Kiều Mạnh
Lấy dữ liệu cổ phiếu từ Website Cafef.vn về Excel
    • Thích
3 4 5
Trả lời
81
Đọc
3K
Kiều Mạnh
Kiều Mạnh
C
Quản lý tồn kho ván gỗ
Trả lời
10
Đọc
2K
tamthanhpytn
T
H
Xin giúp đỡ công thức excel để tính nâng lương định kỳ
Trả lời
17
Đọc
9K
ngoclam081077
N
K
Lọc dữ liệu gần nhất trong cột
Trả lời
4
Đọc
135
Hoàng Tuấn 868
H
Q
  • Question
Nhờ các bác hướng dẫn hàm filter dùm.
Trả lời
7
Đọc
232
quen_tat_ca
Q
Xem thêm…

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng

Back
Top Bottom