Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Recherche dans la dernière colonne non vide d'un tableau (Excel 2003)

Recherche dans la dernière colonne non vide d'un tableau (Excel 2003)

33 réponses
Avatar
thomas
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un tableau?

Cette dernière colonne n'est pas toujours la même

Merci
Signaler un problème avec ce contenu

10 réponses

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
1 2 3 4
Avatar
Daniel.C
Bonjour.
With ActiveSheet.UsedRange
Colonne = .Column + .Columns.Count - 1
End With
Cordialement.
Daniel
"thomas" <nomail> a écrit dans le message de news:
er5Tifr$
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un
tableau?

Cette dernière colonne n'est pas toujours la même

Merci



Avatar
thomas
Merci

c'est directement dans la feuille de calcul que je veux connaître la
recherche, pas en VBA. je mets ce code dans une fonction alors? et plutôt
que UsedRange je passe le nom de la zone en paramètre?


"Daniel.C" a écrit dans le message de groupe de
discussion : Ob2t#tr$
Bonjour.
With ActiveSheet.UsedRange
Colonne = .Column + .Columns.Count - 1
End With
Cordialement.
Daniel
"thomas" <nomail> a écrit dans le message de news:
er5Tifr$
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un
tableau?

Cette dernière colonne n'est pas toujours la même

Merci



Avatar
LSteph
Bonjour,
en repèrant d'abord quelle est la dernière
pour cela on utilise plus facilement vba
pour faire simple on choisit en référence une ligne dans laquelle il n'y
aura jamais de vide à l'intérieur ni de choses qui s'affichent plus loin
à droite
prenons la ligne 3 par exemple comme étant celle des titres du tableau.

Sub cherchlastcol()
With [3:3]
.Cells(.Cells.Count).End(xlToLeft).EntireColumn.Activate
End With
Application.Dialogs(xlDialogSearch).Show
End Sub

'--
'lSteph



thomas a écrit :
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un tableau?

Cette dernière colonne n'est pas toujours la même

Merci



Avatar
LSteph
..oupsss
trompé de boiboite

Sub cherchlastcol()
With [3:3]
.Cells(.Cells.Count).End(xlToLeft).EntireColumn.Activate
End With
Application.Dialogs(xlDialogFormulaReplace).Show
End Sub



thomas a écrit :
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un tableau?

Cette dernière colonne n'est pas toujours la même

Merci



Avatar
LSteph
...?
tu veux lancer une recherche (ce sera forcément vba)
ou
tu voudrais une formule



thomas a écrit :
Merci

c'est directement dans la feuille de calcul que je veux connaître la
recherche, pas en VBA. je mets ce code dans une fonction alors? et plutôt
que UsedRange je passe le nom de la zone en paramètre?


"Daniel.C" a écrit dans le message de groupe de
discussion : Ob2t#tr$
Bonjour.
With ActiveSheet.UsedRange
Colonne = .Column + .Columns.Count - 1
End With
Cordialement.
Daniel
"thomas" <nomail> a écrit dans le message de news:
er5Tifr$
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un
tableau?

Cette dernière colonne n'est pas toujours la même

Merci






Avatar
thomas
J'ai essayé cela :

Function Derniere_Colonne(Zone As Range)

With ActiveSheet.Range(Zone)
Derniere_Colonne = .Column + .Columns.Count - 1
End With

End Function

mais cela retourne #VALEUR

merci


"thomas" <nomail> a écrit dans le message de groupe de discussion :
e2XY6yr$
Merci

c'est directement dans la feuille de calcul que je veux connaître la
recherche, pas en VBA. je mets ce code dans une fonction alors? et plutôt
que UsedRange je passe le nom de la zone en paramètre?


"Daniel.C" a écrit dans le message de groupe de
discussion : Ob2t#tr$
Bonjour.
With ActiveSheet.UsedRange
Colonne = .Column + .Columns.Count - 1
End With
Cordialement.
Daniel
"thomas" <nomail> a écrit dans le message de news:
er5Tifr$
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un
tableau?

Cette dernière colonne n'est pas toujours la même

Merci



