2016-06-15 6 views
-1

У меня есть массив с 4 столбцами и около 25 строк. Я хочу знать, как экспортировать его на лист excel. Я бы хотел, чтобы элементы в массиве сразу отображались на листе excel при запуске.Как экспортировать массив в рабочий лист Excel?

Dim матрица (4,25) As String

+0

http://stackoverflow.com/help/how-to-ask – Jeremy

+0

Возможный дубликат [В VB.Net, как написать массив в Excel] (http://stackoverflow.com/questions/ 22691009/в-VB-нет- как к записи-ан-массив к первенствует) – aphoria

ответ

0

Предполагая, что вы хотите сделать это в vb.net, это должно сделать это.

Sub Main() 
    Dim oExcel As Object = CreateObject("Excel.Application") 
    Dim oBook As Object = oExcel.Workbooks.Open("C:\Book1.xlsx") 
    Dim oSheet As Object = oBook.Worksheets(1) 
    Dim matrix(4, 25) As String 
    Dim i As Integer 
    Dim j As Integer 

    'populate matrix 
    For i = 1 To 4 
     For j = 1 To 25 
      matrix(i, j) = i & " " & j 
     Next j 
    Next i 

    'move to excel worksheet 
    For i = 1 To 4 
     For j = 1 To 25 
      oSheet.cells(j, i).Value = matrix(i, j) 
     Next j 
    Next i 

    'Save this Excel document 
    oBook.SaveAs("C:\Book1.xls", True) 
    oExcel.Quit() 
End Sub