Bonjour à tous.
Mon classeur comporte 2 feuilles.
Supposons que dans feuil1!A2, j'aie une formule quelconque.
Dans feuil2!C6, j'ai tapé le texte "A2".
Supposons maintenant que dans la feuille 1, j'insère une ligne. Ma formule
en A2 est désormais en A3.
Comment mettre à jour la feuille 2, de sorte qu'en C6, j'obtienne le texte
"A3", à la place de "A2" ?
Pas évident...
Une idée ?
AB
Tant qu'à faire de se lancer dans un truc légèrement inbuvable, voici une fonction perso qui te renvoit ce que tu souhaites.
Fonction perso dit VBA -> Alt-F11 | insertion | module, copies-y ce qui suit :
'==== d'ici === Public Function meoukile(nom, Optional rel_abs As Boolean = False, _ Optional format As String = "[wb]ws!ce") 'FxM 20050910 v1 Dim adr As String, wks As String, wkb As String, txt As String
format = Application.Substitute(format, "wb", "|wb|") format = Application.Substitute(format, "ws", "|ws|") format = Application.Substitute(format, "ce", "|ce|")
If rel_abs = False Then adr = Application.Substitute(adr, "$", "")
txt = format txt = Application.Substitute(txt, "|wb|", wkb) txt = Application.Substitute(txt, "|ws|", wks) txt = Application.Substitute(txt, "|ce|", adr) meoukile = txt End Function '==== jusque là === Il ne devrait pas y avoir de lignes coupées.
Comment ça marche ?
A l'endroit où tu souhaites avoir la réponse ... =meoukile(nom, rel_abs, format)
Exemple : =meoukile(Feuil1!A4, faux, "[wb]ws!ce")
1) nom est obligatoire, c'est la cellule dont la position doit être renvoyée
2) rel_abs est optionnel, c'est un boolean définissant la forme de l'adresse de la cellule 0 ou FAUX (XL francais) ==> forme relative (-> B4) 1 ou VRAI (XL francais) ==> forme absolue (-> $B$4) Les formes mixtes ($B4 ou B$4) ne sont pas gérées Si rel_abs est manquant, FAUX est pris par défaut.
3) format est optionnel, c'est le format dans lequel est souhaité la réponse wb est le nom du classeur (workbook) ws est le nom de la feuille (worksheet) ce est l'adresse de la cellule (cell) Si format est manquant, le format par défaut est celui d'Excel -> [wb]ws!ce Note : le caractère | est utilisé en interne pour la séparation du format. Ce caractère est donc prohibé dans les autres infos.
La même chose toute prête : http://cjoint.com/?jkkcQYKxCn
@+ FxM
PS1 : fais une bise à Circé PS2 : tu devrais aller dormir :o)
Hello François-Xavier ! Merci infiniment (et merci également à Alain et Jacky). En effet, ça marche très bien. Le seul problème, mais ça, on n'y peut rien, c'est que lorsque le classeur a un nom un peu long, de même que la feuille 1, ça donne des choses du genre : '[Cas d''application GANDIA Calcul prix d''offre 07-09-2005.xls]ENONCE ET CORRIGE'!$C$14. (Je ne sais pas pourquoi Excel me double les apostrophes, mais bon...). Je résous le problème en remplaçant "adresse" par "ligne", et en modifiant la formule dans la feuille 2 comme suit : ="C"&CELLULE("ligne";'ENONCE ET CORRIGE'!C15) Ca marche parfaitement tant que je n'insère que des lignes nouvelles dans feuille 1, et non des colonnes. J'ai pensé à ÎLLULE("colonne";'ENONCE ET CORRIGE'!C15)&CELLULE("ligne";'ENONCE ET CORRIGE'!C15) ce qui renvoit 315, soit 3 pour le N° de colonne, et 15 pour le N° de ligne, et est mis à jour en cas d'insertion. Reste plus qu'à trouver comment remplacer le 1er chiffre par son équivalent alphabétique, soit le "3" par un "C", le "4" par un "D", et ainsi de suite...Ca n'existe pas, une fonction qui fait ça ? A+ André
"FxM" a écrit dans le message de news:
Bonsoir André,
ÎLLULE("adresse";Feuil1!B4) renvoit [Classeur1]Feuil1!$B$4 et évolue selon les insertions :o)
@+ FxM
Salut vous deux ! Sieste ? Voui, mais contraint et forcé : Numéricable plante lamentablement, et j'attendais que ça reparte pour pouvoir vous recontacter. J'ai du mal m'exprimer. Je recommence : Mon classeur comporte 2 feuilles. Supposons que dans feuil1!A2, j'aie une formule quelconque ou simplement du texte, par exemple "Bonjour". Le contenu de cette cellule n'a strictement aucune importance. Dans feuil2!C6, je voudrais qu'apparaisse le texte "A2". Ca, c'est possible en tapant en feuil2!C6 la formule donnée par Alain : ="A"&LIGNE(Feuil1!A2) Jusque là, tout va bien. Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne 2. L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2, la formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le texte "A2", par définition, dirais-je. Alors que je voudrais que dans la feuille 2, dans la cellule C6 apparaisse désormais le texte "A3". En d'autres termes, la feuille 2 me sert à repérer dans quelle cellule de la feuille 1 se trouvent certaines données ou formules. Mais si je change ces données ou formules de place dans la feuille 1, je voudrais que ces changements soient pris en compte dans la feuille 2 (un peu comme si je mettais à jour une table des matières). C'est plus clair ? André
Bonjour André,
Tant qu'à faire de se lancer dans un truc légèrement inbuvable, voici
une fonction perso qui te renvoit ce que tu souhaites.
Fonction perso dit VBA -> Alt-F11 | insertion | module,
copies-y ce qui suit :
'==== d'ici === Public Function meoukile(nom, Optional rel_abs As Boolean = False, _
Optional format As String = "[wb]ws!ce")
'FxM 20050910 v1
Dim adr As String, wks As String, wkb As String, txt As String
format = Application.Substitute(format, "wb", "|wb|")
format = Application.Substitute(format, "ws", "|ws|")
format = Application.Substitute(format, "ce", "|ce|")
If rel_abs = False Then adr = Application.Substitute(adr, "$", "")
txt = format
txt = Application.Substitute(txt, "|wb|", wkb)
txt = Application.Substitute(txt, "|ws|", wks)
txt = Application.Substitute(txt, "|ce|", adr)
meoukile = txt
End Function
'==== jusque là ===
Il ne devrait pas y avoir de lignes coupées.
Comment ça marche ?
A l'endroit où tu souhaites avoir la réponse ...
=meoukile(nom, rel_abs, format)
Exemple :
=meoukile(Feuil1!A4, faux, "[wb]ws!ce")
1) nom est obligatoire, c'est la cellule dont la position doit être renvoyée
2) rel_abs est optionnel, c'est un boolean définissant la forme de
l'adresse de la cellule
0 ou FAUX (XL francais) ==> forme relative (-> B4)
1 ou VRAI (XL francais) ==> forme absolue (-> $B$4)
Les formes mixtes ($B4 ou B$4) ne sont pas gérées
Si rel_abs est manquant, FAUX est pris par défaut.
3) format est optionnel, c'est le format dans lequel est souhaité la réponse
wb est le nom du classeur (workbook)
ws est le nom de la feuille (worksheet)
ce est l'adresse de la cellule (cell)
Si format est manquant, le format par défaut est celui d'Excel -> [wb]ws!ce
Note : le caractère | est utilisé en interne pour la séparation du
format. Ce caractère est donc prohibé dans les autres infos.
La même chose toute prête :
http://cjoint.com/?jkkcQYKxCn
@+
FxM
PS1 : fais une bise à Circé
PS2 : tu devrais aller dormir :o)
Hello François-Xavier !
Merci infiniment (et merci également à Alain et Jacky). En effet, ça marche
très bien.
Le seul problème, mais ça, on n'y peut rien, c'est que lorsque le classeur a
un nom un peu long, de même que la feuille 1, ça donne des choses du genre :
'[Cas d''application GANDIA Calcul prix d''offre 07-09-2005.xls]ENONCE ET
CORRIGE'!$C$14. (Je ne sais pas pourquoi Excel me double les apostrophes,
mais bon...).
Je résous le problème en remplaçant "adresse" par "ligne", et en modifiant
la formule dans la feuille 2 comme suit :
="C"&CELLULE("ligne";'ENONCE ET CORRIGE'!C15)
Ca marche parfaitement tant que je n'insère que des lignes nouvelles dans
feuille 1, et non des colonnes.
J'ai pensé à ÎLLULE("colonne";'ENONCE ET
CORRIGE'!C15)&CELLULE("ligne";'ENONCE ET CORRIGE'!C15)
ce qui renvoit 315, soit 3 pour le N° de colonne, et 15 pour le N° de ligne,
et est mis à jour en cas d'insertion.
Reste plus qu'à trouver comment remplacer le 1er chiffre par son équivalent
alphabétique, soit le "3" par un "C", le "4" par un "D", et ainsi de
suite...Ca n'existe pas, une fonction qui fait ça ?
A+
André
"FxM" <nullos@greuchmeu.ici> a écrit dans le message de news:
dft32f.3vuds27.1@maison.ici...
Bonsoir André,
ÎLLULE("adresse";Feuil1!B4)
renvoit
[Classeur1]Feuil1!$B$4
et évolue selon les insertions :o)
@+
FxM
Salut vous deux !
Sieste ? Voui, mais contraint et forcé : Numéricable plante
lamentablement, et j'attendais que ça reparte pour pouvoir vous
recontacter.
J'ai du mal m'exprimer. Je recommence :
Mon classeur comporte 2 feuilles.
Supposons que dans feuil1!A2, j'aie une formule quelconque ou simplement
du texte, par exemple "Bonjour". Le contenu de cette cellule n'a
strictement aucune importance.
Dans feuil2!C6, je voudrais qu'apparaisse le texte "A2". Ca, c'est
possible en tapant en feuil2!C6 la formule donnée par Alain :
="A"&LIGNE(Feuil1!A2)
Jusque là, tout va bien.
Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne
2.
L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2,
la formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le
texte "A2", par définition, dirais-je. Alors que je voudrais que dans la
feuille 2, dans la cellule C6 apparaisse désormais le texte "A3".
En d'autres termes, la feuille 2 me sert à repérer dans quelle cellule de
la feuille 1 se trouvent certaines données ou formules. Mais si je change
ces données ou formules de place dans la feuille 1, je voudrais que ces
changements soient pris en compte dans la feuille 2 (un peu comme si je
mettais à jour une table des matières).
C'est plus clair ?
André
Tant qu'à faire de se lancer dans un truc légèrement inbuvable, voici une fonction perso qui te renvoit ce que tu souhaites.
Fonction perso dit VBA -> Alt-F11 | insertion | module, copies-y ce qui suit :
'==== d'ici === Public Function meoukile(nom, Optional rel_abs As Boolean = False, _ Optional format As String = "[wb]ws!ce") 'FxM 20050910 v1 Dim adr As String, wks As String, wkb As String, txt As String
format = Application.Substitute(format, "wb", "|wb|") format = Application.Substitute(format, "ws", "|ws|") format = Application.Substitute(format, "ce", "|ce|")
If rel_abs = False Then adr = Application.Substitute(adr, "$", "")
txt = format txt = Application.Substitute(txt, "|wb|", wkb) txt = Application.Substitute(txt, "|ws|", wks) txt = Application.Substitute(txt, "|ce|", adr) meoukile = txt End Function '==== jusque là === Il ne devrait pas y avoir de lignes coupées.
Comment ça marche ?
A l'endroit où tu souhaites avoir la réponse ... =meoukile(nom, rel_abs, format)
Exemple : =meoukile(Feuil1!A4, faux, "[wb]ws!ce")
1) nom est obligatoire, c'est la cellule dont la position doit être renvoyée
2) rel_abs est optionnel, c'est un boolean définissant la forme de l'adresse de la cellule 0 ou FAUX (XL francais) ==> forme relative (-> B4) 1 ou VRAI (XL francais) ==> forme absolue (-> $B$4) Les formes mixtes ($B4 ou B$4) ne sont pas gérées Si rel_abs est manquant, FAUX est pris par défaut.
3) format est optionnel, c'est le format dans lequel est souhaité la réponse wb est le nom du classeur (workbook) ws est le nom de la feuille (worksheet) ce est l'adresse de la cellule (cell) Si format est manquant, le format par défaut est celui d'Excel -> [wb]ws!ce Note : le caractère | est utilisé en interne pour la séparation du format. Ce caractère est donc prohibé dans les autres infos.
La même chose toute prête : http://cjoint.com/?jkkcQYKxCn
@+ FxM
PS1 : fais une bise à Circé PS2 : tu devrais aller dormir :o)
Hello François-Xavier ! Merci infiniment (et merci également à Alain et Jacky). En effet, ça marche très bien. Le seul problème, mais ça, on n'y peut rien, c'est que lorsque le classeur a un nom un peu long, de même que la feuille 1, ça donne des choses du genre : '[Cas d''application GANDIA Calcul prix d''offre 07-09-2005.xls]ENONCE ET CORRIGE'!$C$14. (Je ne sais pas pourquoi Excel me double les apostrophes, mais bon...). Je résous le problème en remplaçant "adresse" par "ligne", et en modifiant la formule dans la feuille 2 comme suit : ="C"&CELLULE("ligne";'ENONCE ET CORRIGE'!C15) Ca marche parfaitement tant que je n'insère que des lignes nouvelles dans feuille 1, et non des colonnes. J'ai pensé à ÎLLULE("colonne";'ENONCE ET CORRIGE'!C15)&CELLULE("ligne";'ENONCE ET CORRIGE'!C15) ce qui renvoit 315, soit 3 pour le N° de colonne, et 15 pour le N° de ligne, et est mis à jour en cas d'insertion. Reste plus qu'à trouver comment remplacer le 1er chiffre par son équivalent alphabétique, soit le "3" par un "C", le "4" par un "D", et ainsi de suite...Ca n'existe pas, une fonction qui fait ça ? A+ André
"FxM" a écrit dans le message de news:
Bonsoir André,
ÎLLULE("adresse";Feuil1!B4) renvoit [Classeur1]Feuil1!$B$4 et évolue selon les insertions :o)
@+ FxM
Salut vous deux ! Sieste ? Voui, mais contraint et forcé : Numéricable plante lamentablement, et j'attendais que ça reparte pour pouvoir vous recontacter. J'ai du mal m'exprimer. Je recommence : Mon classeur comporte 2 feuilles. Supposons que dans feuil1!A2, j'aie une formule quelconque ou simplement du texte, par exemple "Bonjour". Le contenu de cette cellule n'a strictement aucune importance. Dans feuil2!C6, je voudrais qu'apparaisse le texte "A2". Ca, c'est possible en tapant en feuil2!C6 la formule donnée par Alain : ="A"&LIGNE(Feuil1!A2) Jusque là, tout va bien. Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne 2. L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2, la formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le texte "A2", par définition, dirais-je. Alors que je voudrais que dans la feuille 2, dans la cellule C6 apparaisse désormais le texte "A3". En d'autres termes, la feuille 2 me sert à repérer dans quelle cellule de la feuille 1 se trouvent certaines données ou formules. Mais si je change ces données ou formules de place dans la feuille 1, je voudrais que ces changements soient pris en compte dans la feuille 2 (un peu comme si je mettais à jour une table des matières). C'est plus clair ? André
AV
Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne 2. L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2, la formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le texte "A2", par définition, dirais-je.
** Quelle "définition" ??
Alors que je voudrais que dans la feuille 2, dans la cellule C6 apparaisse désormais le texte "A3".
** Ben tu dois être victime d'un micro-climat car c'est exactement ce que fait la formule proposée !
Pfff... AV
Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne 2.
L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2, la
formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le texte
"A2", par définition, dirais-je.
** Quelle "définition" ??
Alors que je voudrais que dans la feuille
2, dans la cellule C6 apparaisse désormais le texte "A3".
** Ben tu dois être victime d'un micro-climat car c'est exactement ce que fait
la formule proposée !
Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne 2. L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2, la formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le texte "A2", par définition, dirais-je.
** Quelle "définition" ??
Alors que je voudrais que dans la feuille 2, dans la cellule C6 apparaisse désormais le texte "A3".
** Ben tu dois être victime d'un micro-climat car c'est exactement ce que fait la formule proposée !
Pfff... AV
AB
Micro-climat ? Sans doute ! Pourtant le soleil ne frappe plus très fort. Mais la foudre, oui. Qu'ai-je fait ? Ai-je désactivé sans m'en rendre compte le recalcul automatique ? Je suppose que oui, car tu as raison. Pourtant, hier, quand j'ai essayé, j'ai constaté que dans la feuille 2, la valeur de la cellule n'avait pas changé. D'où mon insistance, dont tu voudras bien me pardonner. Entre temps, nous avons avancé avec François Xavier pour prendre en compte, en plus l'insertion d'une colonne. Je regarde de ce pas sa proposition. Merci encore en tout cas, et mille excuses ! André
"AV" a écrit dans le message de news: %23BlCX%
Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne 2. L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2, la formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le texte "A2", par définition, dirais-je.
** Quelle "définition" ??
Alors que je voudrais que dans la feuille 2, dans la cellule C6 apparaisse désormais le texte "A3".
** Ben tu dois être victime d'un micro-climat car c'est exactement ce que fait la formule proposée !
Pfff... AV
Micro-climat ? Sans doute ! Pourtant le soleil ne frappe plus très fort.
Mais la foudre, oui.
Qu'ai-je fait ? Ai-je désactivé sans m'en rendre compte le recalcul
automatique ? Je suppose que oui, car tu as raison. Pourtant, hier, quand
j'ai essayé, j'ai constaté que dans la feuille 2, la valeur de la cellule
n'avait pas changé. D'où mon insistance, dont tu voudras bien me pardonner.
Entre temps, nous avons avancé avec François Xavier pour prendre en compte,
en plus l'insertion d'une colonne.
Je regarde de ce pas sa proposition.
Merci encore en tout cas, et mille excuses !
André
"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
%23BlCX%23dtFHA.3596@TK2MSFTNGP15.phx.gbl...
Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne
2.
L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2,
la
formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le texte
"A2", par définition, dirais-je.
** Quelle "définition" ??
Alors que je voudrais que dans la feuille
2, dans la cellule C6 apparaisse désormais le texte "A3".
** Ben tu dois être victime d'un micro-climat car c'est exactement ce que
fait
la formule proposée !
Micro-climat ? Sans doute ! Pourtant le soleil ne frappe plus très fort. Mais la foudre, oui. Qu'ai-je fait ? Ai-je désactivé sans m'en rendre compte le recalcul automatique ? Je suppose que oui, car tu as raison. Pourtant, hier, quand j'ai essayé, j'ai constaté que dans la feuille 2, la valeur de la cellule n'avait pas changé. D'où mon insistance, dont tu voudras bien me pardonner. Entre temps, nous avons avancé avec François Xavier pour prendre en compte, en plus l'insertion d'une colonne. Je regarde de ce pas sa proposition. Merci encore en tout cas, et mille excuses ! André
"AV" a écrit dans le message de news: %23BlCX%
Mais supposons que dans la feuille 1, j'insère une ligne avant la ligne 2. L'ancienne cellule A2 est devenue la cellule A3. Or, dans la feuille 2, la formule ="A"&LIGNE(Feuil1!A2) me donne toujours comme résultat le texte "A2", par définition, dirais-je.
** Quelle "définition" ??
Alors que je voudrais que dans la feuille 2, dans la cellule C6 apparaisse désormais le texte "A3".
** Ben tu dois être victime d'un micro-climat car c'est exactement ce que fait la formule proposée !
Pfff... AV
AV
...pour prendre en compte, en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2)) ou RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
AV
...pour prendre en compte,
en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2))
ou
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
...pour prendre en compte, en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2)) ou RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
AV
AB
J'abuse, je sais, mais...la question est dans le titre : j'avoue que je ne sais pas comment faire pour avoir cette formule en fonction personnalisée. Heu...Merci ! André
"AB" a écrit dans le message de news: %
Excellent ! Merci A+ André
"AV" a écrit dans le message de news: %23RSS$
...pour prendre en compte, en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2)) ou RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
AV
J'abuse, je sais, mais...la question est dans le titre : j'avoue que je ne
sais pas comment faire pour avoir cette formule en fonction personnalisée.
Heu...Merci !
André
"AB" <spamophobe1@marseille.com> a écrit dans le message de news:
%23zQIgGktFHA.3720@TK2MSFTNGP14.phx.gbl...
Excellent !
Merci
A+
André
"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
%23RSS$AhtFHA.2072@TK2MSFTNGP14.phx.gbl...
...pour prendre en compte,
en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2))
ou
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
J'abuse, je sais, mais...la question est dans le titre : j'avoue que je ne sais pas comment faire pour avoir cette formule en fonction personnalisée. Heu...Merci ! André
"AB" a écrit dans le message de news: %
Excellent ! Merci A+ André
"AV" a écrit dans le message de news: %23RSS$
...pour prendre en compte, en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2)) ou RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
AV
FxM
Equivalente :o)
Public Function oukelet(inp) oukelet = Application.Substitute(Cells(inp.Row, _ inp.Column).Address, "$", "") End Function
usage =oukelet(Feuil1!B4) renvoit B4
@+ FxM
J'abuse, je sais, mais...la question est dans le titre : j'avoue que je ne sais pas comment faire pour avoir cette formule en fonction personnalisée. Heu...Merci ! André
"AB" a écrit dans le message de news: %
Excellent ! Merci A+ André
"AV" a écrit dans le message de news: %23RSS$
...pour prendre en compte, en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2)) ou RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
AV
Equivalente :o)
Public Function oukelet(inp)
oukelet = Application.Substitute(Cells(inp.Row, _
inp.Column).Address, "$", "")
End Function
usage =oukelet(Feuil1!B4)
renvoit B4
@+
FxM
J'abuse, je sais, mais...la question est dans le titre : j'avoue que je ne
sais pas comment faire pour avoir cette formule en fonction personnalisée.
Heu...Merci !
André
"AB" <spamophobe1@marseille.com> a écrit dans le message de news:
%23zQIgGktFHA.3720@TK2MSFTNGP14.phx.gbl...
Excellent !
Merci
A+
André
"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
%23RSS$AhtFHA.2072@TK2MSFTNGP14.phx.gbl...
...pour prendre en compte,
en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2))
ou
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
Public Function oukelet(inp) oukelet = Application.Substitute(Cells(inp.Row, _ inp.Column).Address, "$", "") End Function
usage =oukelet(Feuil1!B4) renvoit B4
@+ FxM
J'abuse, je sais, mais...la question est dans le titre : j'avoue que je ne sais pas comment faire pour avoir cette formule en fonction personnalisée. Heu...Merci ! André
"AB" a écrit dans le message de news: %
Excellent ! Merci A+ André
"AV" a écrit dans le message de news: %23RSS$
...pour prendre en compte, en plus l'insertion d'une colonne.
RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2)) ou RESSE(LIGNE(Feuil1!A2);COLONNE(Feuil1!A2);4)
AV
AV
....comment faire pour avoir cette formule en fonction personnalisée.
Pour répondre strictement à la question (tranformer la formule de feuille de calcul en fonction perso) :
Function ouELLE(cel) x = cel.Address ouELLE = Evaluate("address(row(" & x & "),column(" & x & "),4)") End Function
mais en plus court :
Function ouC(cel) ouC = Cells(cel.Row, cel.Column).Address(0, 0) End Function
Ceci dit, je ne vois aucun intérêt à ne pas utiliser les fonctions de feuille de calcul ! AV
....comment faire pour avoir cette formule en fonction personnalisée.
Pour répondre strictement à la question (tranformer la formule de feuille de
calcul en fonction perso) :
Function ouELLE(cel)
x = cel.Address
ouELLE = Evaluate("address(row(" & x & "),column(" & x & "),4)")
End Function
mais en plus court :
Function ouC(cel)
ouC = Cells(cel.Row, cel.Column).Address(0, 0)
End Function
Ceci dit, je ne vois aucun intérêt à ne pas utiliser les fonctions de feuille de
calcul !
AV
