Trộn Văn Bản (1 người xem)

Người dùng đang xem chủ đề này

Dương Thị Minh Thành

Thành viên mới
Tham gia
20/9/08
Bài viết
9
Được thích
1
Chào các anh chị và các bạn.

Em có một vấn đề xin được hỏi và mong mọi người giúp đỡ.
Làm thế nào để trộn văn bản ( ví dụ như viết giấy mời hoặc gửi thư tới nhiều địa chỉ khác nhau cho nhiều người) trong Excel và Word ?. Em không nhớ có phải là dùng hàm Vlookup không và dùng như thế nào?

Giúp em nhé.

Cám ơn mọi người rất nhiều,
 
Bạn dùng trộn mail trong word
Tool-letters mailing - mail merge
 
Hi,

Cám ơn le tin nhé.
Thế còn việc sử dụng cách gửi như gửi thư trên Excel thì sao?
Giúp mình nhé.

Thanks,
 
Nhiều người cứ nghĩ chỉ có word mới làm các văn bản được. Trong trường hợp cuả bạn, theo tôi nghĩ thì Excel hoàn toàn làm được , quan trong là bạn tạo cơ sở dữ liệu như thế nào? Chẵng hạn như thế này:

Phần 1. Lập bảng và nhập dữ liệu trong Excel rồi lưu lại và đặt cho nó một cái tên nào đó (Ví dụ Bang Luong T11-2007) rồi đóng Excel lại.
[SIZE=+0][/SIZE]
bangluong1.jpg
Mẫu Bảng Lương (Nên dùng Unicode)
Phần 2. Tạo mẫu và nhúng dữ liệu vào trong Word.

Bước 1. Tạo mẫu phiếu lương trong Word với đầy đủ thông tin cần in.

bangluong2.jpg
Nguồn:www.dantri.com.vn

Ở phần II bạn không nhất thiết phải trộn vào word mà có thể tạo một Sheet thứ hai để in (Dùng các công thức như If,Vlookup..)

Là một ví dụ để tạo bảng lương. Các mẫu in ấn khác, bạn cũng tạo ra như vậy. Tốt nhất bạn nên đưa file lên.
 
Cám ơn matmotmi nhiều nhé.

Mình ít khi dùng Word lắm, chỉ toàn dùng Excel thôi. Mình sẽ gửi file đính kèm để bạn hình dung và giúp mình. Ý của mình là muốn làm form để gửi thư. Chẳng hạn như:
Kính gửi
Tên
Địa chỉ
Số điện thoại
Mình đã có danh sách Khách hàng, nhưng đọc công thức Vlookup như thế nào thì chưa biết. ( Vì danh sách KH của mình mỗi tháng sẽ tăng vài trăm người, nên không thể thủ công copy từng dòng được)
Giúp mình nhé.

Xin được hậu tạ sau. hi hi...

Nhưng mình không biết gửi file đính kèm ở chỗ nào cả. Click vào đâu đây? Ngốc quá nhỉ?
 
Sau khi viết bài, bạn kéo chuột xuống phíá dưới có nút "tãi file từ máy", nhấn và đó>>chọn Browse>>chọn file muốn đưa lên. Bạn cứ mạnh dạn gửi file lên, chúng tôi sẽ giúp bạn.
 
Chào các anh chị và các bạn.

Em có một vấn đề xin được hỏi và mong mọi người giúp đỡ.
Làm thế nào để trộn văn bản ( ví dụ như viết giấy mời hoặc gửi thư tới nhiều địa chỉ khác nhau cho nhiều người) trong Excel và Word ?. Em không nhớ có phải là dùng hàm Vlookup không và dùng như thế nào?

Giúp em nhé.

Cám ơn mọi người rất nhiều,
Bạn gửi file lên rồi mọi người xem thì mới giúp bạn được chứ.
 
Đaị khái như thế này có được không? (Tôi thêm vào một cột thứ tự nưã)

Các cao thủ giúp bạn ý thêm nhé:
 
Lần chỉnh sửa cuối:
Nhiều người cứ nghĩ chỉ có word mới làm các văn bản được. Trong trường hợp cuả bạn, theo tôi nghĩ thì Excel hoàn toàn làm được , quan trong là bạn tạo cơ sở dữ liệu như thế nào? Chẵng hạn như thế này:

Phần 1. Lập bảng và nhập dữ liệu trong Excel rồi lưu lại và đặt cho nó một cái tên nào đó (Ví dụ Bang Luong T11-2007) rồi đóng Excel lại.

