Recherche ligne et colonne maxi

Tibo

XLDnaute Barbatruc

• 30 Janvier 2009

• #2

Re : Recherche ligne et colonne maxi

Bonsoir,

Un essai avec formules matricielles à placer en dehors de la zone à tester :

Pour la ligne :

Code:

=MAX((A1:IV50<>"")*LIGNE(A1:IV50))

pour la colonne :

Code:

=MAX((1:15<>"")*COLONNE(1:15))

Formules matricielles à valider par CTRL + MAJ + ENTREE

Je te laisse tester

@+

 

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 30 Janvier 2009

• #3

Re : Recherche ligne et colonne maxi

Bonjour marmotte18,
Tibo🙂,

si par macro ça t'intéresse:

Code:

msgbox activesheet.usedrange.specialcells(xlCellTypeLastCell).column
msgbox activesheet.usedrange.specialcells(xlCellTypeLastCell).row

 

Vote positif 0 Vote négatif

CB60

XLDnaute Barbatruc

• 30 Janvier 2009

• #4

Re : Recherche ligne et colonne maxi

Bonsoir
Regarde si c'est cela que tu recherche:

HTML:

Sub Macro1()
    Selection.SpecialCells(xlCellTypeLastCell).Select
        With Selection
        MsgBox Selection.Address
    End With
    
End Sub

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 30 Janvier 2009

• #5

Re : Recherche ligne et colonne maxi

Bonsoir marmotte,

Le plus simple ? Utiliser des fonctions macros Excel 4.0.

Définir (menu Insertion-Nom) le nom Derlig par la formule :

=LIRE.DOCUMENT(10)+INDIRECT("IV1")

puis le nom Dercol par :

=LIRE.DOCUMENT(12)+INDIRECT("IV1")

En entrant =Derlig et =Dercol dans 2 cellules, on obtient le résultat souhaité.

A noter que la fonction INDIRECT (qui est volatile) est utilisée ici pour forcer le recalcul des formules.

A+

Edit 1 : le temps de rédiger, plein de monde ! salut à tous 🙂

Edit 2 : en fait on obtient ainsi la position de la dernière cellule, qui peut être en dehors de la zone des valeurs si le fichier n'est pas d'abord enregistré. La solution de Tibo paraît la plus sûre.

 

Dernière édition: 30 Janvier 2009

Vote positif 0 Vote négatif

marmotte18

XLDnaute Impliqué

• 30 Janvier 2009

• #6

Re : Recherche ligne et colonne maxi

Bonjour Tibo,

Désolé mais ton code ne fonctionne pas. Il produit un problème de références circulaires.

Merci malgré tout de t'être penché sur mon problème.

 

Vote positif 0 Vote négatif

marmotte18

XLDnaute Impliqué

• 30 Janvier 2009

• #7

Re : Recherche ligne et colonne maxi

Bonjour skoobi,

Ta solution est parfaite ! Merci beaucoup !

 

Vote positif 0 Vote négatif

marmotte18

XLDnaute Impliqué

• 30 Janvier 2009

• #8

Re : Recherche ligne et colonne maxi

Bonjour CB60,

Ta solution est très bonne également mais je souhaitais obtenir séparément le N° de ligne et le N° de colonne.

Merci pour ton aide

 

Vote positif 0 Vote négatif

marmotte18

XLDnaute Impliqué

• 30 Janvier 2009

• #9

Re : Recherche ligne et colonne maxi

Bonsoir job75,

Ta solution est intéressante. Par contre, le résultat prend en compte les cellules où je mets les résultats ce qui modifie les résultats attendus.

Merci également pour ta réponse !

 

Vote positif 0 Vote négatif

CB60

XLDnaute Barbatruc

• 30 Janvier 2009

• #10

Re : Recherche ligne et colonne maxi

Bonsoir
Un autre exemple, tu aura le choix!!!

HTML:

Sub Macro1()
    Selection.SpecialCells(xlCellTypeLastCell).Select
        With Selection
        MsgBox "colonne " & Selection.Column & Chr(13) & "ligne " & Selection.Row
    End With
    
End Sub

 

Vote positif 0 Vote négatif