B
Được chị SweetNovember giúp thì còn gì bằng. :bigok:SweetNovember nói:Chị Dung ơi, mọi người đã đoóg học phí hết chưa, có cần sáng mai em đến sớm ko chi?
Được chị SweetNovember giúp thì còn gì bằng. :bigok:SweetNovember nói:Chị Dung ơi, mọi người đã đoóg học phí hết chưa, có cần sáng mai em đến sớm ko chi?
Đào Việt Cường nói:Dear M.Anh,
------------
Theo mình được biết thì các "thầy/cô giáo" ở Hà Nội ai cũng cũng bận cả. Chưa ai "chịu trách nhiệm về vụ đánh bom" này nên đến giờ vẫn chưa có ý kiến về vấn đề này (hình như bạn là người đầu tiên).
Theo mình hiểu thì để tổ chức được thành công, lớp học phải hội đủ rất nhiều các yếu tố, trong đó yếu tố về nhu cầu và trình độ sử dụng MS Excel của các thành viên là yếu tố quyết định.
Căn cứ tình hình thực tế thì dường như nhu cầu về học MSE và kế toán của các thành viên ngoài Bắc thấp hơn các thành viên trong Nam. (Không biết có phải vì trình độ sử dụng MSE và VBA của các mem miền Bắc cao hơn các mem miền Nam không!).
Theo quan sát của tôi thì các thầy giáo Bắc vẫn đang theo dõi những thành công của các thầy giáo Nam để tổ chức lớp học mang tính đột phá hơn!
Bạn gắng chờ thêm nhé!
(trong phần record macro đầu tiên.)Một add_ins đọc số (thành chữ)hoặc một cách nào đó có thể làm được như vậy.
Có nghĩa là trong phần phiếu thu phiếu chi chúng ta cần một add_ins đọc số thành chữ để phiếu thu, chi của chúng ta được hoàn chỉnh. Trong phạm vi của bài học thứ nhất tất nhiên là không thể hướng dẩn mọi người làm add_ins này nên chúng ta tận dụng những gì có sẳn để làm thôi.Thien Thanh_ nói:Em đọc tài liệu buổi học VBA đầu tiên(hôm đó em ko đi học được) thấy có chỗ ko nắm được:
(trong phần record macro đầu tiên.)Một add_ins đọc số (thành chữ)hoặc một cách nào đó có thể làm được như vậy.
Anh chị nào có thể nói rõ hơn dùm em được ko?!~
1. Bác để trú quán: Đà Nẳng! Liệu Bác có tham gia được ở Sài Gòn.Hoang Trang Anh nói:Chào các anh, chị!
Buổi học kế tiếp là ngày nào vậy? Trang Anh mong được đăng ký tham gia học chương trình này.
Mong tin các anh chị.
Trang Anh
thanhlongcom nói:Tôi chạy đoạn mã sau:
Sub GreetMe1()
Dim ThoiGian As Long
ThoiGian = InputBox("Nhap thoi gian")
If ThoiGian < 12 Then
GoTo Chao1
ElseIf (ThoiGian >= 12 And ThoiGian < 18) Then
GoTo Chao2
ElseIf ThoiGian >= 18 Then
GoTo Chao3
End If
Chao1:
MsgBox "Chao buoi sang"
Chao2:
MsgBox "Chao buoi trua"
Chao3:
MsgBox "Chao buoi chieu"
End Sub
Kết quả:
Nếu Thoigian < 12: Hiện lần lượt Chao1, Chao2, Chao3.
Nếu 12 <= Thoigian < 18: Hiện lần lượt Chao2, Chao3.
Mong các bác chỉ giúp tại sao lại như vậy
Xin cảm ơn.
thanhlongcom nói:Nếu Thoigian < 12: Hiện lần lượt Chao1, Chao2, Chao3.
Nếu 12 <= Thoigian < 18: Hiện lần lượt Chao2, Chao3.
Mong các bác chỉ giúp tại sao lại như vậy
Xin cảm ơn.
Sub GreetMe1()
___Dim ThoiGian As Integer
___ThoiGian = InputBox("Nhap thoi gian")
___If ThoiGian < 12 Then
_______GoTo Chao1
_______Chao1:
__________MsgBox "Chao buoi sang"
___ElseIf ThoiGian < 18 Then
_______GoTo Chao2
_______Chao2:
__________MsgBox "Chao buoi trua"
___Else
_______GoTo Chao3
_______Chao3:
__________MsgBox "Chao buoi chieu"
___End If
End Sub
Cayman nói:Mình thử sửa lại như sau :
Do Until ThoiGian = True
If ThoiGian < 12 Then GoTo Chao1 Else
If (ThoiGian >= 12 And ThoiGian < 18) Then GoTo Chao2 Else
GoTo Chao3
Chao1:
MsgBox "Chao buoi sang"
Exit Do
Chao2:
MsgBox "Chao buoi trua"
Exit Do
Chao3:
MsgBox "Chao buoi chieu"
Exit Do
Loop
End Sub
Bạn test xem sao :drummer:
Đây chỉ suy nghĩ của người chẳng biết VBA là gì, hì hì. Hy vọng các cao thủ trong WKT sẽ giúp được bạn nhiều hơn.
Theo mình bạn nên khai báo 1 biến chuỗi nữa; mọi việc sẽ sáng sủa hơn nhiều":Tôi có đoạn mã sau:
Sub GreetMe1()
Dim ThoiGian As Long
. . .End Sub
Kết quả: Nếu Thoigian < 12: Hiện lần lượt Chao1, Chao2, Chao3.
Nếu 12 <= Thoigian < 18: Hiện lần lượt Chao2, Chao3.
Lại thêm 1 anh thích lôi thôi đây!Sub GreetMe1()
Do
. . .
Chao1:MsgBox "Chao buoi sang"
Exit Do
Chao2: MsgBox "Chao buoi trua"
Exit Do
Chao3:MsgBox "Chao buoi chieu"
Exit Do
Loop
End Sub
Hy vọng chương trình có thể chạy đựoc theo ý của tác giả.
Cái này là cayman nói thiệt tình á ! Chỉ là cayman thấy người ta làm, dòm vô chút chút rồi hiểu chút chút thôi, chứ secret hổng thấy là cách làm của cayman không có hiệu quả sao, chỉ được cái là giải quyết vấn đề thôi. còn hay thì chưa hay. Các cao thủ sẽ bảo cách của cayman là lộn xộn, hi hi ...Secret_grasses nói:Hì hì, Cayman hổng biết gì về VBA mà nhận xét được lỗi lại còn đưa ra phương án trả lời nữa, vậy có tin được ko ha!:freddy: