Sütun Genişliği

[eksper]

Günaydın;

Çalışma kitabı açıldığında C ve D sütunlarının genişliğinin 10 olması için hangi kodu yazmalıyım. Teşekkürler.

 

[mehmett]

Şöyle bir kod olabilir;

[vb:1:8f8df248ab]Sub auto_open()
Range("C11").Select
Selection.ColumnWidth = 10
End Sub[/vb:1:8f8df248ab]

 

[eksper]

Range("C : D").Select
Range("C : D").ColumnWidth = 10

şeklinde değiştirdim, sütunları seçiyor ancak genişliği değiştirmiyor. Teşekkürler.

 

[hakanbolat]

Alıntı:
Range("C : D").Select
Range("C : D").ColumnWidth = 10

şeklinde değiştirdim, sütunları seçiyor ancak genişliği değiştirmiyor. Teşekkürler.

Range("C1 : D1").Select
Range("C1 : D1").ColumnWidth = 10 (Denermisin Lütfen..)

 

[eksper]

Slm;

Önerdiğiniz kodu sayfa aktif olduğunda ya yerleştirdim oldu. Teşekkürler.

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Range("C1:E1").Select
Range("C1:E1").ColumnWidth = 12
End Sub