C'est quoi ce ":", que j'ai vu dans du code de Thierry ?

[marabbeh]

Par exemple :

If Tab2(i) > Tab2(j) Then
t1 = Tab2(j): t2 = Tab2(j)
Tab2(j) = Tab2(i): Tab2(j) = Tab2(i)
Tab2(i) = t1: Tab2(i) = t2
End If

Bonjour en passant, aux courageux(ses) qui ne font pas le pont !

 

[@+Thierry]

Salut Marabbeh et le Forum

Dans ce cas ce n'est qu'un séparateur. Celà permet d'écrire sur la même ligne c'est plus clair pour lire le code.

Je l'utilise aussi dans Select Case parfois comme ceci (exemple bidon)

Sub Separateur ()
Dim MyVar As Byte

MyVar = Range("A1")

Select Case MyVar

Case 1: MsgBox "C'est un 1"
Case 2: MsgBox "C'est un 2"
Case 3: MsgBox "C'est un 3"

End Select
End Sub


Sans le S2parateur on écrirait comme ceci :

Sub SansSeparateur ()
Dim MyVar As Byte

MyVar = Range("A1")

Select Case MyVar

Case 1
MsgBox "C'est un 1"
Case 2
MsgBox "C'est un 2"
Case 3
MsgBox "C'est un 3"

End Select
End Sub

Voilà c'est tout

En complément, attention, il sert aussi pour marquer une balise
Sub toto ()
On error goto ErrorHandler
'blah blah blah... la macro....
Exit Sub
ErrorHandler:
msgbox "la macro a rencontrer un problème"
End Sub

Bonne Journée... Super => "T.G.F."(*)

@+Thierry

(*) TGF = Thanx Godits Friday !!! pour ceux comme nous qui bossons !!!