arkadaşlar dün geceden beri bu sorunla cebelleşiyorum, diğer konularım kapanmadı diye de, daha doğrusu cevap da gelmedi diye de yeni konu açmakta çekindim açıkçası. ama artık çok sıktı bu durum beni. outlook bünyesinde kodum var ki buna göre; yeni bir Excel dosyası oluşturup açıyor buraya kadar çalışıyor ama ben açık olan o sayfaya cells(0,0) yöntemiyle değer giremiyorum, çok ilginçtir Range("a1").Value= "deneme" şeklinde veri girişi oluyor ama bana Cells() yöntemi lazım çünkü bir dizideki değerleri aktarmam gerekiyor, neden cells yöntemi ile veri girilemiyor, halbuki üst tarafta obje yaratma ve set etme olaylarını hallettiğim halde... yardımcı olursanız çok ama çok memnun olurum, dünden beridir cebelleşiyorum, araştırmalar yapıyorum yok yok...şimdiden teşekkürler
...buraya kadarki kodlarım iş gördüğünden yazmadım, ne oluyorsa bundan sonraki kısımlarda oluyor,
Dim uygulama As Object
Dim kitap As Object
Dim sahife As Object
'Dim uygulama As New Excel.Application
'Dim kitap As Excel.Workbook
'Dim sahife As Excel.Worksheet
Set uygulama = Excel.Application
uygulama.Visible = True
Set kitap = uygulama.Workbooks.Add
kitap.Activate
Set sahife = kitap.Worksheets(1)
Dim varList As Variant
Dim i As Long, j As Long
For i = LBound(dizi, 2) To UBound(dizi, 2)
For j = LBound(dizi, 1) To UBound(dizi, 1)
''''Range("a1") = "slm" ---> bu oluyor ama...
sahife.Cells(j,i)=dizi(j,i) -----> burası olmuyor
Next j
Next i
End If
Son Düzenleme: 04/06/2022, 13:54, Düzenleyen: tarkanaykın.