tạo macro ghi ngày tháng

Liên hệ QC

nguyendangkhoi

Thành viên chính thức
Tham gia
18/2/09
Bài viết
59
Được thích
5
Chào các thầy cô trên dien đàn GPE, em có vấn đề này nhờ các thầy các cô hướng dẫn hộ em.

em có làm 1 cái form và có 1 text box để nhập ngày, và 1 nút nhấn để ghi vào Excel. Nhờ các thầy cô hướng dẫn em một số vấn đề sau.

1/ Em muốn text box đó khi gõ vào nó sẽ thể hiện dạng nàgy là dd/mm/yyyy (ví dụ em gõ vào ngày 09/03/2009 thì nó sẽ hiện là 09/03/2009)
2/ Khi em nhấn nút nhấn ghi vào excel thì nó sẽ ghi dữ liệu ngày từ text box vào excel có dạng là ------ Thành phố HCM, ngày 09 tháng 03 năm 2009

Cám ơn các thầy cô
 
Bạn xem file đính kèm nhé. Bạn nhấn Ctrl+L để chạy Form nhé.
 

File đính kèm

Upvote 0
Cái này đơn giản thôi, Bạn vào Format/cells../chon Num và định dạng như ví dụ gửi lại cho bạn đây.
 
Lần chỉnh sửa cuối:
Upvote 0
Em không biết anh có thể hướng dẫn cụ thể cách sài được không ah.

sao nó cứ báo chọn o nhập là sao ?
Form ấy thiết kế thiếu mất RefEdit nên không chạy là phải rồi
Sửa lại đây
Tuy nhiên tôi nhận thấy rằng với việc nhập ngày tháng thì cần gì đến UserForm quá hoành tráng thế kia ---> 1 cái Calendar Control cũng đủ rồi
 

File đính kèm

Upvote 0
Em muốn là mình nhập vào o text box 25/03/2009 là nó sẽ ra là

Thành phố HCM, ngày 25 tháng 03 năm 2009

nhờ các anh hướng dẫn
 
Lần chỉnh sửa cuối:
Upvote 0
Em muốn là mình nhập vào o text box 25/03/2009 là nó sẽ ra là

Thành phố HCM, ngày 25 tháng 03 năm 2009

nhờ các anh hướng dẫn

sao bạn không dùng công thức đỡ phức tạp hơn không. muốn nó hiện ở ô nào thì gán vào ô đó thôi

="Thành Phố HCM "&CHOOSE(WEEKDAY(NOW()),"Chủ nhật","Thứ hai","Thứ ba","Thứ tư","Thứ năm","Thứ sáu","Thứ bảy")&", ngày "&DAY(NOW())&" tháng "&MONTH(NOW())&" năm "&YEAR(NOW())
 
Upvote 0
sao bạn không dùng công thức đỡ phức tạp hơn không. muốn nó hiện ở ô nào thì gán vào ô đó thôi

="Thành Phố HCM "&CHOOSE(WEEKDAY(NOW()),"Chủ nhật","Thứ hai","Thứ ba","Thứ tư","Thứ năm","Thứ sáu","Thứ bảy")&", ngày "&DAY(NOW())&" tháng "&MONTH(NOW())&" năm "&YEAR(NOW())

