tạo dấu ngăn cách ngày tháng / / trong textbox ngày tháng (1 người xem)

[Rùa Con 1080]

Chào các anh chị.
Xin các anh chị chỉ cách tạo dấu xổ trong textbox ngày tháng năm như trong form này.
như textbox [ngày cấp SĐĐ],Ngày Cấp HK]
Chúc các anh chị ngày vui.

 

[be_09]

Chào các anh chị.
Xin các anh chị chỉ cách tạo dấu xổ trong textbox ngày tháng năm như trong form này.
Chúc các anh chị ngày vui.

TextBox chỉ dùng để nhập liệu chứ không có chức năng chứa danh sách như ListBox hoặc ComboBox.

 

[Rùa Con 1080]

Anh be09 có nhìn Form chưa, Form đó giông như form làm bên Sở Tài nguyên môi trường đó, nó là Texbox chứ gì.

 

[PacificPR]

Anh be09 có nhìn Form chưa, Form đó giông như form làm bên Sở Tài nguyên môi trường đó, nó là Texbox chứ gì.

Cái đó nó là ComboBox bạn à

 

[Rùa Con 1080]

Cám ơn Chị PacificPR, combobox sao không có mũi tên xổ xuống vậy chị, nếu được chị chỉ em cách làm với
Trong Form mấy combobox [Quốc Tich], [Giới Tính], [Loại SĐĐ] sao làm được dấu xổ xuống chỉ là một mũi tên đơn vậy chị.
Xin lỗi anh be09 nhe vì em cứ tưởng là TexBox.

 

[PacificPR]

Cám ơn Chị PacificPR, combobox sao không có mũi tên xổ xuống vậy chị, nếu được chị chỉ em cách làm với
Trong Form mấy combobox [Quốc Tich], [Giới Tính], [Loại SĐĐ] sao làm được dấu xổ xuống chỉ là một mũi tên đơn vậy chị.
Xin lỗi anh be09 nhe vì em cứ tưởng là TexBox.

Bạn tạo 1 combobox và 1 Name chứa vùng dữ liệu sau đó nhét nó vào RowSource của combobox

 

[Rùa Con 1080]

Bạn tạo 1 combobox và 1 Name chứa vùng dữ liệu sau đó nhét nó vào RowSource của combobox

Cái trên là chị chỉ cách làm dấu xổ ngày tháng năm hay tạo combobox có mũi tên đơn.
Em có hai Form này, nếu được nhờ chị thiết kế lại cho đẹp.
Mong chị xem trong Form2 có Combobox, sao dấu xổ xuống của em nó khác với combobox [Giới tính] của chị vậy.

 

[PacificPR]

Cái trên là chị chỉ cách làm dấu xổ ngày tháng năm hay tạo combobox có mũi tên đơn.
Em có hai Form này, nếu được nhờ chị thiết kế lại cho đẹp.

Úi cái Form trong File là quá đẹp rồi. Nói thật trong cuộc đời mình chưa làm được cái Form nào như của bạn đâu

 

[Rùa Con 1080]

Cũng là con gái, nên em cũng cố tạo cho nó nhìn "Bát mắt" một tý.
Thế còn dấu xổ ngày tháng năm chị ơi.
Của em cứ phải gỏ tay thủ công dấu xổ.

 

[PacificPR]

Khoản này thì mình thua rồi hì hì ...

 

[befaint]

tạo cho nó nhìn "Bát mắt" một tý

Như hình này có được không?

 

[Rùa Con 1080]

Cám ơn anh Befaint.
Anh có thể gửi em file anh làm với.
còn dấu / / trong combobox ngày tháng năm thì sao anh????

 

[Rùa Con 1080]

Xin các anh chị chỉ cách tạo dấu ngăn cách ngày tháng năm trong TextBox với, em xin đưa hình như trong Form của chị PacificPR (em có khoanh tròn)

 

[Rùa Con 1080]

xin các anh chị hướng dẫn cách làm dấu ngăn cách ngày tháng năm (/ /) trong các Texbox [Ngày cấp SĐĐ] và [Ngày cấp HK] trong Form trên của chị PacificPR.

 

[Rùa Con 1080]

Không được anh hpkhuong ơi.
ý là khi em gỏ 10 tháng 10 năm 2017 thì khi gỏ hết ngày 10 thi trỏ chuột tự nhảy sang dấu cách và gỏ tiếp tháng 10, hết 10 thì lại nhảy sang dấu cách và gỏ năm 2017
Cũng không được anh ơi.
Em nhớ như trong Access có làm được (vào mask gì đó)

 

[Hai Lúa Miền Tây]

Vấn đề này đã có nói từ rất lâu, tôi nhớ là Mr Okebab đã có làm rồi. Đây là dạng Input Mask tự tạo. Hãy tìm thử xem nhé.

 

[VetMini]

Em nhớ như trong Access có làm được (vào mask gì đó)

Mask là thuộc tính của RichTextBox, không phải TextBox thường.

 

[Hai Lúa Miền Tây]

Mask là thuộc tính của RichTextBox, không phải TextBox thường.

