Tìm công thức tính tỉ lệ ColumnWidth và RowHeight để cell là hình vuông? (1 người xem)

[Pozsi]

Em có 1 cái đề của 1 thằng bạn hỏi mà em không biết phải làm sao cả?
Câu hỏi như sau: Bạn có thể tìm được tỉ lệ thích hợp cho ColumnWidth và RowHeight không, sao cho hình được tạo thành luôn là hình vuông? Tức là với cạnh là ColumnWidth thì sẽ tìm được 1 RowHeight tương ứng để Cells đó là 1 hình vuông.
Nghe mới đầu thấy dễ nhưng làm vào thì bí rùi.
Ví như:
ColumnWidth = 10 thì RowHeight = 50
ColumnWidth = 5 thì RowHeight = 25
ColumnWidth = 1 thì RowHeight = 8
ColumnWidth = 30 thì RowHeight = 160
Vậy là sao?
Có bác nào giúp được em không ạ?!

 

[ndu96081631]

Em có 1 cái đề của 1 thằng bạn hỏi mà em không biết phải làm sao cả?
Câu hỏi như sau: Bạn có thể tìm được tỉ lệ thích hợp cho ColumnWidth và RowHeight không, sao cho hình được tạo thành luôn là hình vuông? Tức là với cạnh là ColumnWidth thì sẽ tìm được 1 RowHeight tương ứng để Cells đó là 1 hình vuông.
Nghe mới đầu thấy dễ nhưng làm vào thì bí rùi.
Ví như:
ColumnWidth = 10 thì RowHeight = 50
ColumnWidth = 5 thì RowHeight = 25
ColumnWidth = 1 thì RowHeight = 8
ColumnWidth = 30 thì RowHeight = 160
Vậy là sao?
Có bác nào giúp được em không ạ?!

Hãy xem bài này:
http://www.giaiphapexcel.com/forum/showthread.php?15840-H%E1%BB%8Fi-v%E1%BB%81-Width-Properties&p=112908#post112908
Thí nghiệm trên cell A1 nhé:

Sub Test()
  With Range("A1")
    .RowHeight = .Width
  End With
End Sub