bangluong1.jpg



Mẫu Bảng Lương (Nên dùng Unicode)


Phần 2. Tạo mẫu và nhúng dữ liệu vào trong Word.

Bước 1. Tạo mẫu phiếu lương trong Word với đầy đủ thông tin cần in.


bangluong2.jpg

Nguồn:www.dantri.com.vn

Ở phần II bạn không nhất thiết phải trộn vào word mà có thể tạo một Sheet thứ hai để in (Dùng các công thức như If,Vlookup..)

Là một ví dụ để tạo bảng lương. Các mẫu in ấn khác, bạn cũng tạo ra như vậy. Tốt nhất bạn nên đưa file lên.
Ví dụ có 500 người , có tự động in ra hay mỗi người phải điều chỉnh bằng tay tôi chưa nghĩ ra
 
Ví dụ có 500 người , có tự động in ra hay mỗi người phải điều chỉnh bằng tay tôi chưa nghĩ ra

Bạn viết một đoạn VBA nho nhỏ, cho biến chạy từ 1-->500 rồi lần lượt in ra tương ứng. Bạn chỉ việc uống cafe ngồi nhìn máy nó chạy thôi. Đại khái như:
PHP:
Sub InTuDong()
Dim Zi, MaxNum as double
MaxNum = 500
   For Zi = 1 To MaxNum
      Sheets("TenSheetCuaBan").Range("DiaChiRangeCuaBan").value=Zi
      ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, _
      Collate:=True
   Next Zi
End Sub
 
Làm trên excel như vậy bạn phải copy nhiều lần , 700 thư chẳng hạn . Tôi nghĩ làm trên word tiện hơn
 
Làm trên excel như vậy bạn phải copy nhiều lần , 700 thư chẳng hạn . Tôi nghĩ làm trên word tiện hơn
Làm trên Word thì bạn vẫn phải thông qua excel thôi (dùng Mail Merge)! Với cách thiết kế form in liên tục trên excel này (viết VBA) thì 700 hay 7,000 hay 30,000 không phải là vấn đề. Vấn đề là bạn có kịp bỏ giấy vào để in hay không thôi!
 
matmotmi có thể chỉ mình cách làm 2 cái mũi tên đó ko?thấy thích wá mà chưa biết làm .

Chuột phải trên thanh công cụ >> chọn Control toolbox>>no hiện ra menu di động>.chọn Design Mode>> sau đó Double nick vào hai mũi tên đó>> sẽ thấy code đơn giản.
 
Trộn văn bản trong excel

Tôi đã làm mẫu giấy chứng nhận tốt nghiệp trong excel và có 1 sheet là danh sách hs được tốt nghiệp. Các bạn ơi, có cách nào giúp tôi trộn như Merge mail trong word kg? Bởi nếu không tôi phải gõ lại tên từng hs rồi in ra từng cái.
Tôi gửi file đính kèm theo đây.
Hãy giúp tôi với nhé! Thank you! /-*+/
 

File đính kèm

Bạn kiểm tra xem có đúng không? Có thể dùng VBA để điều khiển in toàn bộ hay từ trang nào đến trang nào
 

File đính kèm

Hy vọng cách tiếp cận ở đây sẽ giúp bạn được phần nào.
http://www.webketoan.vn/forum/showthread.php?p=408595#post408595
Nhìn chung có nhiều cách để làm, mỗi cách sẽ có hạn chế nhất định. Nhưng cảm nhận của tôi thì thấy rằng nên sử dụng tính năng trộn văn bản của các phần mềm xử lý văn bản hơn là dùng Excel mặc dù vẫn có thể bắt chước trong Excel được.
Trộn giả lập trong Excel dùng VBA, theo thiển ý tôi thấy có thể tiếp cận theo 2 hường.
1. Thiết kế một phom chuẩn có các vùng cần thay đổi và chạy chương trình để thay thế giá trị liên tục và in.
2. Thiết kế phom chuẩn và nhân bản form đó (trộn một lần xong hết văn bản nhưng khó theo dõi).
 
Lần chỉnh sửa cuối:
Không hẳn là Excel không làm được, mà còn tốt là đằng khác. Ví dụ mục nơi sinh chỉ tách lấy tỉnh thôi chắc Merge của Word còn mệt. Mình thử 1 chút xem sao.
 

File đính kèm

Lần chỉnh sửa cuối:
Trộn tài liệu trong Excel - Học thầy không tày học bạn!!!

