Chỉnh Dimstyle Bằng VBA ?

[garupro 7]

Các bạn ơi làm sao để chỉnh được chỗ này bằng VBA vậy

[nvson 4]

1. Để thay đổi giá trị "Use overall scale of:"

ThisDrawing.SetVariable "DIMSCALE", 2.55

 

2. Để thay đổi giá trị "Text Placement/ Vertical"

Đặt giá trị từ 0-4 cho biến DimTAD

ThisDrawing.SetVariable "DIMTAD", 0

 

3. Để thay đổi giá trị "Text Alignment/ Horizoltal"

ThisDrawing.SetVariable "DIMTIH", 0

 

4. Để thay đổi giá trị "Text Alignment/ ISO Standard"

ThisDrawing.SetVariable "DIMTIH", 1

 

5. Để thay đổi giá trị "Text Alignment/ Aligned with dimension line"

'Ban tim hieu nha, minh chua ro

[DungOX-CMC 1]

cái này set 0 rồi 1 và ngược lại