Lettre Juin 2003

Excel

Une liste déroulante dans une cellule

Pour se faciliter la saisie ou pour limiter la saisie, il est parfois utile d'avoir une liste déroulante dans une ou plusieurs cellule. Vous pouvez alors tout simplement recourir à la validation des données ainsi :

• Sur une feuille quelconque tapez toutes les données de votre future liste en colonne, c'est à dire chaque donnée de la liste l'un en dessous de l'autre.
• Lorsque toutes les données sont entrées, sélectionnez la plage correspondant à toute ces données.
• Nommez-la : clic dans la zone Nom et tapez un nom (par exemple MaListe). Attention à ne pas mettre d'espace dans ce nom. Référez-vous à la page http://www.cathyastuce.com/excel/nommer.htm#cellule si vous ne connaissez pas la méthode.
• Sélectionnez la ou les cellules devant contenir une liste déroulante.
• Données/Validation des données
• Sélectionnez Liste dans Autoriser
• Cliquez dans la zone Source.
• Appuyez sur la touche F3, ainsi vous appeler la fenêtre de collage des noms.
• Sélectionnez votre nom (pour notre exemple, MaListe)
• Ok
• Si vous désirez afficher un message d'erreur, tapez le dans l'onglet Alerte d'erreur.
• Si vous désirez laisser la possibilité de taper une autre valeur que celle de la liste, décochez l'option Quand des données non valides sont tapés dans l'onglet Alerte d'erreur.

Insérer des caractères spéciaux dans une cellule

Pour insérer un caractère spéciale dans une cellule d'Excel, vous êtes obligé d'utiliser le programme Table des caractères (démarrer/Programmes/Accessoires).
Pour vous simplifier le travail, vous pouvez ajouter un bouton à une barre d'outils (Mise en forme par exemple), ce dernier ouvrira alors l'accessoire Table des caractères :

• Outils/Personnaliser
• Dans l'onglet Commandes, sélectionnez Macros.
• Glissez la commande Bouton personnalisé sur votre barre d'outils.
• Clic-droit sur ce nouveau bouton, sélectionnez Affecter un lien hypertexte/Ouvrir
• Cliquez sur le bouton Fichier...
• Dans la fenêtre de recherche, sélectionnez Tous les fichiers dans la liste Type de fichiers (situé en bas de la fenêtre)
• recherchez le fichiers C:\Windows\charmap.exe ou C:\WINDOWS\SYSTEM32\charmap.exe
• Clic-droit sur le bouton, de nouveau, sélectionnez Modifier l'image du bouton pour choisir une image plus adaptée ou si vous avez des talents de dessinateur, sélectionnez Éditeur de boutons.
• Clic-droit sur le bouton, de nouveau, dans la zone de texte Nom, tapez un texte explicite.
• Ok
• Fermer
• Ignorer l'avertissement lors du clic sur ce bouton.

VBA

Quelques petites procédures qui simplifient le travail

Chacune de ces procédures peuvent être affectée à un bouton d'une barre d'outils, elles vous faciliteront ainsi la vie.
Pour ajouter un bouton à une barre d'outils afin qu'il lance une procédure :

• Outils/Personnaliser
• Dans l'onglet Commandes, sélectionnez Macros.
• Glissez la commande Bouton personnalisé sur votre barre d'outils.
• Clic-droit sur ce nouveau bouton, sélectionnez Affecter une macro...
• Clic-droit sur le bouton, de nouveau, sélectionnez Modifier l'image du bouton pour choisir une image plus adaptée ou si vous avez des talents de dessinateur, sélectionnez Éditeur de boutons.
• Clic-droit sur le bouton, de nouveau, dans la zone de texte Nom, tapez un texte explicite.
• Ok
• Fermer

La page http://www.cathyastuce.com/excel/barre_outils.htm#Modification vous indique comment aménager une barre d'outils.

Public Sub Collage_Transpose()
     ' Permet de Transposer une sélection copié
     ' copiez une plage, sélectionnez une cellule
     ' puis cliquez sur le bouton de cette procédure pour transposer
On Error Resume Next
     Selection.PasteSpecial Transpose:=True
End Sub

************************

Public Sub CopierColler_Valeur()
     ' Permet de copier une plage puis de coller uniquement les valeurs de la plage sur elle-même
On Error GoTo Fin
     Selection.Copy
     Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Fin:
     Application.CutCopyMode = False
End Sub

************************

