quocct3000
Thành viên mới
![](/diendan/data/PhoToDanhHieu/gold.gif)
- Tham gia
- 24/9/09
- Bài viết
- 5
- Được thích
- 0
kính thưa các bác, mình có 2 macro:
1. Macro đổi chữ thường thành chữ Hoa
2. Macro hàm đếm Counta (D13
1000)
mỗi lần mở lên chạy từng cái hơi lu bu, các bác có cách nào cho nó chạy cùng lúc 2 macro được ko? hoặc ghép dùm mình 2 cái này thành 1 macro thì tốt quá. thanks các bác giúp nhe.
Macro 1
Sub Macro1()
' Loop to cycle through each cell in the specified range.
For Each x In Range("D13:E1000")
' There is not a Proper function in Visual Basic for Applications.
' So, you must use the worksheet function in the following form:
x.Value = Application.Proper(x.Value)
Next
End Sub
Marcro 2
Sub Macro2()
Range("J9").Formula = "=Counta(D13
1000)"
End Sub
1. Macro đổi chữ thường thành chữ Hoa
2. Macro hàm đếm Counta (D13
mỗi lần mở lên chạy từng cái hơi lu bu, các bác có cách nào cho nó chạy cùng lúc 2 macro được ko? hoặc ghép dùm mình 2 cái này thành 1 macro thì tốt quá. thanks các bác giúp nhe.
Macro 1
Sub Macro1()
' Loop to cycle through each cell in the specified range.
For Each x In Range("D13:E1000")
' There is not a Proper function in Visual Basic for Applications.
' So, you must use the worksheet function in the following form:
x.Value = Application.Proper(x.Value)
Next
End Sub
Marcro 2
Sub Macro2()
Range("J9").Formula = "=Counta(D13
End Sub