Copy dữ liệu từ excel sang word bằng VBA

Liên hệ QC
B

bongmaihung

Thành viên hoạt động
Tham gia
7/8/14
Bài viết
173
Được thích
39
Em có dữ liệu như file đính kèm
Nhờ anh chị viết giúp một đoạn code để có thể copy dữ liệu từ excel sang trang word trắng.
Merge mailing or paste link em đã biết, em muốn thử với VBA để học hỏi ah
Em cảm ơn!
 

File đính kèm

Sắp xếp theo thời gian sắp xếp theo bầu chọn
Mã: 
[COLOR=#000000][COLOR=#0000BB]Sub EXCEL_TO_WORD[/COLOR][COLOR=#007700]()
[/COLOR][COLOR=#0000BB]Dim WordDoc [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Object
Set WordDoc [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]CreateObject[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"Word.Application"[/COLOR][COLOR=#007700])
[/COLOR][COLOR=#0000BB]WordDoc[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Visible [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]True
WordDoc[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Documents[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Open [/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ThisWorkbook[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Path [/COLOR][COLOR=#007700]& [/COLOR][COLOR=#DD0000]"\BANG BAO GIA.doc"[/COLOR][COLOR=#007700])
[/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([[/COLOR][COLOR=#0000BB]A2[/COLOR][COLOR=#007700]], [[/COLOR][COLOR=#0000BB]A65536[/COLOR][COLOR=#007700]].[/COLOR][COLOR=#0000BB]End[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]3[/COLOR][COLOR=#007700])).[/COLOR][COLOR=#0000BB]Resize[/COLOR][COLOR=#007700](, [/COLOR][COLOR=#0000BB]5[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]Copy
   With WordDoc[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Selection
      [/COLOR][/COLOR][COLOR=#b22222].MoveDown Unit:=wdLine, Count:=3[/COLOR][COLOR=#000000][COLOR=#0000BB]
      [/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]PasteSpecial [/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]DataType[/COLOR][COLOR=#007700]:=[/COLOR][COLOR=#0000BB]wdPasteOLEObject[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]Placement[/COLOR][COLOR=#007700]:=[/COLOR][COLOR=#0000BB]wdInLine
   End With
Set WordDoc [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Nothing
End Sub  [/COLOR][/COLOR]
http://www.giaiphapexcel.com/forum/...py-từ-excel-qua-word-ai-rành-chỉ-giúp-tôi-với
Em thử theo đường link trên nhưng báo lỗi ở vùng màu đỏ, có thể em áp dụng chưa đúng. Không biết có phải khi di chuyển xuống dòng thứ ba, bảng báo giá theo link trên sẽ đường chèn ko ah.
Nhờ anh chị giúp đề tài này ah
Em cảm ơn!
 
Upvote 0
Mã: 
[COLOR=#00007F]Sub[/COLOR] ExcelRangeToWord()

[COLOR=#007F00]'PURPOSE: Copy/Paste An Excel Table Into a New Word Document[/COLOR]
[COLOR=#007F00]'NOTE: Must have Word Object Library Active in Order to Run _
  (VBE > Tools > References > Microsoft Word 12.0 Object Library)[/COLOR]
[COLOR=#007F00]'SOURCE: www.TheSpreadsheetGuru.com[/COLOR]

[COLOR=#00007F]Dim[/COLOR] tbl [COLOR=#00007F]As[/COLOR] Excel.Range
[COLOR=#00007F]Dim[/COLOR] WordApp [COLOR=#00007F]As[/COLOR] Word.Application
[COLOR=#00007F]Dim[/COLOR] myDoc [COLOR=#00007F]As[/COLOR] Word.Document
[COLOR=#00007F]Dim[/COLOR] WordTable [COLOR=#00007F]As[/COLOR] Word.Table

[COLOR=#007F00]'Optimize Code[/COLOR]
  Application.ScreenUpdating = [COLOR=#00007F]False[/COLOR]
  Application.EnableEvents = [COLOR=#00007F]False[/COLOR]

[COLOR=#007F00]'Copy Range from Excel[/COLOR]
  [COLOR=#00007F]Set[/COLOR] tbl = ThisWorkbook.Worksheets(Sheet1.Name).ListObjects("Table1").Range

[COLOR=#007F00]'Create an Instance of MS Word[/COLOR]
  [COLOR=#00007F]On[/COLOR] [COLOR=#00007F]Error[/COLOR] [COLOR=#00007F]Resume[/COLOR] [COLOR=#00007F]Next[/COLOR]
    
    [COLOR=#007F00]'Is MS Word already opened?[/COLOR]
      [COLOR=#00007F]Set[/COLOR] WordApp = GetObject(class:="Word.Application")
    
    [COLOR=#007F00]'Clear the error between errors[/COLOR]
      Err.Clear

    [COLOR=#007F00]'If MS Word is not already open then open MS Word[/COLOR]
      [COLOR=#00007F]If[/COLOR] WordApp [COLOR=#00007F]Is[/COLOR] [COLOR=#00007F]Nothing[/COLOR] [COLOR=#00007F]Then[/COLOR] [COLOR=#00007F]Set[/COLOR] WordApp = CreateObject(class:="Word.Application")
    
    [COLOR=#007F00]'Handle if the Word Application is not found[/COLOR]
      [COLOR=#00007F]If[/COLOR] Err.Number = 429 [COLOR=#00007F]Then[/COLOR]
        MsgBox "Microsoft Word could not be found, aborting."
        [COLOR=#00007F]GoTo[/COLOR] EndRoutine
      End [COLOR=#00007F]If[/COLOR]

  [COLOR=#00007F]On[/COLOR] [COLOR=#00007F]Error[/COLOR] [COLOR=#00007F]GoTo[/COLOR] 0
  
[COLOR=#007F00]'Make MS Word Visible and Active[/COLOR]
  WordApp.Visible = [COLOR=#00007F]True[/COLOR]
  WordApp.Activate
    
[COLOR=#007F00]'Create a New Document[/COLOR]
  [COLOR=#00007F]Set[/COLOR] myDoc = WordApp.Documents.Add
  
[COLOR=#007F00]'Copy Excel Table Range[/COLOR]
  tbl.Copy

[COLOR=#007F00]'Paste Table into MS Word[/COLOR]
  myDoc.Paragraphs(1).Range.PasteExcelTable _
    LinkedToExcel:=False, _
    WordFormatting:=[COLOR=#00007F]False[/COLOR], _
    RTF:=[COLOR=#00007F]False[/COLOR]

[COLOR=#007F00]'Autofit Table so it fits inside Word Document[/COLOR]
  [COLOR=#00007F]Set[/COLOR] WordTable = myDoc.Tables(1)
  WordTable.AutoFitBehavior (wdAutoFitWindow)
   
[COLOR=#00007F]End[/COLOR]Routine:
[COLOR=#007F00]'Optimize Code[/COLOR]
  Application.ScreenUpdating = [COLOR=#00007F]True[/COLOR]
  Application.EnableEvents = [COLOR=#00007F]True[/COLOR]

[COLOR=#007F00]'Clear The Clipboard[/COLOR]
  Application.CutCopyMode = False

End [COLOR=#00007F]Sub[/COLOR]
Option Explicit

Mã: 
Sub Data2Word() 
     
     'Remember: this code requires a referece to the Word object model
     
     'dimension some local variables
    Dim rng As Range 'our source range
    Dim wdApp As New Word.Application 'a new instance of Word
    Dim wdDoc As Word.Document 'our new Word document
    Dim t As Word.Range 'the new table in Word as a range
    Dim myWordFile As String 'path to Word template
     
     
     'initialize the Word template path
     'here, it's set to be in the same directory as our source workbook
    myWordFile = ThisWorkbook.Path & "\DocWithTableStyle.dot" 
     
     'get the range of the contiguous data from Cell A1
    Set rng = Range("A1").CurrentRegion 
     'you can do some pre-formatting with the range here
    rng.HorizontalAlignment = xlCenter 'center align the data
    rng.Copy 'copy the range
     
     'open a new word document from the template
    Set wdDoc = wdApp.Documents.Add(myWordFile) 
     
    Set t = wdDoc.Content 'set the range in Word
    t.Paste 'paste in the table
    With t 'working with the table range
        .Style = "GreenBar" 'set the style created for the table
         'we can use the range object to do some more formatting
         'here, I'm matching the table with using the Excel range's properties
        .Tables(1).Columns.SetWidth (rng.Width / rng.Columns.Count), wdAdjustSameWidth 
    End With 
     
     'until now the Word app has been a background process
    wdApp.Visible = True 
     'we could use the Word app object to finish off
     'you may also want to things like generate a filename and save the file
    wdApp.Activate 
     
End Sub
em có sưu tầm được 2 đoạn code trên ở trên mạng,
có cao thủ nào biết code trong word giúp em với nhé
 
Upvote 0
tôi cũng có sử dụng code để chép từ excel sang word
bạn yêu cầu làm cái gì vậy?
1-mở một file word trắng tinh
2-copy và paste cái table trong file bài #1 ra trang word đó?
phải vậy ko?
 
Upvote 0
Let'GâuGâu đã viết:
tôi cũng có sử dụng code để chép từ excel sang word
bạn yêu cầu làm cái gì vậy?
1-mở một file word trắng tinh
2-copy và paste cái table trong file bài #1 ra trang word đó?
phải vậy ko?
Nhấp chuột vào đây để mở rộng...

Thầy cho em hỏi thêm nếu em copy dữ liệu bài 1 vào file word đã có sẵn dữ liệu thì code có khác nhau nhiều ko ah
 
Upvote 0
bongmaihung đã viết:
Mã: 
[COLOR=#000000][COLOR=#0000BB]Sub EXCEL_TO_WORD[/COLOR][COLOR=#007700]()
[/COLOR][COLOR=#0000BB]Dim WordDoc [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Object
Set WordDoc [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]CreateObject[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"Word.Application"[/COLOR][COLOR=#007700])
[/COLOR][COLOR=#0000BB]WordDoc[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Visible [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]True
WordDoc[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Documents[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Open [/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ThisWorkbook[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Path [/COLOR][COLOR=#007700]& [/COLOR][COLOR=#DD0000]"\BANG BAO GIA.doc"[/COLOR][COLOR=#007700])
[/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([[/COLOR][COLOR=#0000BB]A2[/COLOR][COLOR=#007700]], [[/COLOR][COLOR=#0000BB]A65536[/COLOR][COLOR=#007700]].[/COLOR][COLOR=#0000BB]End[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]3[/COLOR][COLOR=#007700])).[/COLOR][COLOR=#0000BB]Resize[/COLOR][COLOR=#007700](, [/COLOR][COLOR=#0000BB]5[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]Copy
   With WordDoc[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Selection
      [/COLOR][/COLOR][COLOR=#b22222].MoveDown Unit:=wdLine, Count:=3[/COLOR][COLOR=#000000][COLOR=#0000BB]
      [/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]PasteSpecial [/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]DataType[/COLOR][COLOR=#007700]:=[/COLOR][COLOR=#0000BB]wdPasteOLEObject[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]Placement[/COLOR][COLOR=#007700]:=[/COLOR][COLOR=#0000BB]wdInLine
   End With
Set WordDoc [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Nothing
End Sub  [/COLOR][/COLOR]
http://www.giaiphapexcel.com/forum/...py-từ-excel-qua-word-ai-rành-chỉ-giúp-tôi-với
Em thử theo đường link trên nhưng báo lỗi ở vùng màu đỏ, có thể em áp dụng chưa đúng. Không biết có phải khi di chuyển xuống dòng thứ ba, bảng báo giá theo link trên sẽ đường chèn ko ah.
Nhờ anh chị giúp đề tài này ah
Em cảm ơn!
Nhấp chuột vào đây để mở rộng...
PHP: 
Sub EXCEL_TO_WORD()
Range([A2], [A65536].End(3)).Resize(, 6).Copy
With CreateObject("Word.Application")
   .Visible = True
   .Documents.Add
   .Selection.PasteSpecial Placement:=wdInLine, DataType:=wdPasteOLEObject
End With
End Sub
Nhớ là phải vào mục Reference đánh dấu chọn Microsoft Word 14...
Nếu không sẽ báo lỗi
 
Upvote 0
quanghai1969 đã viết:
PHP: 
Sub EXCEL_TO_WORD()
Range([A2], [A65536].End(3)).Resize(, 6).Copy
With CreateObject("Word.Application")
   .Visible = True
   .Documents.Add
   .Selection.PasteSpecial Placement:=wdInLine, DataType:=wdPasteOLEObject
End With
End Sub
Nhớ là phải vào mục Reference đánh dấu chọn Microsoft Word 14...
Nếu không sẽ báo lỗi
Nhấp chuột vào đây để mở rộng...

Em test thử cũng rất ok. Anh cho em hỏi thêm có phải Reference đánh dấu chọn Microsoft Word 12 là cho word 2007, còn 14 là cho word 2010 đúng ko ah. Nếu bây h em muốn copy dữ liệu đó vào file word có sẵn dữ liệu rồi or dữ liệu excel nhiều hơn 1 trang word thì ko biết code có thay đổi gì ko hả anh?
Ở nhà em đang dùng office 2010
 
Lần chỉnh sửa cuối:
Upvote 0
bongmaihung đã viết:
Em test thử cũng rất ok. Anh cho em hỏi thêm có phải Reference đánh dấu chọn Microsoft Word 12 là cho word 2007, còn 14 là cho word 2010 đúng ko ah. Nếu bây h em muốn copy dữ liệu đó vào file word có sẵn dữ liệu rồi or dữ liệu excel nhiều hơn 1 trang word thì ko biết code có thay đổi gì ko hả anh?
Ở nhà em đang dùng office 2010
Nhấp chuột vào đây để mở rộng...
Chắc là có thay đổi ít nhiều chứ. Code này mình cũng sưu tầm thôi, nên cũng không biết phải thay đổi gì nữa.
 
Upvote 0
quanghai1969 đã viết:
Chắc là có thay đổi ít nhiều chứ. Code này mình cũng sưu tầm thôi, nên cũng không biết phải thay đổi gì nữa.
Nhấp chuột vào đây để mở rộng...
Em cảm ơn anh. Code của anh giống như kiểu copy Object nhưng em loay hoay ko biết nếu file excel dữ liệu hơn 1 trang thì file word phải kéo và chỉnh file word như thế nào để sang trang thứ hai hoặc nhhiều hơn
 
Upvote 0
bongmaihung đã viết:
Em cảm ơn anh. Code của anh giống như kiểu copy Object nhưng em loay hoay ko biết nếu file excel dữ liệu hơn 1 trang thì file word phải kéo và chỉnh file word như thế nào để sang trang thứ hai hoặc nhhiều hơn
Nhấp chuột vào đây để mở rộng...
Thử xóa bỏ cụm code này xem
Placement:=wdInLine
 
Upvote 0
Hỏi thêm quanghai1969:
thêm lệnh gì để
1. save file đó với tên đã có
2. Đóng file đã save
3. Đóng Word
Cảm ơn trước.
(Tôi vốn là haonlh, gần đây không vô được. Nên lấy tên là haog. Nếu ai giúp lấy lại tên cũ được thì báo luôn vô đây. Hoặc gửi cho nguyenxuanhao@huaf.edu.vn)
 
Upvote 0
haog đã viết:
Hỏi thêm quanghai1969:
thêm lệnh gì để
1. save file đó với tên đã có
2. Đóng file đã save
3. Đóng Word
Cảm ơn trước.
(Tôi vốn là haonlh, gần đây không vô được. Nên lấy tên là haog. Nếu ai giúp lấy lại tên cũ được thì báo luôn vô đây. Hoặc gửi cho nguyenxuanhao@huaf.edu.vn)
Nhấp chuột vào đây để mở rộng...
Chơi code khác lưu sheet đó thành File Word luôn được không?
 
Upvote 0
haog đã viết:
Được ạ.
Nhấp chuột vào đây để mở rộng...
Xem thử File. Lưu ý:
- Muốn lưu tên File Word là gì thì sửa tên sheet.
- Tạo 1 Folder rồi bỏ File Excel vào, khi chạy code nó sẽ lưu File Word trong Folder này.
- Khi xuất ra File Word chịu khó vào Page Setup chọn lại trang A4.


A_CanhWord.JPG
 

File đính kèm

Lần chỉnh sửa cuối:
Upvote 0
be09 đã viết:
Xem thử File. Lưu ý:
- Muốn lưu tên File Word là gì thì sửa tên sheet.
- Tạo 1 Folder rồi bỏ File Excel vào, khi chạy code nó sẽ lưu File Word trong Folder này.
- Khi xuất ra File Word chịu khó vào Page Setup chọn lại trang A4.
Nhấp chuột vào đây để mở rộng...

Đã chạy thử.
1. Đã lưu được file word với tên trùng tên sheet.
2. Để đóng file, tôi thêm lệnh
TaoMoi.Close
thì chạy tốt
3. Để đóng Word, tôi thêm lệnh
F_Word.Close
thì bị báo lỗi.

Cảm ơn be09.
Ai có thông tin gì về ý thứ 3 (đóng word) thì cho xin :)
 
Upvote 0
Không có toàn bộ code nên đoán mò. Tôi chỉ đọc bài của bạn thôi. Đừng bắt người khác phải đọc các bài khác.

F_Word không có phương thức CLOSE. Hãy dùng F_Word.Quit.
 
Upvote 0
batman1 đã viết:
Không có toàn bộ code nên đoán mò. Tôi chỉ đọc bài của bạn thôi. Đừng bắt người khác phải đọc các bài khác.

F_Word không có phương thức CLOSE. Hãy dùng F_Word.Quit.
Nhấp chuột vào đây để mở rộng...
Nhưng nếu là riêng Document thì có phương thức Close:

Document.Close
thấy có ví dụ:
Mã: 
On Error GoTo errorHandler
ActiveDocument.Close _
 SaveChanges:=wdPromptToSaveChanges, _
 OriginalFormat:=wdPromptUser
errorHandler:
If Err = 4198 Then MsgBox "Document was not closed"
 
Upvote 0
batman1 đã viết:
Không có toàn bộ code nên đoán mò.
F_Word không có phương thức CLOSE. Hãy dùng F_Word.Quit.
Nhấp chuột vào đây để mở rộng...

Tuyệt vời. Tôi cũng đã thử ghi macro cho đóng Word thì nó hỏi có lưu Macro đang ghi không. Tôi bảo có. Và mở lại thì thấy dòng lệnh

Application.Quit
Và suy ra code trong excel là như bạn nói: F_Word.Quit

Nhân đây ghi lại code của công việc này:
Sub Hung_LuuFileWord()
Dim F_Word As Object
Dim TaoMoi As Object
Set F_Word = CreateObject("Word.Application")
F_Word.Visible = True
Set TaoMoi = F_Word.Documents.Add
'ActiveSheet.UsedRange.Copy
'Tôi thay bằng lệnh sau. Tức là có thể chép 1 vùng chứ không cần làm cả sheet như be09
ActiveSheet.Range("C5:F10").Copy
TaoMoi.Range.Paste
Application.CutCopyMode = False
F_Word.Activate

'TaoMoi.SaveAs Filename:=Application.ActiveWorkbook.Path & "\" & ActiveSheet.Name
'Tôi thay bằng lệnh đơn giản sau
TaoMoi.SaveAs Filename:="c:\xx.docx"
TaoMoi.Close
F_Word.Quit
End Sub
 
Upvote 0
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

SA_DQ
  • Question Question
[Bài tập VBA cho người rỗi rảnh] Hãy viết 1 macro tìm ra 3 số nguyên tố liên tiếp
2
Trả lời
31
Đọc
597
Châu Bá Thông
Châu Bá Thông
T
Định dạng cột dữ liệu trong sql
Trả lời
5
Đọc
80
ptm0412
ptm0412
L
  • Question Question
[Hlep] Xóa ảnh theo tên và kích thước
Trả lời
8
Đọc
163
Luong24
L
Xoainon3005
Xin file mẫu kế hoạch sản xuất theo tháng ngành động cơ
Trả lời
0
Đọc
61
Xoainon3005
Xoainon3005
A
Tạo vé Loto bằng Excel
Trả lời
19
Đọc
23K
vinhquang14292
vinhquang14292
ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba
    • Thích
    • Yêu thích
    • Cảm ơn
14 15 16
Trả lời
308
Đọc
22K
CheezeTube
CheezeTube
HeSanbi
  • Đã giải quyết
LocalizeXL v1.73 - Làm nổi bật ô đang chọn và cuộn trang tự động
    • Thích
    • Yêu thích
2 3 4
Trả lời
74
Đọc
10K
vn72259
V
H
Vì sao trong khi cộng và khi sum lại hiển thị sai
Trả lời
15
Đọc
57K
hieung99
hieung99
Thanh271188
Tìm giá trị xuất hiện bất kì (không phải giá trị đầu, cuối) trong excel
    • Cười
Trả lời
3
Đọc
145
VetMini
V
T
Nhờ hỗ trợ hàm SUMIF không phân biệt được các ký tự "0" trước một số trong chuỗi
Trả lời
3
Đọc
192
tan10ckn
T
huuthang_bd
Add-in DeleteVirusMacro - Xóa và ngăn chặn virus macro
    • Thích
    • Yêu thích
    • Chấp nhận
2 3
Trả lời
46
Đọc
14K
tuantran203
T
ongke0711
  • Question 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
12 13 14
Trả lời
260
Đọc
27K
hoangtuan.net
hoangtuan.net
HeSanbi
  • Đã giải quyết
WeatherXL - Ứng dụng lấy dữ liệu Thời tiết siêu nhanh (*15/01/2024)
    • Thích
    • Yêu thích
3 4 5
Trả lời
88
Đọc
19K
vc_đi chơi
vc_đi chơi
L
[Help] tự động lấy dữ liệu cổ phiếu từ vietstock về file excel
    • Thích
Trả lời
3
Đọc
854
ketoan113
K
N
Tách chuỗi và tìm kiếm theo dữ liệu gần đúng trong chuỗi ký tự
Trả lời
8
Đọc
206
Ngocminh19
N
Mr.hieudoanxd
  • Question Question
[Cần hướng dẫn] Về lập trình Viết Function với Settimer và Killtimer
    • Thích
Trả lời
8
Đọc
350
nguyendang95
N
P
Các Bác cho e hỏi làm thế nào để ẩn công thức trên GOOGLE SHEET với ạ?
2
Trả lời
21
Đọc
18K
học excel googlesheet
học excel googlesheet
Emyeuexcel
  • Question Question
Code VBA mở nhiều file, value các sheet, lưu và đóng file
Trả lời
3
Đọc
155
Emyeuexcel
Emyeuexcel
V
Cho 2 biến - kết quả trả về giá trị của hàng đầu tiên
    • Chấp nhận
Trả lời
5
Đọc
185
Duy Tùng 9x
Duy Tùng 9x
D
Giúp đỡ thống kê dữ liệu theo điều kiện
Trả lời
8
Đọc
259
HieuCD
H
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

Đếm ngược thời gian

000
Ngày
00
Giờ
00
phút
00
giây
Chúc mừng năm mới Ất Tỵ 2025
Back
Top Bottom