Astuces et travail avec Excel & VBA ::..

Quelques lignes pour vous rappeler les merveilles d'Excel et pour vous donner quelques trucs pour mieux travailler.

Sommaire :.

Astuces
Formules
Fonctions
Touches
Macros

Astuces :.

Mettre en couleur une ligne sur deux

Sélectionner le groupe de cellules
Mise en forme conditionnelle
Nouvelle règle de mise en forme
Choisir "Utiliser une formule ..."

Formules :.

Quelques rappels sur le travail avec les formules.

**Formules et fonctions**
Utilisation	Fonction	Résultat	Remarques
Les caractères
Assembler des mots	=CONCATENER(A1;A2;"T")	Caractères	C'est plutôt bien
Prendre des lettres	=GAUCHE(A1;3)	Caractères	Les 3 premières lettres de A1 dans ce cas
Prendre des lettres	=DROITE(A1;2)	Caractères	Les 2 dernières lettres de A1
Chercher	=CHERCHE("os";A1)	Nombre	Donne la position où ce trouve les lettres cherchées
Les nombres
Addition	=SOMME(A1;A2)	Nombre	Somme des valeurs de A1 et A2
Moyenne	=MOYENNE(A1;A2;A3)	Nombre	Donne la moyenne du contenu des cellules

Sommaire

**Quelques astuces sur la feuille**
Cacher contenu cellule	Mettre ;;; dans le "format" cellule "personnalisé"
Nommer une cellule	Sélectionner la cellule, puis aller an haut à gauche dans la fenêtre "Zone nom", introduire un nom et presser sur "Enter" pour valider
Nommer une plage	Même opération après avoir sélectionné une zone complète
Retrouver une cellule nommée	Aller en haut à gauche dans la "Zone nom", activer le menu déroulant et cliquer sur le nom choisi.
Déplacer une cellule ou une zone complète	Sélectionner la cellule ou la zone et pointer sur le bas de celle-ci avec la souris et déplacer.
Conversion d'une valeur en binaire	decbin(A1)
Conversion d'une valeur en octal	decoct(A1)
Conversion d'une valeur en hexadecimal	dechex(A1)
Conversion d'une valeur en chiffres romain	romain(A1)

Fonctions personnelles :.

SANSACCENT()

Permet de supprimer les accents dans un texte d'une cellule
A placer le code ci-dessous dans l'éditeur de macro

Appel de la fontion avec "=SANSACCENT(A1)"

Function SANSACCENT(texte)
'Auteur      : Jean-Pierre Perroud
'Edition     : 02.04.2007         
'Correction  : 12.06.2009

    'Définition des variables
    avec = "ÀÁÂÃÄÅàáâãäåÒÓÔÕÖØòóôõöøÈÉÊËèéêëÌÍÎÏìíîïÙÚÛÜùúûüÿÑñÇç_"
    sans = "AAAAAAaaaaaaOOOOOOooooooEEEEeeeeIIIIiiiiUUUUuuuuyNnCc "
    tmp  = texte

    'Boucle de traitement
    For i = 1 To Len(tmp)
        pot = InStr(avec, Mid(tmp, i, 1))
        If pot > 0 Then Mid(tmp, i, 1) = Mid(sans, pot, 1)
    Next i
    
    If tmp = 0 Then tmp = ""  'Ne laisse pas un zéro si champ vide
    SANSACCENT = tmp          'Retour du traitement

End Function

Cette fonction peut-être adaptée pour les langues concernées, afin de limiter les itérations en simplifiant la liste des caractères.

Si vous utilise ces fonctions, merci de laisser les commentaires de la provenance ! Ne pas oublier de consulter le compagnon !

Sommaire

Touches :.

**Avec la touche `Ctrl`**
`Ctrl` `N`	Ouvrir une nouvelle feuille
`Ctrl` `O`	Ouvrir une feuille (fichier)
`Ctrl` `S`	Enregistrer la feuille courante (fichier)
`Ctrl` `P`	Imprimer la feuille courante ou la sélection
`Ctrl` `Z`	Annuler la dernière opération
`Ctrl` `X`	Couper la sélection
`Ctrl` `C`	Copier la sélection
`Ctrl` `V`	Coller la partie coupée ou copiée
`Ctrl` `F`	Chercher
`Ctrl` `H`	Remplacer
`Ctrl` `T`	Atteindre
`Ctrl` `K`	Placer un lien hypertexte
`Ctrl` `1`	Format de la cellule
`Ctrl` `F3`	Définir un nom de cellule

**Avec la touche `Maj` ( ou `Shift` )**
`Maj` `F2`	Insère un commentaire dans la cellule courante
`Maj` `F3`	Appel une boîte de dialogue "Insérer une fonction"
`Maj` `F4`	Répète la dernière commande ou action
`Maj` `F5`	Appel la boîte de dialogue "Atteindre"
`Maj` `F7`	Appel la recherche dans le dictionnaire des synonymes

**Avec les touches de fonction**
`F1`	Ouvrir l'aide
`F2`	Passer en mode édition (modifier) sur une cellule sélectionnée
`F3`	Coller un nom de la liste
`F4`	Passage en mode adressage absolu ou relatif
`F5`	Atteindre une cellule ou un texte
`F7`	Orthographe
`F9`	Calculer maintenant

Sommaire

Macros & VBA :.

Quelques lignes de code pour vos macros sous Excel. Vous pouvez facilement les recopier dans vos macros avec les fameux "copier coller" que vous connaissez :-)
Ne pas oublier de faire des recherches sur le Net, on y trouve une quantité impressionnante de trucs.

Les classeurs

Ouverture d'un nouveau classeur


Workbooks.Add

Fermeture d'un classeur


Workbooks("monclasseur.xls").Close

Fermeture des classeurs ouverts (sauf celui qui est actif)


Sub FermeClasseurs() 
	For Each Wk In Workbooks 
		If Wk.Name <> ThisWorkbook.Name Then 
			Wk.Close savechanges:=True 
		End If 
	Next Wk 
End Sub

Les feuilles

Ajout d'un feuille dans le classeur courant


ActiveWorkbook.Worksheets.Add

	ou

Sheets.Add

Changer de nom de l'onglet de la feuille courante


ActiveSheet.Name = "NouveauNom"

Activer une feuille du classeur par son nom d'onglet


Worksheets("feuille1").Activate

Jean-Pierre Perroud
Switzerland
Dernière mise à jour : 2023-02-12