AccessTr.neT
worde tablo transferinde tablo boyutu - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: worde tablo transferinde tablo boyutu (/konu-worde-tablo-transferinde-tablo-boyutu.html)



worde tablo transferinde tablo boyutu - kokotuna - 07/06/2012

Merhaba ekte BURADAN SEÇİN onay kutusu işaretli iken komut171 butonu ile worde tablo transferi yapılıyor... Bu tablonun enini 15cm yapmak yani sayfanın tamamına yaymak için kod vasıtasıyla bir çözüm bulunabilir mi?
Eğer çözüm yolu varsa kod nasıl değiştirilmeli?

Yardımlarınız için şimdiden teşekkürler...

TERZAGHİ.rar



Cvp: worde tablo transferinde tablo boyutu - ozanakkaya - 11/06/2012

WordApp.ActiveDocument.Range.Tables(1).Rows(1).Delete '**** Burayı ekledik. ****
kodunun hemen altına

Dim x As Integer
For x = 2 To 13

WordApp.ActiveDocument.Range.Tables(1).Columns(x).Width = "30"
Next x
kodu ekle.


Cvp: worde tablo transferinde tablo boyutu - kokotuna - 13/06/2012

verdiğiniz kod sadece 2. sütunun boyutunu değiştirdiği için başka tablolarda karışıklık oluşturuyo tüm tablonun boyutunu sayfaya sığdırmak için bir çözüm olabilir mi?


Cvp: worde tablo transferinde tablo boyutu - ozanakkaya - 14/06/2012

(13/06/2012, 16:39)kokotuna yazdı: verdiğiniz kod sadece 2. sütunun boyutunu değiştirdiği için başka tablolarda karışıklık oluşturuyo tüm tablonun boyutunu sayfaya sığdırmak için bir çözüm olabilir mi?

Verdiğim kod 1. sütun hariç tüm sütunların genişliğini 1,06cm olarak değiştirir. Koddaki "30"u değiştirerek genişliği arttırabilirsin.

Koddan önce,

[Resim: 13396279511.png]

Koddan sonra,

[Resim: 13396279512.png]


Cvp: worde tablo transferinde tablo boyutu - kokotuna - 27/06/2012

teşekkürler