Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Dernière ligne

8 réponses
Avatar
rthompson
Bonjour à toutes et tous

Pourquoi ma macro coince-t-elle sur cette ligne


Range("A1").End(xlDown).Offset(1, 0).Select

Tout ce que je lui demande est de trouver la dernière ligne vide
et de passer à la suivante

Une idée???????


Merci et à bientôt


Rex

8 réponses

Avatar
JPMonnier
Bonjour,
essaie ceci
If Range("A1").End(xlDown) = Range("a65535") Then
Range("a65535").End(xlUp).Offset(1, 0).Select
Else
Range("A1").End(xlDown).Offset(1, 0).Select
End If

--
Cordialement

"rthompson" a écrit dans le message de
news:%
Bonjour à toutes et tous

Pourquoi ma macro coince-t-elle sur cette ligne


Range("A1").End(xlDown).Offset(1, 0).Select

Tout ce que je lui demande est de trouver la dernière ligne vide
et de passer à la suivante

Une idée???????


Merci et à bientôt


Rex





Avatar
stéphane
Bonjour,

normalement cela doit fonctionner, sauf si la colonne A est vide !

tu peux essayer

Cells(Cells.Rows.Count, 1).End(xlUp).Offset(1, 0).Select


Stéphane

"rthompson" a écrit dans le message de
news: %
Bonjour à toutes et tous

Pourquoi ma macro coince-t-elle sur cette ligne


Range("A1").End(xlDown).Offset(1, 0).Select

Tout ce que je lui demande est de trouver la dernière ligne vide
et de passer à la suivante

Une idée???????


Merci et à bientôt


Rex





Avatar
rthompson
Bonjour et merci

C'est impeccable

Merci beaucoup

Mais pourquoi??

Si tu as le temps une petite explication serait le bienvenu

Et en même temps si tu as une réponse pour le message de mémoire
n'hésite pas

A bientôt

Rex



"JPMonnier" a écrit dans le message de news:

Bonjour,
essaie ceci
If Range("A1").End(xlDown) = Range("a65535") Then
Range("a65535").End(xlUp).Offset(1, 0).Select
Else
Range("A1").End(xlDown).Offset(1, 0).Select
End If

--
Cordialement

"rthompson" a écrit dans le message de
news:%
Bonjour à toutes et tous

Pourquoi ma macro coince-t-elle sur cette ligne


Range("A1").End(xlDown).Offset(1, 0).Select

Tout ce que je lui demande est de trouver la dernière ligne vide
et de passer à la suivante

Une idée???????


Merci et à bientôt


Rex








Avatar
JPMonnier
S1 A1 n'a pas de données en dessous, la proc renvoyant
en A65535 de peut pas appliquer Offset(1,0)
qui correspondrait à A65536 hors du tableau
Cordialement
"rthompson" a
écrit dans le message de news:
Bonjour et merci

C'est impeccable

Merci beaucoup

Mais pourquoi??

Si tu as le temps une petite explication serait le bienvenu

Et en même temps si tu as une réponse pour le message de mémoire
n'hésite pas

A bientôt

Rex



"JPMonnier" a écrit dans le message de news:

Bonjour,
essaie ceci
If Range("A1").End(xlDown) = Range("a65535") Then
Range("a65535").End(xlUp).Offset(1, 0).Select
Else
Range("A1").End(xlDown).Offset(1, 0).Select
End If

--
Cordialement

"rthompson" a écrit dans le message de
news:%
Bonjour à toutes et tous

Pourquoi ma macro coince-t-elle sur cette ligne


Range("A1").End(xlDown).Offset(1, 0).Select

Tout ce que je lui demande est de trouver la dernière ligne vide
et de passer à la suivante

Une idée???????


Merci et à bientôt


Rex












Avatar
rthompson
Merci à toi mon cher


Il faut toujours prévoir l'imprévisible

A bientôt

Rex



"stéphane" a écrit dans le message de news:
ge92rf$iad$
Bonjour,

normalement cela doit fonctionner, sauf si la colonne A est vide !

tu peux essayer

Cells(Cells.Rows.Count, 1).End(xlUp).Offset(1, 0).Select


Stéphane

"rthompson" a écrit dans le message de
news: %
Bonjour à toutes et tous

Pourquoi ma macro coince-t-elle sur cette ligne


Range("A1").End(xlDown).Offset(1, 0).Select

Tout ce que je lui demande est de trouver la dernière ligne vide
et de passer à la suivante

Une idée???????


Merci et à bientôt


Rex









Avatar
rthompson
Bonjour et merci monsieur le professeur

C'est logique, mais il fallait y penser

Merci à toi et à bientôt

Rex



"JPMonnier" a écrit dans le message de news:
%
S1 A1 n'a pas de données en dessous, la proc renvoyant
en A65535 de peut pas appliquer Offset(1,0)
qui correspondrait à A65536 hors du tableau
Cordialement
"rthompson" a
écrit dans le message de news:
Bonjour et merci

C'est impeccable

Merci beaucoup

Mais pourquoi??

Si tu as le temps une petite explication serait le bienvenu

Et en même temps si tu as une réponse pour le message de mémoire
n'hésite pas

A bientôt

Rex



"JPMonnier" a écrit dans le message de news:

Bonjour,
essaie ceci
If Range("A1").End(xlDown) = Range("a65535") Then
Range("a65535").End(xlUp).Offset(1, 0).Select
Else
Range("A1").End(xlDown).Offset(1, 0).Select
End If

--
Cordialement

"rthompson" a écrit dans le message
de news:%
Bonjour à toutes et tous

Pourquoi ma macro coince-t-elle sur cette ligne


Range("A1").End(xlDown).Offset(1, 0).Select

Tout ce que je lui demande est de trouver la dernière ligne vide
et de passer à la suivante

Une idée???????


Merci et à bientôt


Rex















Avatar
Modeste
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :

C'est logique, mais il fallait y penser



élémentaire!!! qu'il disait l'autre ;o)))

S1 A1 n'a pas de données en dessous, la proc renvoyant
en A65535 de peut pas appliquer Offset(1,0)
qui correspondrait à A65536 hors du tableau





"When you have eliminated the impossible, whatever remains, however improbable, must be the truth."

--
@+
;o)))
Avatar
rthompson
;-))))))


"Modeste" a écrit dans le message de news:
On$
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :

C'est logique, mais il fallait y penser



élémentaire!!! qu'il disait l'autre ;o)))

S1 A1 n'a pas de données en dessous, la proc renvoyant
en A65535 de peut pas appliquer Offset(1,0)
qui correspondrait à A65536 hors du tableau





"When you have eliminated the impossible, whatever remains, however
improbable, must be the truth."

--
@+
;o)))