QUẢNG CÁO ĐẦU TRANG

**bkxd98** · 03-08-2006, 01:27 PM

Ðề: Ebook VBA

Ở giao diện chính của Acad, bác nhấn F1, chọn ActiveX Automation and VBA, sau đó chọn ActiveX and VBA Reference.
Ở đây có đủ các phần : Events, Methods, Properties, Code Examples.
Tôi đang dùng Acad2006, nếu bạn dùng phiên bản khác thì bạn tìm chữ ActiveX ... là được.

**duong2000** · 05-08-2006, 12:42 AM

Ðề: Ebook VBA

Lại fải cảm ơn bác bkxd98 lần nữa rồi.
Em tìm được như bác bảo rồi.
Lần trước em tìm nhầm.Em lại cứ tìm trong phần help ở giao diện của phần visual basic editor thế mới chết chứ.

**duong2000** · 05-08-2006, 12:59 AM

Ðề: Ebook VBA

Các bác cho em hỏi luôn cái này tí nhé.Trong VBA có cách nào cho nó tính toán 1 biểu thức ví dụ như : sin(9)+2^3 -log(12) khi mình nhập biểu thức này vào phần textbox.text không?
Em muốn thực hiện cái này nhưng khi nhập vào ô textbox thì nó ko thể tính đựơc vì biểu thức lúc này có dạng là As string mà
Còn làm thì em cũng làm đựơc theo cách thủ công nhưng mà mất công lắm các bác a.

**duong2000** · 14-08-2006, 01:56 AM

Ðề: Ebook VBA

Thôi mệt qúa rồi anh em giải trí tí đi
Sắp khai mạc giai ngoại hạng Anh rồi (English Premier League) bác nào Fan ruột của Arsenal thì làm quen đi.
Em thích ARSENAL cực kì luôn.

**bkxd98** · 27-08-2006, 04:46 PM

Ðề: Ebook VBA

Nguyên văn bởi duong2000

Các bác cho em hỏi luôn cái này tí nhé.Trong VBA có cách nào cho nó tính toán 1 biểu thức ví dụ như : sin(9)+2^3 -log(12) khi mình nhập biểu thức này vào phần textbox.text không?
Em muốn thực hiện cái này nhưng khi nhập vào ô textbox thì nó ko thể tính đựơc vì biểu thức lúc này có dạng là As string mà
Còn làm thì em cũng làm đựơc theo cách thủ công nhưng mà mất công lắm các bác a.

Lâu rồi tôi không vào forum này nên không đọc được câu hỏi của bạn.
Theo tôi biết thì không có cách nào khác để tính biểu thức đó ngoài cách bạn phải tách biểu thức ra thành từng phần... nói chung là khá phức tạp! (trừ khi bạn dự định viết phần mềm giống như máy tính tay thì hãy viết đoạn code này).
Tuy nhiên, nếu bạn đang viết code trên nền VBA for Excel thì bạn có thể lợi dụng nền Excel để tính nhanh biểu thức trên bằng cách gán biểu thức trên vào 1 cell nào đó trong Excel : cú pháp cells(1,1).formula="sin(9)+2^3 -log(12)" , rồi lấy giá trị đã được tính ra : cells(1,1).value (bạn có thể chọn thay cells(1,1) bằng 1 cell bất kỳ)
Nếu bạn có ý định viết đoạn code trên nền VBA for Acad, mà lúc chạy chương trình, Excel đang bật thì bạn cũng có thể dùng cách trên nhưng phải khai báo thêm 1 chút... (nếu bạn cần tôi sẽ hướng dẫn thêm)
Có thể sẽ còn cách khác, nếu bác nào biết vui lòng chỉ giúp !

**duong2000** · 27-09-2006, 12:20 AM

Ðề: Ebook VBA

Nguyên văn bởi PhanTuHuong

Bạn thử đoạn code này xem sao:

Sub AA()
Dim Dangcongthuc
Dangcongthuc = Application.InputBox("Vao so lieu la cong thuc(vi du nhu =2+5):", "Linh tinh", Type:=0)
If Dangcongthuc = False Then Exit Sub
Range("A1").Value = Dangcongthuc
End Sub

Vâng em đã thử rồi nhưng anh xem lại cho em hình như đây là mã cho vba in exel .Nếu là trong exel thì mọi chuyện sẽ dễ hơn rất nhiều vì nó nhận luôn cho mình còn em muốn hỏi cách làm trong acad cơ.Em kô muốn mình làm trong acad lại phải bật cái exel lên hơi bất tiện anh ạ. Anh xem có cách nào ko giúp em

QUẢNG CÁO ĐẦU TRANG

Thông báo

Ebook VBA

Ghi chú

Ghi chú

Ghi chú

Ghi chú

Ghi chú

Ghi chú

Quảng cáo cuối trang