Extraire le nom d'une feuille utilisée dans une formule
4 réponses
Thierryc_44
J'ai dans une cellule une formule du genre =Lyon!B4
Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de
cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ?
Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Essaie : [A2] = Range("A1").Formula Cordialement. Daniel "Thierryc_44" a écrit dans le message de news:
J'ai dans une cellule une formule du genre =Lyon!B4 Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ? Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Merçi d'avance pour l'info. -- Thierry
Bonjour.
Essaie : [A2] = Range("A1").Formula
Cordialement.
Daniel
"Thierryc_44" <Thierryc44@discussions.microsoft.com> a écrit dans le message
de news: 6F61A3E6-A997-4838-AE39-4D30CE939B62@microsoft.com...
J'ai dans une cellule une formule du genre =Lyon!B4
Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu
de
cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule
?
Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Bonjour. Essaie : [A2] = Range("A1").Formula Cordialement. Daniel "Thierryc_44" a écrit dans le message de news:
J'ai dans une cellule une formule du genre =Lyon!B4 Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ? Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Merçi d'avance pour l'info. -- Thierry
papou
Bonjour Une fonction perso ? A insérer dans un module standard : Function AfficheLaFormule(LaCel As Range) If LaCel.HasFormula = False Then AfficheLaFormule = False Else: AfficheLaFormule = LaCel.Formula End If End Function Puis dans une cellule, formule : ¯ficheLaFormule(B4)
Il te restera ensuite à retirer ce qui t'intéresse.
Cordialement Pascal
"Thierryc_44" a écrit dans le message de news:
J'ai dans une cellule une formule du genre =Lyon!B4 Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ? Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Merçi d'avance pour l'info. -- Thierry
Bonjour
Une fonction perso ?
A insérer dans un module standard :
Function AfficheLaFormule(LaCel As Range)
If LaCel.HasFormula = False Then
AfficheLaFormule = False
Else: AfficheLaFormule = LaCel.Formula
End If
End Function
Puis dans une cellule, formule :
¯ficheLaFormule(B4)
Il te restera ensuite à retirer ce qui t'intéresse.
Cordialement
Pascal
"Thierryc_44" <Thierryc44@discussions.microsoft.com> a écrit dans le message
de news: 6F61A3E6-A997-4838-AE39-4D30CE939B62@microsoft.com...
J'ai dans une cellule une formule du genre =Lyon!B4
Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu
de
cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule
?
Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Bonjour Une fonction perso ? A insérer dans un module standard : Function AfficheLaFormule(LaCel As Range) If LaCel.HasFormula = False Then AfficheLaFormule = False Else: AfficheLaFormule = LaCel.Formula End If End Function Puis dans une cellule, formule : ¯ficheLaFormule(B4)
Il te restera ensuite à retirer ce qui t'intéresse.
Cordialement Pascal
"Thierryc_44" a écrit dans le message de news:
J'ai dans une cellule une formule du genre =Lyon!B4 Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ? Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Merçi d'avance pour l'info. -- Thierry
ChrisV
Bonjour Thierryc_44,
Avec A1 =Lyon!B4 dans une autre cellule...
=STXT(forM(A1);2;TROUVE("!";forM(A1))-2)
dans un module du classeur...
Function forM(cellule As Range) If cellule.HasFormula = True Then If cellule.HasArray = True Then forM = "{" & cellule.FormulaLocal & "}" Else forM = cellule.FormulaLocal End If Else: forM = "La cellule " & cellule.Address(0, 0) & _ " ne contient pas de formule..." End If End Function
ChrisV
"Thierryc_44" a écrit dans le message de news:
J'ai dans une cellule une formule du genre =Lyon!B4 Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ? Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Merçi d'avance pour l'info. -- Thierry
Bonjour Thierryc_44,
Avec A1 =Lyon!B4
dans une autre cellule...
=STXT(forM(A1);2;TROUVE("!";forM(A1))-2)
dans un module du classeur...
Function forM(cellule As Range)
If cellule.HasFormula = True Then
If cellule.HasArray = True Then
forM = "{" & cellule.FormulaLocal & "}"
Else
forM = cellule.FormulaLocal
End If
Else: forM = "La cellule " & cellule.Address(0, 0) & _
" ne contient pas de formule..."
End If
End Function
ChrisV
"Thierryc_44" <Thierryc44@discussions.microsoft.com> a écrit dans le message
de news: 6F61A3E6-A997-4838-AE39-4D30CE939B62@microsoft.com...
J'ai dans une cellule une formule du genre =Lyon!B4
Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu
de
cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule
?
Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Function forM(cellule As Range) If cellule.HasFormula = True Then If cellule.HasArray = True Then forM = "{" & cellule.FormulaLocal & "}" Else forM = cellule.FormulaLocal End If Else: forM = "La cellule " & cellule.Address(0, 0) & _ " ne contient pas de formule..." End If End Function
ChrisV
"Thierryc_44" a écrit dans le message de news:
J'ai dans une cellule une formule du genre =Lyon!B4 Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ? Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Merçi d'avance pour l'info. -- Thierry
Thierryc_44
Merçi pour ta réponse. A+
-- Thierry
Bonjour Thierryc_44,
Avec A1 =Lyon!B4 dans une autre cellule...
=STXT(forM(A1);2;TROUVE("!";forM(A1))-2)
dans un module du classeur...
Function forM(cellule As Range) If cellule.HasFormula = True Then If cellule.HasArray = True Then forM = "{" & cellule.FormulaLocal & "}" Else forM = cellule.FormulaLocal End If Else: forM = "La cellule " & cellule.Address(0, 0) & _ " ne contient pas de formule..." End If End Function
ChrisV
"Thierryc_44" a écrit dans le message de news:
J'ai dans une cellule une formule du genre =Lyon!B4 Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ? Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Merçi d'avance pour l'info. -- Thierry
Merçi pour ta réponse.
A+
--
Thierry
Bonjour Thierryc_44,
Avec A1 =Lyon!B4
dans une autre cellule...
=STXT(forM(A1);2;TROUVE("!";forM(A1))-2)
dans un module du classeur...
Function forM(cellule As Range)
If cellule.HasFormula = True Then
If cellule.HasArray = True Then
forM = "{" & cellule.FormulaLocal & "}"
Else
forM = cellule.FormulaLocal
End If
Else: forM = "La cellule " & cellule.Address(0, 0) & _
" ne contient pas de formule..."
End If
End Function
ChrisV
"Thierryc_44" <Thierryc44@discussions.microsoft.com> a écrit dans le message
de news: 6F61A3E6-A997-4838-AE39-4D30CE939B62@microsoft.com...
J'ai dans une cellule une formule du genre =Lyon!B4
Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu
de
cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule
?
Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
Function forM(cellule As Range) If cellule.HasFormula = True Then If cellule.HasArray = True Then forM = "{" & cellule.FormulaLocal & "}" Else forM = cellule.FormulaLocal End If Else: forM = "La cellule " & cellule.Address(0, 0) & _ " ne contient pas de formule..." End If End Function
ChrisV
"Thierryc_44" a écrit dans le message de news:
J'ai dans une cellule une formule du genre =Lyon!B4 Comment faire pour récupérer (dans une autre cellule bien sûr) le contenu de cette formule, c'est-à-dire =Lyon!B4 et non pas le résultat de la formule ? Le but du jeu est d'extraire ensuite Lyon (nom de la feuille source).
