• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

İnce bir soru..

Katılım
6 Haziran 2007
Mesajlar
47
Excel Vers. ve Dili
vb
Arkadaşalar Merhaba!
O kadar araştırdım bulamadım.
Word de makro kaydederken tablo ekliyorum.(satır:1 , kolon:1 lik bir tablo.)ama nedense hep sayfa satırı boyunca çıkıyor.makro'yu duraklatıp küçültüyroum ama makro yu çalıştırırdığımda yine aynı boyutu alıyor!
Nasıl her defasında ayarladağım boyda çıkmasını sağlayabilirim...ayrıca 3 tane tabloyu kod ile nasıl yanayana ekleyebilirim!
*Arkadaşalr makroyla yapmak istedğim olayı word sayfası olarak gönderdim.Ben bu olayı makroyla yapmak istiyorum word de Teşekkürler!
 
Aşağıdaki kodu çalıştırıp deneyiniz. Metin Kusu ile yapılmıştır.

Sub Makro16()
ActiveDocument.Shapes.AddTextbox(msoTextOrientationHorizontal, 70.85, _
70.85, 99#, 126#).Select
Selection.ShapeRange.TextFrame.TextRange.Select
Selection.Collapse
Selection.ShapeRange.Select
With Selection
.ShapeRange.Duplicate.Select
.ShapeRange.IncrementLeft 96#
.ShapeRange.IncrementTop -12#
.ShapeRange.Duplicate.Select
.ShapeRange.IncrementLeft 96#
.ShapeRange.IncrementTop -12#
.EndKey Unit:=wdStory
End With
End Sub
 
Geri
Üst