- Katılım
- 3 Temmuz 2005
- Mesajlar
- 34
merhaba,
ben dosyamda 2.sayfadan 1. sayfaya veri aktarıyorum ama verilerin yazılacağı sütunları birleştirdim ve bu birleşik hücrelere veri kopyalıyorum ancak; yapışan veriler hücreye sığmayacak kadar uzun, hücrenin otomatik olarak yazının sığacağı kadar açılmasını istiyorum.
bu konudaki örnekleri inceledim ancak çözüm olmadı çünkü onlar sabit satır numarası ile çalışıyor oysa benim kullandığım satır numarası girilen değerlere göre bir değişken. Nerede hata yapıyorum ?
yardımlarınız için şimdiden teşekkürler.
hücrenin otomatik genişlemesi için kullandığım kodlar:
x = Len(satır)
y = x / 1
If y > 32 Then
Rows(satır).RowHeight = 409.5
Else
Rows(satır).RowHeight = 12.75 * y
End If
satır = satır + 1
Next a
satır = satır + 1
End If
Else
satır = 12
End If
ben dosyamda 2.sayfadan 1. sayfaya veri aktarıyorum ama verilerin yazılacağı sütunları birleştirdim ve bu birleşik hücrelere veri kopyalıyorum ancak; yapışan veriler hücreye sığmayacak kadar uzun, hücrenin otomatik olarak yazının sığacağı kadar açılmasını istiyorum.
bu konudaki örnekleri inceledim ancak çözüm olmadı çünkü onlar sabit satır numarası ile çalışıyor oysa benim kullandığım satır numarası girilen değerlere göre bir değişken. Nerede hata yapıyorum ?
yardımlarınız için şimdiden teşekkürler.
hücrenin otomatik genişlemesi için kullandığım kodlar:
x = Len(satır)
y = x / 1
If y > 32 Then
Rows(satır).RowHeight = 409.5
Else
Rows(satır).RowHeight = 12.75 * y
End If
satır = satır + 1
Next a
satır = satır + 1
End If
Else
satır = 12
End If