Co, giãn chữ trong word

[thanhnuce]

Cả nhà giúp mình viết code co, giãn chữ trong Word với. Mình chỉ biết Record Macro như này
Sub Co_chu()
With Selection.Font
.Spacing = -0.1
End With
End Sub
Sub Gian_chu()
With Selection.Font
.Spacing = 0.1
End With
End Sub
Nhưng nếu muốn co giãn hơn 0.2 thì mình lại không biết làm
Chân thành cảm ơn!

 

[VetMini]

Record macro lại, lần này thì chọn 0.2
Sau đó so sánh 2 code thì sẽ tìm ra chỗ cần sửa cho lần tới.

 

[thanhnuce]

Record macro lại, lần này thì chọn 0.2
Sau đó so sánh 2 code thì sẽ tìm ra chỗ cần sửa cho lần tới.

Xin lỗi vì mình diễn tả không đúng. Mình muồn là mỗi lần chạy code đó nó tăng thêm 0.1 đơn vị. Nếu là code trên nó chạy bao nhiêu thì vẫn là 0.1. Bạn giúp mình với!

 

[VetMini]

Sub Co_chu()
With Selection.Font
.Spacing = .Spacing - 0.1

Sub Gian_chu()
With Selection.Font
.Spacing = .Spacing + 0.1