- Katılım
- 30 Ağustos 2009
- Mesajlar
- 51
- Excel Vers. ve Dili
- Microsoft Office Excel 2007 Almanca
Kod:
Sub dene()
Dim matrix(1 To 3, 1 To 2) As Integer
m(1, 1) = Range("A1").Value
m(1, 2) = Range("A2").Value
m(2, 1) = Range("B1").Value
m(2, 2) = Range("B2").Value
m(3, 1) = Range("C1").Value
m(3, 2) = Range("C2").Value
Open "C:\Veri\Dene\Test.TXT" For Output As #1
'Buraya ne yazacagim???
Close
End Sub
Tesekkürler