Trong textbox thường đó anh, nó có thuộc tính Input Mask.

 

[Rùa Con 1080]

Sao trong Textbox của em không có Input Mask Thầy ơi.
Chắc Form của Thầy Hai Lúa Miền Tây là trong Acess.

 

[Hai Lúa Miền Tây]

Sao trong Textbox của em không có Input Mask Thầy ơi.

Excel không có đâu bạn. Tôi đang nói Access, như bài viết ở trên thì bạn nên tìm bài của anh Mr OkBab về Input Mask ở Excel TextBox nhé.

 

[Rùa Con 1080]

Cám ơn Thầy nhiều.

 

[Rùa Con 1080]

Em tìm trong MrExel.com có code này, nhưng chưa đúng lắm.
Ví dụ em gỏ 10 tháng 10 năm 2017 thì đúng, nhưng gỏ 10 tháng 8 thì không tự hiện 10/08.
Mong các anh chị xem giúp.

 

[ndu96081631]

Em tìm trong MrExel.com có code này, nhưng chưa đúng lắm.
Ví dụ em gỏ 10 tháng 10 năm 2017 thì đúng, nhưng gỏ 10 tháng 8 thì không tự hiện 10/08.
Mong các anh chị xem giúp.

Khuyên bạn đừng bao giờ dùng cách này, bởi:
- Chẳng ai đi dùng TextBox để nhập ngày tháng cả (dùng công cụ sai mục đích)
- Có làm được thì cũng không tính toán được. Chuỗi trên textbox dù là cái gì cũng chỉ là text, cho dù nhìn chúng giống dạng ngày tháng
Tôi nghĩ nên dùng DTPicker hay hơn. Liên quan đến việc dùng DTPicker, bạn phải download file mscomct2.ocx về cho vào thư mục C:\windows\system32 và đăng ký nó thì mới sử dụng được

 

[Rùa Con 1080]

Cám ơn Thầy ndu.
Em hay thường lấy TextBox nhập ngày tháng năm, nhưng khi gán dữ liệu vào Sheet thì em convert nó thành Date,.
Tại vì em thấy tạo sẵn dấu cách này hay hay, nên cũng muốn sữ dụng.(đỡ phải gỏ dấu /)

 

[huuthang_bd]

Cám ơn Thầy ndu.
Em hay thường lấy TextBox nhập ngày tháng năm, nhưng khi gán dữ liệu vào Sheet thì em convert nó thành Date,.
Tại vì em thấy tạo sẵn dấu cách này hay hay, nên cũng muốn sữ dụng.(đỡ phải gỏ dấu /)

Bạn thử xem bên này nha.
http://www.giaiphapexcel.com/diendan/threads/tặng-file-mẫu-sử-dụng-textbox-với-input-mask.130366/

 

[Rùa Con 1080]

Cám ơn anh huuthang_bd nhiều.

 

[ndu96081631]

Cám ơn Thầy ndu.
Em hay thường lấy TextBox nhập ngày tháng năm, nhưng khi gán dữ liệu vào Sheet thì em convert nó thành Date,.
Tại vì em thấy tạo sẵn dấu cách này hay hay, nên cũng muốn sữ dụng.(đỡ phải gỏ dấu /)

Xin hỏi: Bạn đã convert như thế nào? Có thể bật mí được không?

 

[tungnguyen_kt]

Xin hỏi: Bạn đã convert như thế nào? Có thể bật mí được không?

chắc dùng cột phụ

 

[ndu96081631]

chắc dùng cột phụ

Gì đây? Định "thọc gậy bánh xe" à?

 

[Rùa Con 1080]

Dạ khi ghi vào Sheet thì code như vầy ah (em cũng chả biết đúng không , vì nhờ người khác làm),nhưng em thấy khi đập vào sheet là định dạng Date

Sheet2.Cells(irow + n, 2) = CDate(tb_Ngay)

Có gì, mong Thầy chỉ giáo.

 

[befaint]

Sheet2.Cells(irow + n, 2) = CDate(tb_Ngay)

Đâu có được. Tìm bài giải của thầy ấy chứ.
Tách cái chuỗi trong textbox thành 3 phần bởi "/" rồi cho vào DateSerial.

 

[ndu96081631]

Dạ khi ghi vào Sheet thì code như vầy ah (em cũng chả biết đúng không , vì nhờ người khác làm),nhưng em thấy khi đập vào sheet là định dạng Date

Sheet2.Cells(irow + n, 2) = CDate(tb_Ngay)

Có gì, mong Thầy chỉ giáo.

