Est-il possible d'effacer ou de copier d'un seul coup une variable tableau

Bonjour à tous,

J'ai créé :

Public Grille_1_(22, 39) as Byte

Public Grille_2_(22, 39) as Byte

Est-il possible d'effacer* Grille_1_ d'un seul coup donc sans utiliser de boucle 'For' 'Next' ?

Est-il possible de copier d'un seul coup Grille_1_ dans Grille_2_ ?

Un grand merci par avance !

*De mettre toutes les valeurs à 0

Salut Excel-75011,

- pour effacer, ERASE Grille_1.
- pour copier sans FOR, ce que je ferais, coller Grille_1 "quelque part" dans l'océan de cellules d'une feuille (1.000.000 de lignes sur 16.000 colonnes, quand même) pour y copier aussitôt Grille_2.

A+

Bonjour à tous,

sans déclarer la dimension du 2nd tableau ça passe :

Sub test()
    Dim tabA(1 To 2, 1 To 3), tabB()
    tabA(2, 2) = 5
    tabB = tabA
    Erase tabA
    Debug.Print tabB(2, 2)
End Sub

eric

Ah, merci Eric, j'ignorais !
Par contre, j'ai du le passer ainsi pour que ça fonctionne...

Dim tTab, tData()
'
ReDim tTab(1 To 5, 1 To 5)
tTab = Range("A1:E5").Value
tData = tTab
Range("A10").Resize(UBound(tTab, 1), UBound(tTab, 2)).Value = tData

A+

Merci à vous deux pour vos idées que je vais tester...