/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

0 vote131 views1 answer
Vba test optional argument
VBA
0 vote113 views1 answer
Le contrôle SpinButton (Toupie)
VBA
0 vote124 views1 answer
Vlookup columns not next to each other
VBA
3 votes151 views1 answer
Vba post request json
VBA
0 vote128 views1 answer
Vba variable number of arguments
VBA
0 vote112 views1 answer
Excel vba current folder
VBA
0 vote123 views1 answer
Vbnet check if number is even or odd
VBA
0 vote130 views1 answer
Vbnet revrese the order of character in string
VBA
27 votes179 views2 answers
Vba check if file exists
VBA
5 votes241 views1 answer
Vlookup vba
VBA