Tri d'onglet suivant sommaire

Pierrot93

XLDnaute Barbatruc

• 14 Juillet 2009

• #2

Re : Tri d'onglet suivant sommaire

Bonjour Fred

tes variables ne sont pas définies... pas trop top... tu utilises l'instruction "set" qui attribue une variable objet, alors que dans ta cellule ne récupère le nom de l'onglet. Essaye peut être en modifiant comme suit :

Code:

    Dim NomFeuille As Worksheet
    Set NomFeuille = Sheets(Sheets("Sommaire").Cells(5, 2).Value)

J'ai pas regardé la suite... mais il me semble que tu vas rencontrer le même problème. A voir...

bonne journée
@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Juillet 2009

• #3

Re : Tri d'onglet suivant sommaire

Re,

Perso, je l'aurais peut être codé ainsi, enfin si j'ai bien compris, à tester :

Code:

Sub Trier_Classeur_Suivant_Sommaire()
Dim i As Integer
With Sheets("Sommaire")
    For i = 5 To .Range("B65536").End(xlUp).Row
        Sheets(.Cells(i, 2).Value).Move after:=Sheets(i - 4)
    Next i
End With
End Sub

@+

 

Vote positif 0 Vote négatif

F

Fred44

XLDnaute Nouveau

• 14 Juillet 2009

• #4

Re : Tri d'onglet suivant sommaire

Merci Pierro de me répondre,

Je déclare très rarement mes variables... et même avec ta manip cela bloque toujours sur le nom de la feuille récupérée...
J'en perds mon latin...
Y aurait-il des caractères illisible pour Excel? J'ai déjà eu le cas avec les espaces

Encore merci de t'être pencher sur mon problème

@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Juillet 2009

• #5

Re : Tri d'onglet suivant sommaire

Re

pas sur que tu ais vu mon post de 11h30...

 

Vote positif 0 Vote négatif

F

Fred44

XLDnaute Nouveau

• 14 Juillet 2009

• #6

Re : Tri d'onglet suivant sommaire

Pierrot93 à dit:

Re

pas sur que tu ais vu mon post de 11h30...

Cliquez pour agrandir...

Effectivement j'ai loupé ton dernier post, cela a fonctionné très bien et.... je tombe sur le cul... des fois on cherche plus compliqué qu'il ne faut
Encore un grand merci... toi et les autres vous m'épatez toujours avec vos solutions.

Cordialement Fred

Bonne continuation au forum.

 

Vote positif 0 Vote négatif