Object non defined bizarre

Version imprimable

27/05/2011, 19h13
Runsh63

Object non defined bizarre
Bonjour,

Ci-joint un bout de code qui bugge sans que je comprenne pourquoi, les noms de mes pages existant bien... Malgré ça j'ai le fameux "Application-defined or object-defined error". Pouvez-vous m'expliquer pourquoi SVP ? Je veux tout simplement coller deux colonnes de deux feuilles différentes sur une troisième, les données de l'une à la suite des données de l'autre

D'avance merci !
Code:

1 2 3 4 5 'Fusionner RAN et BS YTD With Sheets("Retreated Infoview data") .Range("A2:" & .Range("A2").End(xlDown)).Copy Sheets("Compile BS").Range("A2").End(xlDown).Offset(1, 0) End With
Cordialement,

Runsh
27/05/2011, 19h16
mercatog

Code:

.Range("A2:A" & .Range("A2").End(xlDown).Row)
27/05/2011, 19h19
Runsh63

Oups... Et là, je passe pas pour un abruti là?!?
Merci beaucoup mercatog, pas la première fois que vous me dépannez (en moins de deux minutes montre en main, vous êtes branché 24/24 - 7/7 sur le forum en appuyant constamment sur F5, c'est pas possible autrement...)

Vous saluant bien bas et vous souhaitant un bon WE !

Cordialement,

Runsh
27/05/2011, 19h23
mercatog

Pour plus de sécurité utilise plutôt

Code:

.Range("A2:A" & .Cells(.Rows.count,1).End(xlUp).Row)
27/05/2011, 19h26
Runsh63

Je suis plutôt bête et méchant et j'obéis car je sais que tu es considéré par tes pairs comme un monstre en VBA, mais peux-tu STP m'expliquer en quoi c'est plus fiable ? J'aime bien comprendre ce que j'écris, et malheureusement je suis vraiment néophyte en programmation VBA...

Merci d'avance !

Runsh
27/05/2011, 19h35
mercatog
Si tu as des données en A2, A3, A4 vide et donnée en A5 en Feuil4
Essaies ces code
Code:

1 2 3 4 5 6 7 Sub TEST() With Sheets("Feuil4") MsgBox .Range("A2").End(xlDown).Row MsgBox .Cells(.Rows.Count, 1).End(xlUp).Row End With End Sub
le premier te donnera 3
le 2ème 5

Maintenant tu as seulement une valeur en A2, les autres en dessous sont toutes vides

le premier donnera quoi?

PS: J'apprends encore dans ce forum par passion.
30/05/2011, 08h51
Runsh63

Bonjour mercatog,

En effet, dans le deuxième cas, la réponse ramenée devrait être 1,048,576 (je suis sous XL2007), la deuxième me ramènera bien 2. J'ai compris en quoi c'est plus fiable, merci beaucoup et bon début de semaine !

Runsh