Avatar
thomas
ben une formule qui permette de faire la recherche directement dans la
feuille. toutes les colonnes contiennent des formules (liens vers d'autres
feuilles) - je voudrais récupérer le numéro de colonne de la dernière
colonne qui ne contient aucune valeur

"LSteph" a écrit dans le message de groupe de
discussion : uc8CL7r$
...?
tu veux lancer une recherche (ce sera forcément vba)
ou
tu voudrais une formule



thomas a écrit :
Merci

c'est directement dans la feuille de calcul que je veux connaître la
recherche, pas en VBA. je mets ce code dans une fonction alors? et plutôt
que UsedRange je passe le nom de la zone en paramètre?


"Daniel.C" a écrit dans le message de groupe de
discussion : Ob2t#tr$
Bonjour.
With ActiveSheet.UsedRange
Colonne = .Column + .Columns.Count - 1
End With
Cordialement.
Daniel
"thomas" <nomail> a écrit dans le message de news:
er5Tifr$
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un
tableau?

Cette dernière colonne n'est pas toujours la même

Merci






Avatar
thomas
oui mais je ne veux pas de boite

je veux simplement aller chercher les valeurs de la dernière colonne d'un
tableau (par exemple avec RECHERCHEV() ) mais pour cela il faut que je
connaisse le numéro de cette dernière colonne - donc une fonction qui me
ramène ce numéro de dernière colonne ce serait une bonne solution

"LSteph" a écrit dans le message de groupe de
discussion : OyZ6J5r$
..oupsss
trompé de boiboite

Sub cherchlastcol()
With [3:3]
.Cells(.Cells.Count).End(xlToLeft).EntireColumn.Activate
End With
Application.Dialogs(xlDialogFormulaReplace).Show
End Sub



thomas a écrit :
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un
tableau?

Cette dernière colonne n'est pas toujours la même

Merci



Avatar
LSteph
=(MAX(SI(NBCAR(3:3)>0;COLONNE(3:3);"")))
à rentrer en matricielle
ctrl+maj+entrée

renvoie le numéro de colonne la dernière cellule remplie de la ligne 3

'lSteph


thomas a écrit :
ben une formule qui permette de faire la recherche directement dans la
feuille. toutes les colonnes contiennent des formules (liens vers d'autres
feuilles) - je voudrais récupérer le numéro de colonne de la dernière
colonne qui ne contient aucune valeur

"LSteph" a écrit dans le message de groupe de
discussion : uc8CL7r$
...?
tu veux lancer une recherche (ce sera forcément vba)
ou
tu voudrais une formule



thomas a écrit :
Merci

c'est directement dans la feuille de calcul que je veux connaître la
recherche, pas en VBA. je mets ce code dans une fonction alors? et plutôt
que UsedRange je passe le nom de la zone en paramètre?


"Daniel.C" a écrit dans le message de groupe de
discussion : Ob2t#tr$
Bonjour.
With ActiveSheet.UsedRange
Colonne = .Column + .Columns.Count - 1
End With
Cordialement.
Daniel
"thomas" <nomail> a écrit dans le message de news:
er5Tifr$
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un
tableau?

Cette dernière colonne n'est pas toujours la même

Merci







Avatar
LSteph
=(MAX(SI(NBCAR(3:3)>0;COLONNE(3:3);"")))

en matricielle Ctrl+maj+entrée



thomas a écrit :
oui mais je ne veux pas de boite

je veux simplement aller chercher les valeurs de la dernière colonne d'un
tableau (par exemple avec RECHERCHEV() ) mais pour cela il faut que je
connaisse le numéro de cette dernière colonne - donc une fonction qui me
ramène ce numéro de dernière colonne ce serait une bonne solution

"LSteph" a écrit dans le message de groupe de
discussion : OyZ6J5r$
..oupsss
trompé de boiboite

Sub cherchlastcol()
With [3:3]
.Cells(.Cells.Count).End(xlToLeft).EntireColumn.Activate
End With
Application.Dialogs(xlDialogFormulaReplace).Show
End Sub



thomas a écrit :
Bonjour,

Comment faire une recherche dans la dernière colonne non vide d'un
tableau?

Cette dernière colonne n'est pas toujours la même

Merci





1 2 3 4