Không hẳn là Excel không làm được, mà còn tốt là đằng khác. Ví dụ mục nơi sinh chỉ tách lấy tỉnh thôi chắc Merge của Word còn mệt. Mình thử 1 chút xem sao.
Cám ơn bạn Sealand. Bạn đã làm rất đúng ý mình đấy. Tuyệt lắm. Nhưng bạn ơi, ngày tháng năm sinh bị đảo lộn rồi. Phải làm sao đây? Mình chưa hiểu về VBA lắm, chỉ cho mình cách làm với nhé. Bạn đã làm bằng VBA và các công thức? Bạn có thể giải nghĩa các công thức đó cho minh hiểu được không vậy./-*+/
 
Bạn Format 2 ô C10 và C37 theo định dạng dd/mm/yyyy như sau
Chọn 2 ô C10 và C37-->Format-->Cells-->Chọn thẻ Number--> Ô Category chọn Custom sau đó gõ vào ô type : dd/mm/yyyy -->OK

Thực ra, bài này không có gì sử dụng VBA nhiều đâu mà chủ yếu dùng công thức để điền. Còn công thức thì mình giải thích không hay bằng tra cứu công thức ở chữ ký của BNTT Bạn nhấn vào đây và chọn ở chữ ký của bạn ấy nhé
 
Lần chỉnh sửa cuối:
Xin chào Anh Sealand lâu rồi em không đwợc gặp Anh; Chắc lâu nay anh vẫn khỏe! Chúc Anh luôn luôn khỏe để các em đwợc nhờ.Phần làm hóa đơn điện em làm tốt rồi, em không quên đwợc công của Anh; xin cảm ơn Anh! Bây giờ em có việc muốn nhờ Anh giúp đỡ; hàng tháng em muốn in thông báo tiền điện báo cho các hộ sử dụng điện biết trwớc số tiền điện sử dụng trong tháng để họ chuẩn bị, nhwng nếu ngồi điền họ tên ,địa chỉ, số kw, số tiền(bằng số, bằng chữ) cho từng hộ thì mất quá nhiều thời gian; Anh giúp em lập bảng trộn thông báo giúp em với em xin cảm ơn Anh nhiều!
 
Các bạn thấy sự giúp đỡ của mình có ích là hạnh phúc đối với mình rồi. Cám ơn bạn đã hỏi thăm.
Để nhanh nhất trên file của bạn, bổ xung thêm 1 sheet và soạn mẫu thông báo, mình sẽ ráp công thức và lệnh vào. Như vậy thông báo sẽ đúng như ý của bạn. Nếu file lớn thì gửi vào email: vieth@live.com
 
Minh sửa để in tối đa 56526 HS. Riêng cột B sheet Dsach chỉ ghi số TT

1/Code theo nút xem
Mã:
Sub xem_Click()
Dim tg As Long
Dim trang
ch = "IN GIAY CHUNG NHAN TN"
tg = Sheet2.[b56536].End(xlUp).Row - 10
tg = IIf(Int(tg / 2) = tg / 2, tg / 2, Int(tg / 2) + 1)
trang = InputBox("Xin cho biet xem tu trang nao:", ch, 1, 11000, 6000)
If trang <= 0 Or trang > tg Then GoTo thoat
For i = trang To tg
Sheet4.[k2] = i
kt = MsgBox("Co xem tiep cac trang con lai khong?", vbOKCancel, ch)
If kt = 2 Then Exit For
Next
thoat:
End Sub

2/Code cho nút in:
Mã:
Sub in_Click()
Dim tg As Long
Dim trang
tg = Sheet2.[b56536].End(xlUp).Row - 10
tg = IIf(Int(tg / 2) = tg / 2, tg / 2, Int(tg / 2) + 1)
MsgBox tg
Exit Sub
ch = "IN GIAY CHUNG NHAN TN"
trang = InputBox("Xin cho biet in tu trang nao:", ch, 1, 11000, 6000)

If trang <= 0 Or trang > tg Then GoTo thoat
For i = trang To tg
Sheet4.[k2] = i
Sheet4.PrintOut Copies:=1, Collate:=True
Next
thoat:
End Sub

3/Code xác định cực đại Spinbox
Mã:
Private Sub Worksheet_Activate()
tg = Sheet2.[b56536].End(xlUp).Row - 10
tg = IIf(Int(tg / 2) = tg / 2, tg / 2, Int(tg / 2) + 1)
Me.SpinButton1.Max = tg
End Sub
 

File đính kèm

Lần chỉnh sửa cuối:

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

Back
Top Bottom