hücre satır aralığının metne göre ayarlanması

[elvis]

Arkadaşlar, elimde bir excel çalışma sayfası var. burada a1 hücresinde uzunca bir metnim var. Benim istediğim; satır aralığının içindeki metnin uzunluğuna göre değişmesini sağlayan bir kod. Aşağıda ki kod bu işlemi otomotik olarak yapıyor. benim istediğim metnin uzunluğuna göre değişmesini sağlamak.

Range("A1").Select
Rows("1:1").EntireRow.AutoFit

burada bulunan AutoFit seçeneği metnin uzunluğuna göre aralığı değiştirmesi için nasıl yazılmalıdır? veya bununla ilgili bir çalışma var mı?

İlgili dosya ektedir.

 

[elvis]

Arkadaşlar yardımcı olacak yok mu? Şuan çok çaresizim...
Bu arada unutmadan tüm excel.web.tr moderatörleri ve üyelerinin Kurban Bayramını buradan kutlamak istiyorum. İyi bayramlar.

 

[elvis]

Arkadaşlar benimle ilgilenen biri var mı acaba? Merak ettiğimden soruyorum. Yoksa herkes bayram hazırlıklarına mı başladı?