remplacement automatique

  • Initiateur de la discussion Florent
  • Date de début
F

Florent

Guest
Bonjour à tous,


Un petit sujet simple d'apparence mais compliqué pour moi.
Je souhaiterai dans une plage de cellules ( par exemple C2 à C13 ) quand je tape la lettre H j'ai les : qui s'affiche automatiquement

Est ce possible ?

Merci d'avance


Florent
 
C

Celeda

Guest
Bonjour,

Florent, place cette procédure dans un module que tu inséres (Alt F11) dans ta feuille :

Sub Replace()
Range("C2:C13").Select
Cells.Replace "H", "H:"
End Sub

ca marche bien (peu importe la casse) et ensuite tu déclenches la macro



en attendant une procédure événementielle,

éventuellement,


Celeda
 
A

andré

Guest
Salut,

Hi, hi, hi, ... Celeda s'abandonne aux macros (sans jeu de mot intentionnel).

Autre méthode par format personnalisé @ :
(avec ou sans espace entre les deux)
mais tous les textes tapés dans ces cellules sont suivis d'un :

Il y a aussi le correcteur d'orthographe, remplacer H par H:, mais là c'est pour toute la feuille.

Même méthode en employant une touche non utilisée du clavier, par exemple µ ou £ ou ~ et remplacer ce signe par H: via le correcteur d'orthographe

Puis, s'il ne faut rien mettre d'autre dans la cellule, par le format personnalisé : [=0]"H:";Standard
Il faut taper 0 pour obtenir H: et mettre un alignement gauche à la cellule

Ândré.
 
F

Florent

Guest
Bonjour Celeda , André , le Forum

Merci pour les solutions , je m'en vais les essayer de ce poas.

Florent


smiles_39.gif
 

Discussions similaires

  • Résolu(e)
Microsoft 365 Code de tri
Réponses
22
Affichages
319
Réponses
1
Affichages
121
Compte Supprimé 979
C
Réponses
6
Affichages
333

Membres actuellement en ligne

Statistiques des forums

Discussions
312 276
Messages
2 086 714
Membres
103 378
dernier inscrit
phdrouart