Discussion :

[la_fouine1806]

Bonjour,

J'ai l'impression que cette fonction ne fonctionne pas tout le temps. Quelqu'un a une idée ?

voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Public Function Ligne_Top(Source_Sheet As String, Source_Ref As String) As Integer
'
' Fonction de détection de début du tableau
'
Dim Ligne_Départ
Ligne_Départ = Application.Match(Source_Ref, Sheets(Source_Sheet).Range("A:A"), 0)
If IsError(Ligne_Départ) Then
   MsgBox "Aucune balise de début de tableau connu"
Else
    Ligne_Top = Ligne_Départ
End If
End Function

Merci par avance

Etienne

[Philippe Tulliez]

Bonjour,

J'ai l'impression que cette fonction ne fonctionne pas tout le temps. Quelqu'un a une idée ?

Qu'entends-tu par là ?
Pourrais-tu expliquer ce qui ne vas pas et dans quel cas.
Par exemple si tu cherches autres choses qu'une chaîne de caractères, cette fonction ne peut pas te renvoyer un numéro de ligne.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Debug.Print Ligne_Top("Feuil1", "10")

Si une cellule de la colonne A contient 10, cette valeur ne sera pas trouvée.
Si l'argument Source_Ref est variant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Public Function Ligne_Top(Source_Sheet As String, Source_Ref) As Integer

Dans ce cas, les deux cas de figures ci-dessous fonctionneront.
Debug.Print Ligne_Top("Feuil1", 10) ou Debug.Print Ligne_Top("Feuil1", "Toto") .
Cependant en commentaire de ta fonction, on lit "' Fonction de détection de début du tableau".
La fonction en question ne fait que renvoyer la position d'une valeur cherchée dans la colonne A de la feuille définie par l'argument Source_Sheet.

[la_fouine1806]

Bonjour,

Enfait j'ai trouvé... Enfait mon problème est qu'il me renvoyait une erreur 9 de temps en temps... car il était sur le mauvais workbook...

Du coup, j'ai ajouté le workbook dans ma fonction du coup ca marche... Comme quoi la nuit porte conseil...

Pour répondre à ta question, ma fonction me permet de déterminer la ligne à laquelle commence un tableau(de hauteur variable).