maurogsc.eu mauro gamberini

home ==> Excel: come fare per ==> Matrice: copiare il contenuto di una matrice(Array) in un Range di celle

Matrice: copiare il contenuto di una matrice(Array) in un Range di celle - VBA

NOTA. La soluzione ed il codice sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dal codice o dalla soluzione proposta se usati impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare il codice o la soluzione in files importanti.

1 - Codice che copia il contenuto di una matrice nelle celle A1:C5 del Foglio1:

Public Sub m()

    Dim v() As Variant
    Dim rng As Range
    Dim sh As Worksheet
    Dim lCol As Long
    Dim lRiga As Long
    
    Set sh = ThisWorkbook.Worksheets("Foglio1")
    Set rng = sh.Range("A1:C5")
    
    'gli Array(matrici) sono in base 0
    ReDim v(4, 2)
    For lCol = 0 To 2
        For lRiga = 0 To 4
            v(lRiga, lCol) = "R" & lRiga + 1 & "C" & lCol + 1
        Next
    Next
    
    rng = v
    
    Set rng = Nothing
    Set sh = Nothing
    
End Sub

Vedi anche qui: Matrice: copiare il contenuto di un Range di celle in una matrice(Array)

Per ulteriori informazioni su Microsoft Excel ed il suo Visual Basic, utilizzate questo forum:
http://social.answers.microsoft.com/Forums/it-IT/officeexcelit/threads

Ultimo aggiornamento di questa pagina: 25/11/2010 - mauro gamberini