OVH Cloud OVH Cloud

selectionner les dernières lignes importer

2 réponses
Avatar
professeur kwayle
bonjour
J'importe un tableau sur excel par une requete web.
Ce tableau s'incrémente régulièrement.
Je voudrais que ma macro n'est pas à repasser sur tout le tableau à chaque
fois que je la lance mais uniquement sur les derniers enregistrements.

Je ne sais pas si j'ai été clair

2 réponses

Avatar
isabelle
bonjour,

selon la méthode utilisé pour mettre à jour la requête, il faudra peut être adapter au bon événement,
avant de copier cette macro sur la page code de la feuille,
il faut ajouter 2 Nom : fin1 et fin2 et mettre leur référence = à la valeur de la dernière ligne de la feuille.
les Nom [fin1] et [fin2] serviront de variable pour la ligne de départ et celle de fin.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
ActiveWorkbook.Names.Add Name:="fin1", RefersTo:=[fin2] + 1
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveWorkbook.Names.Add Name:="fin2", RefersTo:=Range("A65536").End(xlUp).Row
End Sub

isabelle


bonjour
J'importe un tableau sur excel par une requete web.
Ce tableau s'incrémente régulièrement.
Je voudrais que ma macro n'est pas à repasser sur tout le tableau à chaque
fois que je la lance mais uniquement sur les derniers enregistrements.

Je ne sais pas si j'ai été clair


Avatar
professeur kwayle
trop fort.........e


bonjour,

selon la méthode utilisé pour mettre à jour la requête, il faudra peut être adapter au bon événement,
avant de copier cette macro sur la page code de la feuille,
il faut ajouter 2 Nom : fin1 et fin2 et mettre leur référence = à la valeur de la dernière ligne de la feuille.
les Nom [fin1] et [fin2] serviront de variable pour la ligne de départ et celle de fin.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
ActiveWorkbook.Names.Add Name:="fin1", RefersTo:=[fin2] + 1
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveWorkbook.Names.Add Name:="fin2", RefersTo:=Range("A65536").End(xlUp).Row
End Sub

isabelle


bonjour
J'importe un tableau sur excel par une requete web.
Ce tableau s'incrémente régulièrement.
Je voudrais que ma macro n'est pas à repasser sur tout le tableau à chaque
fois que je la lance mais uniquement sur les derniers enregistrements.

Je ne sais pas si j'ai été clair