Đến nội dung


Hình ảnh
- - - - -

Có sự khác biệt giữa VBA CAD với VBA Office


  • Please log in to reply
3 replies to this topic

#1 hoa35ktxd

hoa35ktxd

    biết lệnh move

  • Members
  • PipPipPip
  • 125 Bài viết
Điểm đánh giá: 38 (tàm tạm)

Đã gửi 19 March 2010 - 10:26 PM

Trong Word hay Excel ta có thể dùng đoạn mã sau để đưa Form về vị trí BottomRight của màn hình (Góc dưới, bên phải):
Me.move Application.Width - Me.Width, Application.Height - Me.Height
Nhưng trong Cad thì không đúng, form sẽ chạy ra khỏi màn hình, vậy không hiểu có sự khác nhau như thế nào giữa CAD và các ứng dựng của Microsoft.
Mới làm quen với VBA CAD nên còn nhiều lúng túng, rất mong nhận được sự giúp đỡ của mọi người.
  • 0

#2 phantuhuong

phantuhuong

    biết dimstyle

  • Moderator
  • PipPipPipPipPip
  • 383 Bài viết
Điểm đánh giá: 200 (khá)

Đã gửi 24 March 2010 - 09:24 PM

Trong Word hay Excel ta có thể dùng đoạn mã sau để đưa Form về vị trí BottomRight của màn hình (Góc dưới, bên phải):

Me.move Application.Width - Me.Width, Application.Height - Me.Height
Nhưng trong Cad thì không đúng, form sẽ chạy ra khỏi màn hình, vậy không hiểu có sự khác nhau như thế nào giữa CAD và các ứng dựng của Microsoft.
Mới làm quen với VBA CAD nên còn nhiều lúng túng, rất mong nhận được sự giúp đỡ của mọi người.


Theo tôi không có gì khác biệt, vì khi tính vị trí của Form, người ta dùng thuộc tính Top, Left với đơn vị là point (1 inch bằng 72 point). Giá trị Application.Width trong AutoCad = 1296, còn giá trị Application.Width trong Excel = 972 thôi. Nghĩa là có sự khác nhau về sử dụng màn hình của 2 ứng dụng. Từ đó bằng kiến thức toán học bạn xác định được vị trí mong muốn.
  • 2
Bồi dưỡng Excel & VBA cho các đơn vị ở Hà Nội và khu vực lân cận

Từng bước loại đồ Tàu ra khỏi cuộc sống!


#3 hoaletrang

hoaletrang

    biết vẽ line

  • Members
  • PipPip
  • 22 Bài viết
Điểm đánh giá: 5 (bình thường)

Đã gửi 25 March 2010 - 12:37 PM

Cảm ơn bạn, vậy là đã xác định được tỷ lệ tương quan giữa 2 APP.
  • 0

#4 hoa35ktxd

hoa35ktxd

    biết lệnh move

  • Members
  • PipPipPip
  • 125 Bài viết
Điểm đánh giá: 38 (tàm tạm)

Đã gửi 25 March 2010 - 09:05 PM

Thanks phantuhuong, nhìn nick của bác là thấy tin tưởng luôn. Quả thật là tôi cũng đã nghĩ mãi mà không nghĩ ra cách thử kiểm tra giá trị trả về của cái hàm Application.width (heigth) trong Ofice và Cad.
  • 0