Public Sub CopierCollerLien()
     'permet de copier et de coller avec liaison
     ' copiez une plage, sélectionnez une cellule
     ' puis cliquez sur le bouton de cette procédure pour coller avec liaison
On Error GoTo Fin
     ActiveSheet.Paste Link:=True
     Exit Sub
Fin:
     Application.CutCopyMode = False
End Sub

************************

Public Sub Nom_Entier_PiedCentre()
     ' insère au pied centre le nom complet du classeur (y compris son chemin)
On Error Resume Next
     ActiveSheet.PageSetup.CenterFooter = ActiveWorkbook.FullName
End Sub

************************

Public Sub Nom_Entier_PiedDroit()
     ' insère au pied droit le nom complet du classeur (y compris son chemin)
On Error Resume Next
     ActiveSheet.PageSetup.RightFooter = ActiveWorkbook.FullName
End Sub

************************

Public Sub Nom_Entier_PiedCentre()
     ' insère au pied centre le nom complet du classeur (y compris son chemin)
On Error Resume Next
     ActiveSheet.PageSetup.CenterFooter = ActiveWorkbook.FullName
End Sub

************************

Public Sub ChangeCasse()
    ' change la casse des cellules de la sélection
     ' alternativement en majuscule, minuscule et 1ère lettre des mots en Majuscule
     Dim byCasse As Byte, UnTexte As String, rCel As Range

     For Each rCel In Selection 'pour chaque cellule de la sélection
          UnTexte = rCel.Text
          If UCase(UnTexte) = UnTexte Then 'si le texte est en majuscule
               byCasse = 1
          ElseIf LCase(UnTexte) = UnTexte Then 'si le texte est en minuscule
               byCasse = 2
          Else
               byCasse = 0
          End If
          byCasse = byCasse + 1 'on attribue la casse suivante
          Select Case byCasse
               Case 1
                    UnTexte = UCase(UnTexte) 'texte en majuscule
               Case 2
                    UnTexte = LCase(UnTexte) 'texte en minuscule
               Case 3
                    UnTexte = Application.WorksheetFunction.Proper(UnTexte) 'utilisation de la fonction NOMPROPRE d'Excel
          End Select
          rCel = UnTexte 'réattribution du texte transformé à la cellule.
     Next
End Sub

Windows

XP : désactiver la mise à jour automatique

Bien que cette mise à jour soit pratique pour ceux qui sont régulièrement connecté à Internet, vous pouvez la désactiver afin de n'effectuer les mises à jour que sur commande.

• Clic-droit sur le Poste de travail
• Sélectionnez Propriétés
• Sélectionnez l'onglet Mises à jour automatiques
• Décochez Maintenir mon ordinateur à jour
• Ok

Sauver ses paramètres de connexion

Vous devez pour cela exporter une clé de la base de registre :

• Démarrer/Exécuter
• tapez Regedit, puis Ok
• Recherchez la clé [HKEY_CURRENT_USER\RemoteAccess\Addresses]
• Cliquez sur celle-ci puis sélectionnez Exporter
• Précisez le nom et l'emplacement du fichier qui contiendra toutes vos données de connexion.

Pour restaurer ces données (au cas où vous avez réinstallé Windows), double-cliquez sur le fichier créé selon les indications ci-dessus (il porte l'extension .reg) et acceptez la mise à jour de la base de registre.

Word

Habiller un tableau avec du texte (2000 et +)

• Sélectionnez votre tableau en cliquant sur la flèche double noire qui s'affiche au coin supérieur droit lorsque votre curseur se trouve sur la première ligne du tableau.
• Clic-droit sur le tableau, sélectionnez Propriétés du tableau.
• Onglet Tableau, dans Habillage du texte, cochez l'option Autour et validez.
• Placez votre curseur sur le tableau encore sélectionné, glissez-le vers votre texte afin qu'il soit habillé par ce dernier.

Travailler sur 2 vues

Si votre document est long, que vous désirez travailler sur le début et la fin en même temps (par exemple du copier et coller) vous en avez sûrement assez de vous baladez entre chaque partie de votre texte.
Simplifiez-vous en affichant à l'écran les 2 parties du document qui vous intéresse :

• Placez-vous dans une des partie de votre document.
• Glissez le petit rectangle, situé au dessus de la barre de défilement verticale, vers le bas
   
• Votre fenêtre sera alors divisée en 2 volets indépendants, vous pouvez y afficher 2 parties différentes de votre document.