Derniere ligne et zone de recherche d'une autre feuille
3 réponses
Alf
Bonjour =C3=A0 tous,
Dans un classeur Excel, j'active la Feuil1.
Je voudrais r=C3=A9cup=C3=A9rer la derni=C3=A8re ligne de la Feuil2 et d=C3=
=A9finir une zone de recherche en proc=C3=A9dant comme suis,
j=3D2
NumLigFin =3D Sheets(j).Range("A1").End(xlDown).Row
Set Myrange =3D Sheets(j).Range("B2:G5000")
=C3=87a ne marche pas. Je ne vois pas d=E2=80=99o=C3=B9 vient l'erreur.
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
isabelle
bonjour Alf,
peut être qu'il n'y a pas de valeur en colonne A si la zone de recherche est B2:G5000 il faudrait rechercher la derniere cellule de la colonne B
j=2 NumLigFin = Sheets(j).Range("B1").End(xlDown).Row Set Myrange = Sheets(j).Range("B2:G" & NumLigFin)
isabelle
Le 2016-05-28 à 12:00, Alf a écrit :
Bonjour à tous,
Dans un classeur Excel, j'active la Feuil1. Je voudrais récupérer la dernière ligne de la Feuil2 et définir une zone de recherche en procédant comme suis,
j=2 NumLigFin = Sheets(j).Range("A1").End(xlDown).Row Set Myrange = Sheets(j).Range("B2:G5000")
Ça ne marche pas. Je ne vois pas d’où vient l'erreur.
Pouvez vous m'aider ? D'avance Merci à tous
bonjour Alf,
peut être qu'il n'y a pas de valeur en colonne A
si la zone de recherche est B2:G5000
il faudrait rechercher la derniere cellule de la colonne B
j=2
NumLigFin = Sheets(j).Range("B1").End(xlDown).Row
Set Myrange = Sheets(j).Range("B2:G" & NumLigFin)
isabelle
Le 2016-05-28 à 12:00, Alf a écrit :
Bonjour à tous,
Dans un classeur Excel, j'active la Feuil1.
Je voudrais récupérer la dernière ligne de la Feuil2 et définir une zone de recherche en procédant comme suis,
j=2
NumLigFin = Sheets(j).Range("A1").End(xlDown).Row
Set Myrange = Sheets(j).Range("B2:G5000")
Ça ne marche pas. Je ne vois pas d’où vient l'erreur.
peut être qu'il n'y a pas de valeur en colonne A si la zone de recherche est B2:G5000 il faudrait rechercher la derniere cellule de la colonne B
j=2 NumLigFin = Sheets(j).Range("B1").End(xlDown).Row Set Myrange = Sheets(j).Range("B2:G" & NumLigFin)
isabelle
Le 2016-05-28 à 12:00, Alf a écrit :
Bonjour à tous,
Dans un classeur Excel, j'active la Feuil1. Je voudrais récupérer la dernière ligne de la Feuil2 et définir une zone de recherche en procédant comme suis,
j=2 NumLigFin = Sheets(j).Range("A1").End(xlDown).Row Set Myrange = Sheets(j).Range("B2:G5000")
Ça ne marche pas. Je ne vois pas d’où vient l'erreur.
Pouvez vous m'aider ? D'avance Merci à tous
MichD
Bonjour,
Dim MyRange As Range, DerLig As Long
With Worksheets("Feuil1") ' Nom de l'onglet de la feuille à adapter DerLig =. Cells.Find("*", LookIn:=xlValues, _ SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
Set MyRange = .Range("B2:B" & DerLig) End With
La variable "DerLig" va contenir le numéro de la ligne le plus bas de la feuille occupée par une "VALEUR" et ce peu importe la colonne où cette valeur se retrouve.
MichD
Bonjour,
Dim MyRange As Range, DerLig As Long
With Worksheets("Feuil1") ' Nom de l'onglet de la feuille à adapter
DerLig =. Cells.Find("*", LookIn:=xlValues, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
Set MyRange = .Range("B2:B" & DerLig)
End With
La variable "DerLig" va contenir le numéro de la ligne le plus bas de la feuille
occupée par une "VALEUR" et ce peu importe la colonne où cette valeur se retrouve.
With Worksheets("Feuil1") ' Nom de l'onglet de la feuille à adapter DerLig =. Cells.Find("*", LookIn:=xlValues, _ SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
Set MyRange = .Range("B2:B" & DerLig) End With
La variable "DerLig" va contenir le numéro de la ligne le plus bas de la feuille occupée par une "VALEUR" et ce peu importe la colonne où cette valeur se retrouve.