Bài tập excel sử dụng macro

[bebe08]

Hi các bác!
Có bác nào có bài tập về macro (đơn giản thôi ạ, sử dụng code ít thôi), gửi cho em với.
Em đang cần một số bài tập để học hướng dẫn cho mấy bác phòng em đó mà. hehe
Thanks các bác nhiều ạ!

 

[SA_DQ]

Bạn hãy cho biết nghiệp vụ phòng bạn là gì được không?

& Bài tập có độ khó cỡ nào vậy?

Giúp mọi người có thêm vài thông tin chi tiết đi nha!

 

[bebe08]

Bạn hãy cho biết nghiệp vụ phòng bạn là gì được không?

& Bài tập có độ khó cỡ nào vậy?

Giúp mọi người có thêm vài thông tin chi tiết đi nha!


cảm ơn bác. tui gửi thêm các thông tin chi tiết nữa là:
- nghiệp vụ phòng mình là: nhập hàng và xuất hàng.
- Bài tập: chỉ cần thực hiện việc ghi macro bằng record thôi và sửa một chút code thôi bạn à. Mọi người chưa học lập trình nên không rành lắm. Chỉ là ghi và sửa chút thôi.
Cảm ơn các bác.

 

[khoavu87]

bạn thử bắt đầu với hai bài tập nhỏ con này xem?

chúc bạn thành côngđây mới là ba bài tập đơn giản mình chỉ có như vậy thôi

 

[bebe08]

chúc bạn thành công
đây mới là ba bài tập đơn giản mình chỉ có như vậy thôi

Cảm ơn bạn Khoavu nhé.
Nhưng cái code này chỉ làm cho vùng cố định thôi (copy bất kì, paste bất kì). Còn nếu vùng động thì phức tạp lắm bạn à. hihi. Thanks bạn nhiều nhé. Có bài tập thêm thì gửi cho mình với nhé.
Chào bạn

 

[khoavu87]

Bạn muốn tính tổng tại ô cuối cùng của cột J. Bạn có thể tìm dòng cuối cùng và dòng cuối cùng +1 là dòng mà bạn cần đặt công thức.
Ví dụ: dữ liệu từ J2:Jx
Bạn làm như sau:

'
PHP Code:
Private Sub CommandButton1_Click()
hang = Range("J2").End(xlDown).Row
Range("j" & hang + 1).Select
ActiveCell.FormulaR1C1 = "=sum(R2C:R[-1]C)"
End Sub

To mau
Sub TOMAU()
Selection.SpecialCells(xlCellTypeFormulas, 23).Select
Selection.Font.ColorIndex = 3
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
End Sub

Code AutoFill bằng VBA


PHP Code:
Sub AutoFill()
...........
End Sub


Giả sử bạn muốn
1- AutoFill ô D4 sang 5 cột:
PHP Code:
[d4].AutoFill [d4].Resize(, 5)


2- AutoFill ô D4 xuống 10 dòng:
PHP Code:
[d4].AutoFill [d4].Resize(10)


3- AutoFill dãy D415 sang 5 cột:
PHP Code:
[d4:d15].AutoFill [d4:d15].Resize(, 5)


Do mỗi câu lệnh AutoFill chỉ thực hiện được một chiều (cột hoặc dòng) nên tôi thường dùng cách sau



PHP Code:
[d4].Copy [d4].Resize(10, 5)

 

[SA_DQ]

Bạn đến đây tham khảo, mong rằng vừa tầm với các bạn

http://webkinhte.com/forum/showthread.php?t=1043
​

 

[bebe08]

Mình cảm ơn khoa nhé!

 

[bebe08]

in phiếu thu chi

Cho mình hỏi với các bác ơi!
Sao cái bài macro mẫu này mình chạy mà cứ bị báo lỗi nhỉ? Là macro hướng dẫn về "in phiêu thu chi"
Các bác xem giúp mình nhé!
Cảm ơn các bác nhiều.

 

[TrungChinhs]

Bạn sai ở chỗ màu đỏ (thiếu chữ C)
hang = Selection.Row

 

[yeuthamhangxom]

chúc bạn thành công
đây mới là ba bài tập đơn giản mình chỉ có như vậy thôi

anh khoavu cho em hỏi một câu. anh đừng mắng em nha vì em còn lắm em mới bắt đầu tự học VBA thôi.
Giả sử em có 1 file excel đã lập trình VBA rồi làm sao để nó chạy trương trình với những câu lệnh mình đã viết trong VBA ạ. anh hướng dẫn giúp em nha.
Cám ơn anh nhiều.