Tôi cũng đoán là bạn sẽ dùng CDate, nó gần tương tự như hàm DATEVALUE trên bảng tính và khẳng định đó là cách SAI LẦM. Lý do:
- Excel lấy thiết lập ngày tháng trong Control Panel làm chuẩn (chứ không phải bạn muốn gõ thế nào cũng được)
- Trong trường hợp bạn gõ trên textbox 2/8/2017 thì Excel sẽ xem đó là ngày 2 tháng 8 nếu Control Panel trên máy tính đang thiết lập d/M/yy và sẽ xem đó là ngày 8 tháng 2 nếu Control panel đang thiết lập M/d/yy
Vậy code của bạn nếu chỉ mình bạn xài trên máy của bạn thì không có vấn đề nhưng mang sang máy khác... hãy coi chừng ---> Sai 1 ly đi.. mút chỉ
--------------------
Bởi vậy mới khuyên bạn dùng DTPicker, đó mới là cách nhanh gọn, hợp lý mà không phải lo lắng về lâu dài

 

[Rùa Con 1080]

Đúng là trên máy em (ở nhà và công ty) định dạng ngày tháng năm là: dd/MM/yyyy nên em thấy đúng(và file của em không đưa cho máy nào khác)
Cám ơn Thầy.

 

[VetMini]

Tôi cũng đoán là bạn sẽ dùng CDate, nó gần tương tự như hàm DATEVALUE trên bảng tính và khẳng định đó là cách SAI LẦM. Lý do:
- Excel lấy thiết lập ngày tháng trong Control Panel làm chuẩn (chứ không phải bạn muốn gõ thế nào cũng được)
- Trong trường hợp bạn gõ trên textbox 2/8/2017 thì Excel sẽ xem đó là ngày 2 tháng 8 nếu Control Panel trên máy tính đang thiết lập d/M/yy và sẽ xem đó là ngày 8 tháng 2 nếu Control panel đang thiết lập M/d/yy
Vậy code của bạn nếu chỉ mình bạn xài trên máy của bạn thì không có vấn đề nhưng mang sang máy khác... hãy coi chừng ---> Sai 1 ly đi.. mút chỉ
--------------------
Bởi vậy mới khuyên bạn dùng DTPicker, đó mới là cách nhanh gọn, hợp lý mà không phải lo lắng về lâu dài

Picker thường chỉ dùng cho dạng form có tính cách tìm kiếm, ví dụ như đặt ngày lấy vé máy bay.
Text entry nhanh hơn nếu form thuộc loại dùng để nhập dữ liệu.

Nói thì nói vậy, chứ theo yêu cầu của chủ thớt thì có lẽ dùng DateTimePicker là đúng rồi.

 

[Rùa Con 1080]

download file mscomct2.ocx về cho vào thư mục C:\windows\system32 và đăng ký nó thì mới sử dụng được

phần đăng ký thì làm làm sao hả Thầy ndu?

 

[batman1]

Dạ khi ghi vào Sheet thì code như vầy ah (em cũng chả biết đúng không , vì nhờ người khác làm),nhưng em thấy khi đập vào sheet là định dạng Date

Sheet2.Cells(irow + n, 2) = CDate(tb_Ngay)

Bạn hoàn toàn có thể dùng TextBox nhưng phải hướng dẫn người dùng cách nhập.
Tôi tin rằng người khác đã có dòng trong UserForm_Initialize

TextBox1.Value = Format(Date, "Short Date")

để hướng dẫn cách gõ nhập ngày tháng.
Nếu bạn cải tiến và xóa dòng đó đi thì không nên ghi

vì nhờ người khác làm

vì lúc này không còn là của người khác nữa.
Nếu bạn sửa lại rồi đổ tội cho người khác thì ai còn dám giúp bạn?

 

[Rùa Con 1080]

Em xin lỗi Thầy Batman1, vì kiến thức không có nên em nghĩ dòng đó cứ là lấy ngày hiện tại,mà trong form thì em có thề nhập nhiều ngày, nên em bỏ dòng đó.
và cứ nhiều file giống nhau, nên em cứ coppy qua lại giữa các file.
Mong Thầy tha lỗi cho em (đây là lần thứ hai em bỏ bớt code của Thầy rồi đưa lên DD , lần thứ nhất là hỏi các dấu "#", "$"...)

 

[ndu96081631]

phần đăng ký thì làm làm sao hả Thầy ndu?

phần đăng ký thì làm làm sao hả Thầy ndu?

- Download file mscomct2.ocx về cho vào thư mục C:\Windows\System32
- Bấm Start và gõ từ khóa cmd để tìm Command Prompt. Click phải lên Command Prompt, chọn Run as Adminitrator
- Trong cửa sổ CMD, gõ lệnh regsvr32 mscomct2.ocx và Enter
Vậy là xong!
Hướng dẫn trên áp dụng cho Windows 32 bit

 

[Rùa Con 1080]

Em đăng ký bị lỗi Thầy ndu ơi.
Xin lỗi Thầy ndu, em gỏ lộn rồi.
Được rồi Thầy.

 

[Rùa Con 1080]

Đăng ký được rồi, nhưng lấy DTPicker làm sao Thầy ndu.

 

[ndu96081631]

Đăng ký được rồi, nhưng lấy DTPicker làm sao Thầy ndu.

Trong khung Toolbox Control ấy, cứ chọn vào DTPicker rồi vẽ vào UserForm thôi

 

[Rùa Con 1080]

Trong Toolbox Control không thấy DtPicker Thầy ndu ơi.