giúp sửa đoạn code thêm tiền, xin file theo dõi doanh thu quán càfê

[tuyenbui]

các anh chị pro giúp em hoàn thiện file này với, em muốn trong cột F (thêm), em muốn khi nhập xong cột mã hàng, cột số lượng và đơn giá thì nếu khách hàng gọi thêm jì mình sẽ tính tiền thêm, và ghi vào cột thêm, như trong file ví dụ em đính kèm, nếu khách kêu thêm jì đó giá trị 1000 thì khi em lick vào commanbutton thêm 1000 thì tại ô để chuột nó sẽ hiện lên 1000 (trong cột f). trong file trên em chỉ thêm được tại ô f5, em muốn bất kỳ ô nào trong cột f, khi lick vào thêm 1000 thì nó sẽ hiện tại ô đó (ô để chuột). và néu để chuột ngoài cột f thì khi lick vào nó sẽ hiện thông báo "nhập sai cột". anh chị nào biết giúp em với, em ko rành về bva lắm, em xin cảm ơn trước.

p/s: anh chị nào có file theo dõi doanh thu chi tiết quán cafê cho em xin với, em cảm ơn nhìu

 

[ndu96081631]

các anh chị pro giúp em hoàn thiện file này với, em muốn trong cột F (thêm), em muốn khi nhập xong cột mã hàng, cột số lượng và đơn giá thì nếu khách hàng gọi thêm jì mình sẽ tính tiền thêm, và ghi vào cột thêm, như trong file ví dụ em đính kèm, nếu khách kêu thêm jì đó giá trị 1000 thì khi em lick vào commanbutton thêm 1000 thì tại ô để chuột nó sẽ hiện lên 1000 (trong cột f). trong file trên em chỉ thêm được tại ô f5, em muốn bất kỳ ô nào trong cột f, khi lick vào thêm 1000 thì nó sẽ hiện tại ô đó (ô để chuột). và néu để chuột ngoài cột f thì khi lick vào nó sẽ hiện thông báo "nhập sai cột". anh chị nào biết giúp em với, em ko rành về bva lắm, em xin cảm ơn trước.

p/s: anh chị nào có file theo dõi doanh thu chi tiết quán cafê cho em xin với, em cảm ơn nhìu

Ai lại làm thế!
Thêm 1000 bấm 1 nút, thêm 2000 lại bấm nút khác... vân vân... Nếu thêm 10.000 chẳng lẽ bạn làm 10 nút à!
Tôi thì cho rằng mỗi lần bấm thì thêm 1000, bấm thêm lại thêm 1000
Vậy tôi đề nghị code như sau: (chỉ cần 1 nút nhấn)

Sub Them()
  If Not Intersect([F5:F1000], ActiveCell) Is Nothing Then
    ActiveCell = ActiveCell + 1000
  End If
End Sub

Cùng lắm có thể thêm 1 nút "Bớt" để nếu lở tay có thể bấm nút "Bớt" để giảm số tiền
(muốn "Bớt, thay dấu cộng thành dấu trừ)

 

[anhtuan1066]

Thử 1 chiêu khác, không có tí macro nào nhé!
Cứ chọn đại 1 cell trong cột F rồi bấm nút Tăng hoặc Giãm tùy ý!
Xem file

 

[tuyenbui]

trời! anh ndu sao lại nói vậy, anh coi có file quản lý doanh thu quán cafê ko cho em xin đi, cám ơn anh nhìu