OVH Cloud OVH Cloud

Sélectionner plage de valeurs

3 réponses
Avatar
Vince
Bonjour à tous!

Une macro insère une formule dans les lignes 1 à 1000 mais la formule me
renvoie une valeur uniquement pour les 600 et quelques premières lignes.

J'aimerais sélectionner cette plage de valeur en vue d'un export.

Si j'utilise CTRL-SHIFT-END, Excel sélectionne toutes les 1000 lignes.
Comment lui-dire de me sélectionner que les cellules qui contiennent une
valeur ?

Merci d'avance de votre réponse et bonne journée
Vince

3 réponses

Avatar
Olivier

Bonjour à tous!

Une macro insère une formule dans les lignes 1 à 1000 mais la formule me
renvoie une valeur uniquement pour les 600 et quelques premières lignes.

J'aimerais sélectionner cette plage de valeur en vue d'un export.

Si j'utilise CTRL-SHIFT-END, Excel sélectionne toutes les 1000 lignes.
Comment lui-dire de me sélectionner que les cellules qui contiennent une
valeur ?

Merci d'avance de votre réponse et bonne journée
Vince
Essaie donc le code suivant :


range("A1").select
activecell.end(xlright).select
activecell.end(xldown).selet

Dis-nous quoi quand tu as essayé...

Avatar
Vince
Cela ne fonctionne pas non plus mais j'ai trouvé une alternative: je fais
supprimer les lignes avec les commandes suivantes:

For i = Range("D1001").End(xlUp).Row To 1 Step -1
If Range("D" & i) = 0 Then Rows(i).Delete Shift:=xlUp
Next

Le seul problème est que ça prend du temps mais bon c'est le seul truc que
j'aie trouvé.

Merci de votre aide quand même





Bonjour à tous!

Une macro insère une formule dans les lignes 1 à 1000 mais la formule me
renvoie une valeur uniquement pour les 600 et quelques premières lignes.

J'aimerais sélectionner cette plage de valeur en vue d'un export.

Si j'utilise CTRL-SHIFT-END, Excel sélectionne toutes les 1000 lignes.
Comment lui-dire de me sélectionner que les cellules qui contiennent une
valeur ?

Merci d'avance de votre réponse et bonne journée
Vince
Essaie donc le code suivant :


range("A1").select
activecell.end(xlright).select
activecell.end(xldown).selet

Dis-nous quoi quand tu as essayé...



Avatar
JB
Bonjour,

Je ne sais pas si cela correspond à ton pb.

Voir PJ:http://cjoint.com/?gArEQ6d7FC

Sub essai()
ActiveWindow.DisplayZeros = True
x = [A:A].Find("0", SearchOrder:=xlByRows, SearchDirection:=xlNext,
LookAt:=xlWhole, LookIn:=xlValues).Row
Range("A1", "B" & x - 1).Select
End Sub

Sub essai2()
ActiveWindow.DisplayZeros = False
x = [A:A].Find("", SearchOrder:=xlByRows, SearchDirection:=xlNext,
LookAt:=xlWhole, LookIn:=xlValues).Row
Range("A1", "B" & x - 1).Select
End Sub

Cordialement JB


Bonjour à tous!

Une macro insère une formule dans les lignes 1 à 1000 mais la formule me
renvoie une valeur uniquement pour les 600 et quelques premières lignes.

J'aimerais sélectionner cette plage de valeur en vue d'un export.

Si j'utilise CTRL-SHIFT-END, Excel sélectionne toutes les 1000 lignes.
Comment lui-dire de me sélectionner que les cellules qui contiennent une
valeur ?

Merci d'avance de votre réponse et bonne journée
Vince