CẦN GIÚP ĐỠ VỀ CODE SAU

[ngo khac huy]

Chào các Anh(Chị) em có dòng code chạy thời gian tự động & Chữ đổi màu trong excel 2013
Em chưa biết sử dụng code nào để ngừng thời gia chạy, và chỉ chạy thời gian trong 1 Sheet mình qui định & 1 dòng (range) mình chọn. Em chỉ mới bắt đàu học VBA thôi, nên còn yếu kém lắm. Nhờ các Anh(Chị) trợ giúp em code sau:

sub thoigian()
Application.Ontime Now + Timevalue("00:00:01"), "donghochay"
[A1:a3]Font.ColorIndex = 7
End Sub
sub donghochay()
Application.Ontime Now + Timevalue("00:00:01"), "thoigian"
[A1:a3]Font.ColorIndex = 7
End sub

 

[ndu96081631]

Em chỉ mới bắt đàu học VBA thôi, nên còn yếu kém lắm.

- Mới bắt đầu mà học chi mấy trò màu mè cho cực thân vậy bạn? Tại sao không học từ cơ bản, những thứ có ích hơn?
- Mới bắt đầu thì nên học NỘI QUY trước nha bạn ---> Nói chung cái tiêu đề bài viết của bạn chẳng nói lên được điều gì, nó quá chung chung. Vậy liệu bạn có thể nghĩ ra được một tiêu đề nào khác rõ nghĩa hơn không?

 

[tts.spktnd]

Chào các Bạn.
Tôi dân ngoại đạo về VBA( Tôi còn không biết lập tiêu đề để nhờ mọi người giúp đỡ...Nên phải dựa vào tiêu đề này) .Trong công việc Tôi cần Excel thu thập dữ liệu và tính toán sau đó gửi dữ liệu để trả lời cho thiết bị ngoại vi thông qua cổng COM1. Về phần tính toán ..nó đơn giản nên tôi làm được.Về xuất nhập qua cổng COM ...Tôi đã đọc xong khó hiểu quá nên không làm được.
Bài toán giả định Tôi muốn nhờ các Bạn giúp Tôi:
Ô A1 sẽ nhận dữ liệu từ cổng Com1 (dữ liệu thay đổi theo thời gian).Sau khi tính toán sẽ gửi dữ liệu ra A2
Dữ liêu ở ô A2 sẽ gửi qua cổng COM cho thiết bị ngoại vi.
Tôi nhờ các Bạn viết code cho Tôi, có trường chú giải thì càng tốt để tôi dễ sử dụng.
Mong được sự giúp đỡ của các Bạn.
Trân thành cảm ơn các Bạn.