Hiện tại mình có đoạn code marco như sau
Sub process()
'
' process Macro
'
' Keyboard Shortcut: Ctrl+y
'
Windows("search_result 8IS6.csv").Activate
Range("Q2").Select 'mình muốn tăng lên thành Q3, Q4... sau khi chạy xong 1 lượt xử lý
Selection.Copy
Windows("sample.xlsm").Activate
Range("B2").Select
ActiveSheet.Paste
Application.Run "sample.xlsm!Sheet2.Demo1"
Range("E2").Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("process").Select
ActiveWindow.SmallScroll Down:=-12
Range("G1").Select
ActiveSheet.Paste
Application.Run "sample.xlsm!Macro8"
Sheets("Summary").Select
Range("E8").Select 'mình muốn tăng lên thành F8, G8... sau khi chạy xong 1 lượt xử lý
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("F8").Select
End Sub
Mình đang muốn cho marco tự chạy và muốn sau khi chạy xong marco cho 1 dòng thì sẽ tự chạy dòng tiếp theo và paste vào dòng tiếp theo
Ở đây mình cần 1 vòng loop để số dòng(Q2->Q3->Q4...) tự tăng lên cho đến khi ko có dữ liệu trong ô đuợc chỉ định là blank thì ngừng lại. Nhưng do ko biết và mới làm với excel nên mong đc các bạn giúp đỡ
Sub process()
'
' process Macro
'
' Keyboard Shortcut: Ctrl+y
'
Windows("search_result 8IS6.csv").Activate
Range("Q2").Select 'mình muốn tăng lên thành Q3, Q4... sau khi chạy xong 1 lượt xử lý
Selection.Copy
Windows("sample.xlsm").Activate
Range("B2").Select
ActiveSheet.Paste
Application.Run "sample.xlsm!Sheet2.Demo1"
Range("E2").Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("process").Select
ActiveWindow.SmallScroll Down:=-12
Range("G1").Select
ActiveSheet.Paste
Application.Run "sample.xlsm!Macro8"
Sheets("Summary").Select
Range("E8").Select 'mình muốn tăng lên thành F8, G8... sau khi chạy xong 1 lượt xử lý
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("F8").Select
End Sub
Mình đang muốn cho marco tự chạy và muốn sau khi chạy xong marco cho 1 dòng thì sẽ tự chạy dòng tiếp theo và paste vào dòng tiếp theo
Ở đây mình cần 1 vòng loop để số dòng(Q2->Q3->Q4...) tự tăng lên cho đến khi ko có dữ liệu trong ô đuợc chỉ định là blank thì ngừng lại. Nhưng do ko biết và mới làm với excel nên mong đc các bạn giúp đỡ