/VBA/Label de tableau dans des label.text en VBA

Label de tableau dans des label.text en VBA

Sub tableaux()
 Dim tableauLabel As Label(,) = {{Label1, Label2, Label3}, {Label4, Label5, Label6}, {Label7, Label8, Label9}}
 ' il y avait une virgule en trop entre les deux dernières accolades
 Dim TA(,) As String = New String(2, 2) {{"A", "B", "C"}, {"a", "b", "c"}, {"c", "d", "e"}}
 Dim i As Long
 Dim j As Long
 For i = 0 To 2
  For j = 0 To 2
  tableauLabel(i, j).Text = TA(i, j)
  Next j
 Next i
End Sub

Source: social.msdn.microsoft.com

Similar codes

1 vote363 views1 answer
Export datagridview to excel vb.net
VBA
0 vote356 views1 answer
Vba keep command window open
VBA
4 votes342 views1 answer
Excel vba determine number of elements in an array
VBA
0 vote315 views1 answer
Vb.net round to 2 decimal places
VBA
7 votes361 views1 answer
Vba array declaration
VBA
0 vote341 views1 answer
How to use if condition in time vba
VBA
0 vote337 views1 answer
Vbs send keys
VBA
0 vote331 views1 answer
Excel vba copy entire sheet paste values
VBA
0 vote371 views1 answer
Pivot data source not accepting table named range vba
VBA
0 vote363 views1 answer
Iterate all file in a folder vba
VBA