Range et Cells en VBA Excel

Merci de la proposition. je vais continuer à chercher un peu.
Par exemple, on m'a suggéré d'écrire :
S2.Range(S2.Cells(2,3), S2.Cells(3, 3)).Select
et, ça marche, alors qu'aucune aide ne dit d'écrire un Range comme ça!
Il y a un principe dans Activate, Select , Range que je n'ai pas encore
saisi! Merci encore

Tu peux m'envoyer le fichier avec ce code si tu veux...

Peux-tu préciser ta version d'Excel ?

A bientôt

Pierre

"Pantagruel92" <Pantagruel92@discussions.microsoft.com> a écrit dans le
message de news: E8E8E780-8F66-4E03-9266-2ABD7ED44242@microsoft.com...

Pierre et Corona,
Merci de vos efforts. Si ça marche ailleurs, ça doit marcher chez
moi....je
reprendrai les recherches la semaine prochaine.
Pierre, oui, j'ai interverti lignes et colonnes dans mon exemple, mais je
te
rappelle que c'est à la "compil" que ça plante...
Corona, l'exemple donné est la totalité de l'appli, sans aucune variable
public nulle part!
Bon week-end à tous.

Re...

Note toutefois que range(cells(3,2),cells(3,3) n'est pas équivalent Ã
range("C2:C3") mais à range("B3:C3")

Je suppose que dans ton code réel, tu utilises des variables du style
range(cells(x,y),cells(y,y))

Vérifie donc bien que ces variables renvoient des valeurs compatibles
avec
les numéros des lignes et des cellules...

Ok?


--
Pierre Fauconnier (pierre.fauconnier@nospam.nospam)
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin (
proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"Pantagruel92" <Pantagruel92@discussions.microsoft.com> a écrit dans le
message de news: 6C2E5E93-0E78-45D2-8EA5-7AA12EB3FFB6@microsoft.com...

D'accord avec ton rajout, Corona, c'est plus "propre". Mais, en fait la
feuille d'où part la commande (dans mon cas un bouton de commande) est
la
feuille active : il n'est donc pas nécessaire de préciser si c'est
celle-lÃ
dans laquelle on veut travailler.
Quand au plantage, il donne une erreur
Erreur 1004
"la méthode Select de la classe range a échoué"

Il y a quelques temps que j'ai rencontré ce problème, avec des exemples
réels plus complexes, et je suis toujours obligé de changer
d'algorithme
et
de "faire autrement" pour m'en sortir...

Merci d'avoir répondu... Bon week end

Bonsoir,

Je ne vois pas où il se plante ?.
Pourrais-tu être plus précis.
Par contre, ton premier 'Range(Cells(3, 2), Cells(3, 3)).Select'
ne
précisant pas sur quelle feuille il doit travailler. Il serait bon de
le
préciser.
Supposant que tu souhaites qu'il se positionne sur la feuille 1,
il
y a
lieu d'ajouter s.activate.

Dim S As Worksheet
Dim S2 As Worksheet
Set S = Application.Worksheets("Feuil1")
Set S2 = Application.Worksheets("Feuil2")
S.Activate ' <<<<<<<<<<<<<<<<<<<<
Range(Cells(3, 2), Cells(3, 3)).Select
S2.Activate
Range(Cells(3, 2), Cells(3, 3)).Select

Philippe

"Pantagruel92" <Pantagruel92@discussions.microsoft.com> a écrit dans
le
message de news: EF084AA5-D9A6-46A2-BF06-AACE4F295DA9@microsoft.com...

Quelqu'un peut me dire pourquoi, dans le programme ci dessous, le
premier
range marche tres bien, et le second se plante?

Dim S As Worksheet
Dim S2 As Worksheet
Set S = Application.Worksheets("Feuil1")
Set S2 = Application.Worksheets("Feuil2")
Range(Cells(3, 2), Cells(3, 3)).Select
S2.Activate
Range(Cells(3, 2), Cells(3, 3)).Select

Le probleme est le meme si l'on ecrit la range : Range("C2:C3")
Merci!