Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Insérer un egal (=) automatiquement sur une selection

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
M

Merlin258413

XLDnaute Occasionnel
Bonjour à tous
Je souhaite savoir si vous avez une macro afin de rajouter au début de chaque cellule selectionnée (une selection) un =
Par exemple si j'ai 0.2*5400 je veux automatiquement avoir devant =0.2*5400
J'avais cette macro sous une autre version d'excel qui ne fonctionne plus sur 2013. on m'indique une erreur de compilation ou Projet ou bibliothèque introuvable

Sub egale()
a = ActiveCell.Offset(0, 0)
résultat = "=" & a
ActiveCell.FormulaLocal = résultat
End Sub

Merci pour votre aide
 
Trier par date Trier par votes
Re : Insérer un egal (=) automatiquement sur une selection

Bonjour.
Bon ben il faut p'tet d'abord régler ce problème avant de dire que ça ne marche plus.
Voyez si coté VBA il n'y aurait pas, dans la liste Référence disponibles, menu Outils, Référence… une ligne portée MANQUANT à dé-cocher pour qu'elle n'empêche plus une bibliothèque de même nom d'être chargée depuis son véritable emplacement dans la nouvelle version d'Excel.
 
Vote positif 0 Vote négatif
Re : Insérer un egal (=) automatiquement sur une selection

Bonjour Dranreb merci beaucoup désolé je suis novice.
Maintenant cela fonctionne est-il possible d'étendre cette macro à une sélection active (je ne sais pas si c'est le terme) par exemple si je sélectionne de A1:A12 mettre un égale devant chaque cellule
en vous remerciant et bon we
 
Vote positif 0 Vote négatif
Re : Insérer un egal (=) automatiquement sur une selection

Bonjour Merlin258413, Dranreb

outre le pb évoqué par Dranreb,
une modif qui marche sous XL 2003
Code: 
a = ActiveCell.Offset(0, 0)  ' c'est à dire ActiveCell
résultat = "=" & a
ActiveCell.Formula = résultat

une autre approche qui permet de sélectionner plusieurs cellules:

Code: 
For Each MaCel In Selection
    MaCel.Formula = "=" & MaCel
Next


A+
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
484
Yogean
Y
  • Question Question
XL 2021 coller une image interne au classeur
2 3
Réponses
33
Affichages
2 K
Jouxte
Office XLS : Fonction simplifiant l'utilisation de la fenêtre FileDialog
Réponses
6
Affichages
844
Lu76Fer
XLS : Evènements souris 'click' sur la grille & astuces
Réponses
3
Affichages
588
Lu76Fer
démarrer un fichier importer du web en toute securité
Réponses
7
Affichages
673
patricktoulon
W
  • Résolu(e)
XL 2016 Ordonner une cellule ou un pavé de cellules contenant des chr(10)
Réponses
5
Affichages
792
Webperegrino
W
P
  • Question Question
XL 2019 appliquer une macro sur n'importe quel fichier excel
2
Réponses
22
Affichages
3 K
pasquetp
P
C
  • Question Question
Autres bug sur une procédure avec textbox contenant un code barre
2
Réponses
15
Affichages
2 K
TooFatBoy
C
  • Question Question
Microsoft 365 De Excel 2006 à EXCEL 365, ma macro ne fonctionne plus, que dois-je faire ?
2
Réponses
15
Affichages
2 K
Katido
K
  • Résolu(e)
XL 2016 Démo pour positionner un UserForm ou ContextMenu sur la grille (Toute version)
10 11 12
Réponses
178
Affichages
10 K
TooFatBoy
N
  • Question Question
XL 2021 BESOIN D'aide macro
Réponses
7
Affichages
1 K
Gégé-45550
C
  • Résolu(e)
XL 2016 Remplir automatiquement un tableau d'après des conditions et des valeurs
Réponses
11
Affichages
2 K
ERIC S
A
  • Question Question
XL 2013 Ouvrir un fichier Excel sur le réseau et coller des valeurs
Réponses
9
Affichages
3 K
sylvanu
  • Question Question
Microsoft 365 Code qui ne fonctionne pas sur Excel 365
Réponses
13
Affichages
1 K
Staple1600
L
  • Question Question
XL 2016 Macro et suppressions de lignes
Réponses
9
Affichages
1 K
fanfan38
G
  • Résolu(e)
XL 2016 Définir Boucle pour afficher plusieurs tableaux dans des textbox sur une userform (ou sur une feuille Excel)
Réponses
6
Affichages
2 K
gaby.jvx
G
T
  • Question Question
XL 2016 [VBA] problème macro EXCEL ne réponds pas
Réponses
11
Affichages
2 K
terry08200
T
T
  • Question Question
XL 2016 Problème de conditions
Réponses
1
Affichages
1 K
nat54
C
  • Question Question
XL 2019 Insérer plusieurs images dans plusieurs cellules en suivant un ordre précis
2 3
Réponses
30
Affichages
6 K
Staple1600
D
  • Question Question
Microsoft 365 vba - appliquer un formula local sur une plage filtrée
Réponses
2
Affichages
922
douguy
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…