Liste des 54 principales fonctions VBA

Bonjour à tous,

J'ai fait pris le temps de créer une liste des 54 principales fonctions VBA (et chacune de ces fonctions dispose d'un exemple d'utilisation simple).

La liste des fonctions VBA apparaît désormais dans le menu principal du site sous : FONCTIONS VBA

J'espère que ça vous aidera pour vos développements

Cordialement,

Wahoo !

C'est parfait moi qui débute !

Je te remercie !

Bien à toi

Dianec

Bonjour,

Merci beaucoup Sébastien, je n'avais pas vu passer ton post mais il est très intéressant. J'ai notamment pu découvrir les fonctions Int/Fix ainsi que Choose (quelqu'un s'en ai déjà servi ?) que je ne connaissais pas !

Sur les pages des fonctions, je rajouterai ces petites infos... :

• Array
  Peux être utiliser pour boucler sur différents éléments

For Each Sh In ThisWorkbook.Sheets(Array("Feuil1", "Feuil2", "Feuil4"))
    Sh.Range("A1").Value = Now
Next Sh

• Split
  Permet aussi de remplir une ComboBox " d'un coup "

texte = "Lundi, Mardi, Mercredi, Jeudi, Vendredi"
Me.ComboBox1.List = Split(texte, ", ")

• Mid
  Permet également de remplacer une partie d'une chaîne

texte = "www.excel-pratique/com"
Mid(texte, 18, 1) = "."
MsgBox texte  'Renvoie : www.excel-pratique.com

Bonjour Baboutz,

L'idée est d'ajouter juste 1 ou 2 exemples simples pour comprendre comment utiliser la fonction ... Si je commence à ajouter toutes les possibilités je ne m'en sortirais jamais

Par exemple (ton exemple Split) est avec ComboBox :

texte = "Lundi, Mardi, Mercredi, Jeudi, Vendredi"
Me.ComboBox1.List = Split(texte, ", ")

Il faudrait aussi ajouter un exemple pour ListBox :

texte = "Lundi, Mardi, Mercredi, Jeudi, Vendredi"
Me.ListBox1.List = Split(texte, ", ")

Mais aussi ajouter ces exemples pour la fonction Array :

texte = Array("Lundi", "Mardi", "Mercredi", "Jeudi", "Vendredi")
Me.ComboBox1.List = texte

texte = Array("Lundi", "Mardi", "Mercredi", "Jeudi", "Vendredi")
Me.ListBox1.List = texte

Sans compter :

For Each Sh In ThisWorkbook.Sheets(Array("Feuil1", "Feuil2", "Feuil4"))
    Sh.Range("A1").Value = Now
Next Sh

Qui pourrait aussi s'écrire :

For Each Sh In Array("Feuil1", "Feuil2", "Feuil4")
    Sheets(Sh).Range("A1").Value = Now
Next Sh

Là encore on pourrait créer des versions avec Split ...

Etc.

Etc.

Ton idée est bonne mais c'est vite interminable si on commence à essayer de tout lister

Cordialement,

Re,

Oui, je comprend. Je pensais plutôt à montrer des codes pas intuitifs ! Par exemple, je n'ai jamais vu un site montrant que c'était possible de remplir une ComboBox (ou ListBox) avec Split, et je ne l'ai testé qu'en désespoir de cause ! Cela permet en une ligne par exemple d'ajouter un item + une plage de cellule à une comboBox :

ComboBox1.List = Split("*, " & Join(Application.Transpose(Application.Index(Sh_BDD.Range("ListeJoursSemaine").Value, 0, 1)), ", "), ", ")

Bon je pinaille dans l'art de l'optimisation suprême du code
Mais j'imagine qu'il y a pleins de cas de codes non-intuitifs Donc je comprends que ce soit mission impossible !

Merci de ta réponse en tout cas !

Bonne journée,

Baboutz

Bonjour

Pour ceux qui débutent comme moi, c'est super pratique, je m'en suis déjà servi à plusieurs reprises.

merci beaucoup !

Super, je ne débute pas vraiment mais ça sera très pratique (oh mais c'est le titre du site?) pour m'y remettre :)

Salut Sébastien,

C'est cool d'avoir pris le temps de créer ce topic avec ces 54 fonctions

Merci