Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel ou je me trompe dans ma fonction svp

ou je me trompe dans ma fonction svp

1 réponse
Avatar
Alfred WALLACE
bonjour,

dans un module, j'ai ceci :

feuille =3D nom de la feuille courante

le chiffre 1 donne =E0 la fonction va_chercher un d=E9calage

Nom_du_TCD =3D Va_chercher(feuille,1)

=E0 la fin de l'appel Nom_du_TCD ne contiend pas le titre cherch=E9....

ma fonction est =E9crite comme =E7=E0

Function Va_chercher(feuille As String, ligne As Integer) As String

Sheets("PARAMETRES").Visible =3D True
Range("Z31").Select
Range(Selection, Selection.End(xlToRight)).Select
ActiveCell.Offset(ligne, Application.Match(titre, Selection, 0) -
1).Select
titre =3D ActiveCell.Value

End Function

comment je peux renvoyer le titre au retour de la fonction ????


Merci
Jos=E9
Signaler un problème avec ce contenu

1 réponse

Supprimer
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
Avatar
Alfred WALLACE
Function Va_chercher(feuille As String, ligne As Integer) As String

Sheets("PARAMETRES").Visible = True
Range("Z31").Select
Range(Selection, Selection.End(xlToRight)).Select
ActiveCell.Offset(ligne, Application.Match(titre, Selection, 0) -
1).Select
titre = ActiveCell.Value

End Function

comment je peux renvoyer le titre au retour de la fonction ????

Merci
José
je crois que comme çà c'est bon ....


Function titre_feuille(titre As String, ligne As Integer) As String
Sheets("PARAMETRES").Visible = True
Sheets("PARAMETRES").Select
Range("Z31").Select
Range(Selection, Selection.End(xlToRight)).Select
ActiveCell.Offset(ligne, Application.Match(titre, Selection, 0) -
1).Select
titre_feuille = ActiveCell.Value
End Function

José