Dạ cám ơn chị - nhưng mà trường hợp của em có thể là bán hàng bữa nay nhưng mình ghi ngày khác. Và em cũng đã làm xong máy fần khác bằng form rồi nhưng còn 1 vấn đề này là chưa ra !$@!!. (thí dụ bữa nay là ngáy 09/03/2009 nhưng có thể trên hóa đơn của em ghi ngày 25/02/2009 chẳng hạn vì vậy em mới muốn là nhập vào text box 25/02/2009 và khi nhấn nút nó sẽ ghi vào Excel là ----- Thành phố HCM, ngày 25 tháng 02 năm 2009
 
Upvote 0
Vậy sao không dùng Format Cells?
Tại cái ô mà bạn muốn nhập ngày tháng năm bán hàng đó, bạn chọn nó, nhấn Ctrl+1 để gọi hộp thoại Format Cells, chọn Custom, rồi gõ vào trong khung Type cái này:
"Tp. HCM, ngày" dd "tháng" mm "năm" yyyy
000-490.jpg
Xong nhấn OK.

Cái ô đó, nếu không có ngày tháng ở trỏng thì nó vẫn trắng trơn, nhưng bạn thử nhập ngày tháng năm vào xem (chẳng hạn: 9/3/2009), nó ra cái gì là biết liền.
 
Upvote 0
Vậy sao không dùng Format Cells?
Tại cái ô mà bạn muốn nhập ngày tháng năm bán hàng đó, bạn chọn nó, nhấn Ctrl+1 để gọi hộp thoại Format Cells, chọn Custom, rồi gõ vào trong khung Type cái này:
000-490.jpg
Xong nhấn OK.

Cái ô đó, nếu không có ngày tháng ở trỏng thì nó vẫn trắng trơn, nhưng bạn thử nhập ngày tháng năm vào xem (chẳng hạn: 9/3/2009), nó ra cái gì là biết liền.


dạ nhưng mà nhập nàgy 10 đến 30 nó không hiển thị ạh
 
Upvote 0

File đính kèm

Upvote 0
dạ hình như em hiuể rồi tự em để dạng nàgy sai
 

File đính kèm

Lần chỉnh sửa cuối:
Upvote 0
dạ em có đưa hình lên dây ah. từ ngày 13 trrở đi nó không hiểu ạh (em xin lỗi hồi nãy gõ lộn)
Ủa, cái ô B4 tôi đâu có định dạng đâu, chỉ có mỗi ô B3 là nó ra như thế thôi. Bạn thử gõ 19/3 vào trong ô B3 xem?
Còn nếu muốn mấy ô dưới cũng ra như thế, thì bạn phải copy định dạng từ ô B3 xuống cho các ô đó.

À tôi hiểu rồi, bạn gõ tháng trước ngày sau chứ gì? Cho nên Excel nó hỏng hiểu tháng 13 là tháng mấy... Phải thế không?
 
Upvote 0
Ủa, cái ô B4 tôi đâu có định dạng đâu, chỉ có mỗi ô B3 là nó ra như thế thôi. Bạn thử gõ 19/3 vào trong ô B3 xem?
Còn nếu muốn mấy ô dưới cũng ra như thế, thì bạn phải copy định dạng từ ô B3 xuống cho các ô đó.

À tôi hiểu rồi, bạn gõ tháng trước ngày sau chứ gì? Cho nên Excel nó hỏng hiểu tháng 13 là tháng mấy... Phải thế không?

dạ đúng thế ạh em chưa chỉnh trong setting control panel nên em thử gỏ 19/03/2009 nó hiểu là tháng 19 nên nó không ra là đúng rồi cám ơn anh rất nhiều
 
Upvote 0
Vậy sao không dùng Format Cells?
Tại cái ô mà bạn muốn nhập ngày tháng năm bán hàng đó, bạn chọn nó, nhấn Ctrl+1 để gọi hộp thoại Format Cells, chọn Custom, rồi gõ vào trong khung Type cái này:
000-490.jpg
Xong nhấn OK.

Cái ô đó, nếu không có ngày tháng ở trỏng thì nó vẫn trắng trơn, nhưng bạn thử nhập ngày tháng năm vào xem (chẳng hạn: 9/3/2009), nó ra cái gì là biết liền.

cái này hay quá cám ơn anh BNT -=.,,
 
Upvote 0
Bạn thay A1 bằng một ô ở ngoài vùng in.
="Thành phố Hồ Chí Minh, ngày "&DAY(A1)&" tháng "&MONTH(A1)&" năm "&YEAR(A1)
 
Upvote 0
Dạ cám ơn chị - nhưng mà trường hợp của em có thể là bán hàng bữa nay nhưng mình ghi ngày khác. Và em cũng đã làm xong máy fần khác bằng form rồi nhưng còn 1 vấn đề này là chưa ra !$@!!. (thí dụ bữa nay là ngáy 09/03/2009 nhưng có thể trên hóa đơn của em ghi ngày 25/02/2009 chẳng hạn vì vậy em mới muốn là nhập vào text box 25/02/2009 và khi nhấn nút nó sẽ ghi vào Excel là ----- Thành phố HCM, ngày 25 tháng 02 năm 2009


nếu mà bạn muốn dùng nút nhấn thì làm thử cách này xem
Sheet1.Cells(2, 1) = "Thành phố Hồ Chí Minh, ngày "&DAY(TB)&" tháng "&MONTH(TB)&" năm "&YEAR(TB)

TB là tên testbox của bạn
 
Upvote 0
Web KT

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

Back
Top Bottom