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

transcrire des formules en code vba .formulalocal

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion la fifine
  • Date de début Date de début

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
L

la fifine

XLDnaute Occasionnel
bonsoir à tous
j'ai quelques formules que j'aimerais mettre en vba mais ma syntaxe ne doit pas être bonne car j'ai une erreur
Code: 
range("b4").formulalocal =  "=SI(A4="";"";SI(A4="";"";GAUCHE(A4;TROUVE(" ";A4))))"

range("c4").formulalocal = "=SI(A4="";"";STXT(GAUCHE(A4;CHERCHE(CAR(255);SUBSTITUE(A4;" ";CAR(255);2)));TROUVE(" ";A4)+1;99))"

range("d4").formulalocal = "==SI(A4="";"";STXT(GAUCHE($A$4;CHERCHE(CAR(255);SUBSTITUE($A$4;" ";CAR(255);3)));CHERCHE(CAR(255);SUBSTITUE($A$4;" ";CAR(255);2))+1;99))"

range("g4").formulelocal = "=SI($A4="";"";STXT($A4;CHERCHE("|";SUBSTITUE($A4;" ";"|";NBCAR($A4)-NBCAR(SUBSTITUE($A4;" ";""))))+1;99))"
ces formules me servent à extraire des mots dans une chaine de caractères
sur des formules simples j'y arrive mais là, je sèche
merci de votre aide
 
Dernière édition:
Trier par date Trier par votes
Re : transcrire des formules en code vba .formulalocal

Salut bien,
Un truc très simple, en VBA tu affiches la fenêtre exécution et tu écris ceci, ne pas oublier le point d'interoguation...?

?range("B4").formulalocal

Bruno
 
Vote positif 0 Vote négatif
Re : transcrire des formules en code vba .formulalocal

Bonsoir, et avant d'aller dormir,

Les guillemets doivent être doublés " " => "" "", mais pas le signe =, juste un peu de soin.

Code: 
Range("b4").FormulaLocal = "=SI(A4="""";"""";SI(A4="""";"""";GAUCHE(A4;TROUVE("" "";A4))))"

Range("c4").FormulaLocal = "=SI(A4="""";"""";STXT(GAUCHE(A4;CHERCHE(CAR(255);SUBSTITUE(A4;"" "";CAR(255);2)));TROUVE("" "";A4)+1;99))"

Range("d4").FormulaLocal = "=SI(A4="""";"""";STXT(GAUCHE($A$4;CHERCHE(CAR(255);SUBSTITUE($A$4;"" "";CAR(255);3)));CHERCHE(CAR(255);SUBSTITUE($A$4;"" "";CAR(255);2))+1;99))"

Range("g4").FormulaLocal = "=SI($A4="""";"""";STXT($A4;CHERCHE(""|"";SUBSTITUE($A4;"" "";""|"";NBCAR($A4)-NBCAR(SUBSTITUE($A4;"" "";""""))))+1;99))"
Bonne nuit.
 
Vote positif 0 Vote négatif
Re : transcrire des formules en code vba .formulalocal

bonjour à tous
merci JOB75 pour les modif.
il me semblait avoir essayé cette solution
bon pour la 1ere formule ça fonctionne
par contre excel se bloque à partir de la 2eme
du coup j'ai changé pour un simple calculate sur la feuille en laissant les formules en dur
désolé du dérangement mais, je n'y avais pas pensé avant
les formules ne s'actualisaient pas en fait, d'où mon idée de les mettre en vba

juste un peu de soin
Cliquez pour agrandir...
pas compris!!!!!! 😕
 
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

P
  • Résolu(e)
XL 2021 peut on mettre plusieurs fonctions si erreur index les une à la suite des autres
Réponses
9
Affichages
281
PR.
P
  • Résolu(e)
Microsoft 365 VBA Insertion du numéro de semaine de manière dynamique
Réponses
11
Affichages
675
Etoto
J
  • Résolu(e)
Autres Problème de " dans Formulalocal en vba
Réponses
3
Affichages
705
jacsimo
J
A
  • Question Question
XL 2013 Utilisation de la fonction "Case" dans VBA
Réponses
12
Affichages
2 K
AnjyD
A
M
  • Résolu(e)
XL 2016 VBA - Condition plage cellule feuille 1 par rapport a une colonne en feuille 2
Réponses
2
Affichages
623
Maxime26
M
S
  • Résolu(e)
XL 2016 VBA effacer contenu colonne en fonction des infos d'une autre
Réponses
8
Affichages
931
sandfer
S
  • Résolu(e)
Microsoft 365 Transformer une formule excel en code vba
2 3
Réponses
31
Affichages
4 K
eric66430
R
  • Résolu(e)
XL pour MAC Test couleur (mise en forme conditionnelle) cellules non adjacentes (VBA)
Réponses
14
Affichages
2 K
sylvanu
  • Résolu(e)
Microsoft 365 Code pour copier des formules dans une feuille suivant les lignes utilisées dans une colonne d'une autre feuille
Réponses
10
Affichages
1 K
luke3300
E
  • Question Question
Microsoft 365 Ecrire une date en fonction d'une recherche (vba)
Réponses
2
Affichages
1 K
Eisu
E
G
  • Question Question
XL 2010 Probléme avec NB.SI.ENS en cas d'égalité sur 2 fichiers
2
Réponses
22
Affichages
3 K
Dugenou
C
  • Résolu(e)
XL 2016 Comparaison de cellules en colonne avec des cellules en ligne
2
Réponses
17
Affichages
2 K
cortilolo
C
F
  • Résolu(e)
XL 2016 Incrémentation Alpha Numériques
Réponses
9
Affichages
2 K
job75
  • Question Question
XL 2010 Alléger et rendre plus rapide un code VBA
Réponses
10
Affichages
2 K
thunder23
A
  • Résolu(e)
XL 2013 Ajouter des formules dans un tableau de dimensions variables
2 3 4
Réponses
48
Affichages
6 K
Ananas94
A
V
  • Question Question
XL 2016 Compiler des cellules de différents fichiers Excel en un seul
Réponses
2
Affichages
1 K
Val119
V
  • Question Question
Comptage des espaces en début de cellule en VBA
Réponses
5
Affichages
3 K
jeff1494
  • Question Question
XL 2010 Formules si avec des conditions
Réponses
2
Affichages
564
jacky49
G
  • Question Question
XL 2013 Trois petits problèmes dans Excel et VBA
Réponses
2
Affichages
1 K
GeoLek
G
S
  • Question Question
XL 2013 [RESOLU] VBA - Ouvrir un fichier et une feuille spécifique selon des cellules du fichier source
2
Réponses
21
Affichages
9 K
Scoty
S
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…