Classer variable par onglet

[azerty29]

Bonjour,

On peut voir ( piece jointe ) que ma colonne 2 (B) présente plusieurs fonction
Ce fichier est obtenue par une importation c'est a dire que il peut y avoir 5 comme 10 lignes, a chaque ouverture cela peut etre modifié. il existe de nombreuses fonctions, chaque ligne contient une seule fonction.

J'aurais aimé les classer par page et que cela se fasse automatiquement,
Lorsque je lance ma page, si j'active les macro que mon importation au lieu de tous mettre sur une seule page les classe par fonction et par page

Sur la page 1 se sont mes données obtenue par une importation et j'aimerai obtenir un resultat qui ressemble au autres pages.

Merci
Cordialement

 

[titiborregan5]

Re : Classer variable par onglet

il faut cliquer droit sur un des bords je crois...ou essaie avec ctrl pour sélectionner l'objet d'abord!

 

[azerty29]

Re : Classer variable par onglet

Sa ne fonctionne pas, c'est assez etonnant

 

[titiborregan5]

Re : Classer variable par onglet

n'ayant pas 2003 je ne peux pas t'aider. Mais en cherchant ici ou ailleurs tu devrais trouver tout ça!

 

[azerty29]

Re : Classer variable par onglet

D'accord , merci beaucoup pour ton aide en tout cas
Merci !

 

[Pierrot93]

Re : Classer variable par onglet

Bonjour,

sous 2003 => click droit sur l'objet => format de contrôle => onglet "propriétés"

bonne journée
@+

 

[azerty29]

Re : Classer variable par onglet

ah oui, format de controle donnée que la police, mais quand tu clic sur le rebord a ce moment format de controle te donne plusieurs choix, merci de l'astuce et titiborregan5 avait encore la solution 😉 Merci à vous 2

 

[azerty29]

Re : Classer variable par onglet

Désolé de vous déranger encore une fois, mais je voulais savoir si c'est possible que lorsque qu'une page se creer, les colonne de AX à BL soit masquer ? si cela est possible comment faire ?

 

[Pierrot93]

Re : Classer variable par onglet

Bonjour,

essaye ceci,à placer dans le module "thisworkbook" :

Option Explicit
Private Sub Workbook_NewSheet(ByVal Sh As Object)
Sh.Columns("AX:BL").Hidden = True
End Sub

 

[azerty29]

Re : Classer variable par onglet

J'ai déjà ceci dans mon "thisWorbook"

"
Private Sub Workbook_Open()
Recupere
End Sub
"

Elle effectue ma macro d'importation, je dois placer à l'interieur de la boucle??

J'ai essayé a l'exterieur cela ne fonctionne pas

 

[Pierrot93]

Re : Classer variable par onglet

Re,

tu la place après ta sub "open".. àprès le "end sub" de celle-ci

 

[azerty29]

Re : Classer variable par onglet

Hein ? je n'ai pas compris , je la place a l'interieur apres "Private Sub Workbook_Open()" ? et apres le end Sub de celle ci ? je ne comprend pas ta phrase ?? :/

 

[Pierrot93]

Re : Classer variable par onglet

Re,

comme ceci :

Private Sub Workbook_Open()
Recupere
End Sub

Private Sub Workbook_NewSheet(ByVal Sh As Object)
Sh.Columns("AX:BL").Hidden = True
End Sub

 

[azerty29]

Re : Classer variable par onglet

Sa ne fonctionne pas, les feuilles ajoutées ont encore les colonnes de AX à BL visible

 

[Pierrot93]

Re : Classer variable par onglet

Re,

bah.. comprends pas... fonctionne chez moi sous 2003.... vérie peut être que la macro se déclenche bien.... mets un point d'arrêt sur la première ligne de la "sub" (dans l'éditeur vba, touche de fonction F9)

 

[azerty29]

Re : Classer variable par onglet

Je pige pas pourquoi ça marche pas

Private Sub Workbook_Open()
Recupere

compteur = 0
For Each cellule In Sheets(1).Range("B6:B100")
If Not IsNumeric(cellule) And cellule <> "" Then compteur = compteur + 1
Next cellule
If compteur = 0 Then MsgBox ("Il y a aucun indicateur inférieur au seuil!")
If compteur > 0 Then MsgBox ("Il y a " & compteur & " indicateur(s) inferieur au seuil! Cliquer pour Trier!")

End Sub

Private Sub Workbook_NewSheet(ByVal Sh As Object)
Sh.Columns("AX:BL").Hidden = True
End Sub

J'ai bien ce code la, j'ai juste rajouter un compteur de ligne, normalement ça devrait fonctionner tout sa ? ( tous marche sauf le fait que les feuille les lignes ne soit pas masqués