AccessTr.neT
Excelden Worde Tablo Aktarmak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Soruları ve Cevapları (https://accesstr.net/forum-excel-sorulari-ve-cevaplari.html)
+--- Konu Başlığı: Excelden Worde Tablo Aktarmak (/konu-excelden-worde-tablo-aktarmak.html)



Excelden Worde Tablo Aktarmak - dd2708 - 24/10/2022

merhabalar konunun pek hakımı değilim ama excelde bir tabloyu resim formatında yada normal tablo seklinde atmak istiyorum ama calısma sayfas1 de buton yaptım bu buton yardımıyla tabloyu otomatık olarak aktarabilirmiyiz ekte dosyaları koyuyyorum . 

Sub wordtabloekle()

Dim wrd As Word.Application
Dim dok As Word.Document
Set wrd = New Word.Application

wrd.Visible = True

Set dok = wrd.Documents.Add

With wrd.Selection
.Style = "Başlık 1"
.TypeParagraph
.Style = "normal"
Sheets("sayfa2").Range("A1").CurrentRegion.Copy

.Paste

End With

End Sub