Boucles sur colonnes

Pierrot93

XLDnaute Barbatruc

• 28 Juin 2010

• #16

Re : Boucles sur colonnes

Re,

comprends pas, chez moi ces codes fonctionnent... ta recherche s'effectue bien sur la feuille active du classeur actif (au premier plan de l'appli Excel) ... un tout petit fichier avec le modèle de donnée traité nous aiderait sans doute à y voir plus clair.....

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 28 Juin 2010

• #17

Re : Boucles sur colonnes

re,

Pierrot peux tu m'expliquer la signification des caractères en rouge s'il te plait ?

Split(Cells.Find("*", , xlValues, , 2, 2, 0).Address, "$")(1)

Cliquez pour agrandir...

merci 🙂

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 28 Juin 2010

• #18

Re : Boucles sur colonnes

Bonjour à Tous,

Et si tu joignais un fichier?

A+

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 28 Juin 2010

• #19

Re : Boucles sur colonnes

Pierrot93 à dit:

Re,

comprends pas, chez moi ces codes fonctionnent... ta recherche s'effectue bien sur la feuille active du classeur actif (au premier plan de l'appli Excel) ... un tout petit fichier avec le modèle de donnée traité nous aiderait sans doute à y voir plus clair.....

Cliquez pour agrandir...

mon code est celui-ci exactement :

Code:

ResWkb.Sheets("19540").Activate
Dim ca As String
ca = Split(Cells.Find("*", , xlValues, , 2, 2, 0).Address, "$")(1)
MsgBox (ca)

donc normalement la feuille 19540 est activée, non ? (la feuille 19540 n'est pas sur le même classeur que la feuille dans laquelle est contenue la macro)

 

Dernière édition: 28 Juin 2010

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Juin 2010

• #20

Re : Boucles sur colonnes

Re,

le dernier (1) correspond à l'élément renvoyé par la fonction "split", en l'occurence le 2ème élément, 0 étant le 1er dans la liste...

les 2 dans la méthode "find" correspondent aux arguments "SearchOrder" le 2 est la valeur associée à la constante "xlByColumns" et l'autre argument est "SearchDirection" le 2 vaut "xlPrevious"...

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Juin 2010

• #21

Re : Boucles sur colonnes

Re,

ton code est placé où ? dans un module standard, un module de feuille ou autre ?

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 28 Juin 2010

• #22

Re : Boucles sur colonnes

Re,

je ne peux pas mettre de fichier en ligne, les données sont confidentielles.

voici en gros mon projet :

classeur traitement (avec une seule feuille : "Traitement" sur laquelle il y a un bouton, tout mon code est dans le code de cette feuille)
Ce bouton ouvre un nouveau classeur sur lequel plusieurs pages sont copiées, dont la page 19540. Le nouveau classeur s'appelle ResWkb.

J'ai vérifié en fait ton code (qui me renvoi D) a effet sur a feuille traitement du classeur traitement...alors que je souhaiterai qu'elle ait effet sur la feuille 19540 du classeur ResWkb...

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Juin 2010

• #23

Re : Boucles sur colonnes

Re,

il y a sans doute lieu de préciser le nom des objets :

Code:

Dim c As String
With Workbooks("NomClasseur.xls").Sheets("nomfeuille")
    c = Split(.Cells.Find("*", , xlValues, , 2, 2, 0).Address, "$")(1)
End With

A utiliser dans un module standard...

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 28 Juin 2010

• #24

Re : Boucles sur colonnes

Re,

Gimli à dit:

je ne peux pas mettre de fichier en ligne, les données sont confidentielles

Cliquez pour agrandir...

Va lire la chartre du forum.

Construire un classeur exemple anonymisé pour éviter que les répondeurs perdent leur temps, n'est pas le bout du monde!

A+

[Edition] Hello Pierrot, content de te croiser

 

Dernière modification par un modérateur: 28 Juin 2010

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Juin 2010

• #25

Re : Boucles sur colonnes

Re

classeur traitement (avec une seule feuille : "Traitement" sur laquelle il y a un bouton, tout mon code est dans le code de cette feuille)

Cliquez pour agrandir...

le code s'exécutait sur la feuille dans lequel il était présent....

Edition : bonjour Hasco

 

Vote positif 0 Vote négatif