Kết quả tìm kiếm cho từ khóa: Calendar

http://www.thanhnien.com.vn/News/Pages/200925/20090619225329.aspx

...1 Function để sửa (vì lo ngày tháng không hợp lệ) quả đúng là rách việc Vậy sao ta không dùng cách nào khác để bảo đãm chắc chắn Date chính là Date chuẩn ---> Dùng Calendar chẳng hạn ---> Tôi thấy cách dùng Calendar quá đơn giản, sao các bạn không dùng mà cứ phải rơi vào cái vòng lẩn quẩn kia chứ

...Me.TextBox4 = Me.ComboBox1.Column(1) End Sub 2/Cái phức tạp là bạn sử dụng Textbox để nhập ngày tháng. Người ta hay dùng Calendar hay Input Mask. Nhưng có 1 cách an toàn và chính xác ngày tháng là dùng hàm date() để chuyển đổi: Ví dụ TextBox2 ="25/06/2009" ng=textbox1.text ws.Cells(iRow...

Vụ này đã nói bao nhiêu lần trên diển đàn rồi --> Nhập liệu ngày tháng bằng TextBox có lúc cũng sẽ mệt đừ vì nó đấy Bạn xem kinh nghiệm tại bài này thì biết: http://www.giaiphapexcel.com/forum/showthread.php?t=23726 Cuối cùng cũng phải chuyển sang dùng Calendar

Bạn gữi file đang lổi lên xem thử (tình nghi bạn chưa vẽ Calendar)

Mình đã thay đổi từ Textbox sang Calendar, bạn tham khảo nhé Thân

...giản gõ thế nào chèn vào thế nấy đâu)... Phải làm tùm lum các thứ trong code mới hy vọng nó ra kết quả đúng Tôi cho rằng, với ngày tháng thì Calendar Control là lựa chọn thích hợp nhất (lại đơn giản nhất) Các bạn nghiên cứu xem (đáng tiếc máy tôi nó bị "điên".. không chèn Calendar vào...

...ngẩn Tốt nhất bạn hãy thử trên các định dạng dd/mm/yyyy và mm/dd/yyyy trong Control Panel để biết thêm chi tiết --------------- Nhập liệu phức tạp thì dùng UserForm chẳng nói làm gì... chứ với file đơn giản thế này, thà tôi nhập bằng tay (thêm hổ trợ Calendar và Validation) cảm thấy còn nhanh...

Cái này dể mà... đã có từng nói trong các bài nhập liệu ngày tháng bằng Calendar.. Bạn sửa code: Private Sub ComboBox1_Change() ActiveCell.Value = ComboBox1.Value End Sub thành: Private Sub ComboBox1_Change() With ActiveCell .Value = ComboBox1.Value .Offset(, 1).Select End With...

...Tôi vẽ nó ra rồi dùng code cho nó ẩn hoặc hiện theo điều kiện (chọn vào C3 hoặc C4 nó mới hiện) Được chứ... chẳng hạn thay: Private Sub Calendar1_Click() ActiveCell = Calendar1.Value End Sub Thành: Private Sub Calendar1_Click() ActiveCell = Calendar1.Value Calendar1.Visible = False...

Em đã đăng ký xong MSCAL.OCX rồi mà sao không thấy cái calendar control 8.0 là sao vậy các bác nhỉ?

Bạn mở form ở dạng Design trên thanh công cụ bạn click chọn more controls... tìm Calendar Control, chọn nó, xong vẽ vào form là được. Thân

Em đã đăng ký file mscal.ocx OK rồi, nhưng vẫn không tìm tháy cái calendar trong toolsbar option, bác hướng dẫn thêm cho em với nhé

Máy bạn có control MSCal.OCX chưa? Nếu không bạn tải ở đây nhé: http://www.fontstuff.com/mailbag/qvba01.htm Thân

Cám ơn bác, bác hướng dẫn cho em lấy cái Calendar này với, em tìm mãi mà không ra được

File của bạn mình mở không được chắc có lẽ máy mình thiếu control nào đó, nếu bạn gặp trục trặc về DTPicker sao bạn không chuyển qua cách khác, dùng Calendar chuyển Calendar vào textbox chẳng hạn. Bạn tham khảo file đính kèm nhe. Thân

Nói thêm cái này để mọi người chú ý: Xài cái DateTimePicker so với Calendar Control cũng bị điên giống vậy mà có phần điên hơn. Xem file thí dụ, là 1 bảng dữ liệu nhập bằng form, chọn ngày tháng bằng DateTimePicker. Rồi dùng công thức thông thường tính tổng với 1 điều kiện hoặc 2 điều kiện về...

Nghe chừng có lý! Nếu vậy nó có tương đương với: ThisWorkbook.Names("DateVal").Value = CDbl(Calendar1.Value) Hoặc ThisWorkbook.Names("DateVal").Value = Clng(Calendar1.Value) không ta? Ẹc... Ẹc...

Xin tò te góp thêm một cách khắc phục nữa. Em thì không chơi *1 vào Calendar.value, vì hổng hiểu sao vẫn có lúc nó sai. Em chơi cái này: ThisWorkbook.Names("DateVal").Value = Format(Calendar1.Value, "#") Khi đó thì tha hồ mà định dạng cho B1, định dạng kiểu nào nó ra kiểu ấy, không phụ...

Em kiểm tra rõ rằng giá trị của name DateVal là SỐ cơ mà (đâu phải text nhỉ) Ẹc... Ẹc... món DateSerial(Year(Cld1), Month(Cld1), Day(Cld1)) em đã thử từ chiều rồi... đúng là trớt qướt