Je voudrais savoir s'il est possible à l'ouverture d'un classeur de classer
les onglets dans un ordre precis.
Il arrive que des deplacements se produisent (mauvaises manip) plusieurs
personnes accedant à ce fichier...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
jean-Paul
Je ne sais pas si c'est posssible avec un code VBA, mais tu peux proteger ton classeur avec Outil/protection/Proteger le Classeur ( avec un mot de passe facultatif ) ce qui empèchera quiquonque de changer l'ordre des feuilles et empèchera leur suppression. -- jps
Bonjour,
Je voudrais savoir s'il est possible à l'ouverture d'un classeur de classer les onglets dans un ordre precis. Il arrive que des deplacements se produisent (mauvaises manip) plusieurs personnes accedant à ce fichier...
Merci de votre aide
Lionel
Je ne sais pas si c'est posssible avec un code VBA, mais tu peux proteger ton
classeur avec Outil/protection/Proteger le Classeur ( avec un mot de passe
facultatif ) ce qui empèchera quiquonque de changer l'ordre des feuilles et
empèchera leur suppression.
--
jps
Bonjour,
Je voudrais savoir s'il est possible à l'ouverture d'un classeur de classer
les onglets dans un ordre precis.
Il arrive que des deplacements se produisent (mauvaises manip) plusieurs
personnes accedant à ce fichier...
Je ne sais pas si c'est posssible avec un code VBA, mais tu peux proteger ton classeur avec Outil/protection/Proteger le Classeur ( avec un mot de passe facultatif ) ce qui empèchera quiquonque de changer l'ordre des feuilles et empèchera leur suppression. -- jps
Bonjour,
Je voudrais savoir s'il est possible à l'ouverture d'un classeur de classer les onglets dans un ordre precis. Il arrive que des deplacements se produisent (mauvaises manip) plusieurs personnes accedant à ce fichier...
Merci de votre aide
Lionel
JB
Bonjour,
Ordre alphabétique.
Sub tri_ongletDirect() Application.ScreenUpdating = False For i = 1 To Sheets.Count For j = i To Sheets.Count If UCase(Sheets(j).Name) < UCase(Sheets(i).Name) Then Sheets(i).Move before:=Sheets(j) Sheets(j).Move before:=Sheets(i) End If Next j Next i End Sub
Cordiaement JB
Bonjour,
Je voudrais savoir s'il est possible à l'ouverture d'un classeur de cla sser les onglets dans un ordre precis. Il arrive que des deplacements se produisent (mauvaises manip) plusieurs personnes accedant à ce fichier...
Merci de votre aide
Lionel
Bonjour,
Ordre alphabétique.
Sub tri_ongletDirect()
Application.ScreenUpdating = False
For i = 1 To Sheets.Count
For j = i To Sheets.Count
If UCase(Sheets(j).Name) < UCase(Sheets(i).Name) Then
Sheets(i).Move before:=Sheets(j)
Sheets(j).Move before:=Sheets(i)
End If
Next j
Next i
End Sub
Cordiaement JB
Bonjour,
Je voudrais savoir s'il est possible à l'ouverture d'un classeur de cla sser
les onglets dans un ordre precis.
Il arrive que des deplacements se produisent (mauvaises manip) plusieurs
personnes accedant à ce fichier...
Sub tri_ongletDirect() Application.ScreenUpdating = False For i = 1 To Sheets.Count For j = i To Sheets.Count If UCase(Sheets(j).Name) < UCase(Sheets(i).Name) Then Sheets(i).Move before:=Sheets(j) Sheets(j).Move before:=Sheets(i) End If Next j Next i End Sub
Cordiaement JB
Bonjour,
Je voudrais savoir s'il est possible à l'ouverture d'un classeur de cla sser les onglets dans un ordre precis. Il arrive que des deplacements se produisent (mauvaises manip) plusieurs personnes accedant à ce fichier...
