J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en
liste déroulante pour représenter une semaine. Cela me permetterais de davoir
une vue globale moin lorde par semaine et de pouvoir aller en détail par
jour.
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
LSteph
Bonsoir, la liste déroulante c'est verticalement.
Suggestion par le code exemple: http://cjoint.com/?drwnMmGgnp
Private Sub CommandButton1_Click() With Range("b:h").Columns .Hidden = Not .Hidden End With End Sub
'Cordialement.
'lSteph
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais de davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
Bonsoir,
la liste déroulante c'est verticalement.
Suggestion par le code exemple: http://cjoint.com/?drwnMmGgnp
Private Sub CommandButton1_Click()
With Range("b:h").Columns
.Hidden = Not .Hidden
End With
End Sub
'Cordialement.
'lSteph
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en
liste déroulante pour représenter une semaine. Cela me permetterais de davoir
une vue globale moin lorde par semaine et de pouvoir aller en détail par
jour.
Suggestion par le code exemple: http://cjoint.com/?drwnMmGgnp
Private Sub CommandButton1_Click() With Range("b:h").Columns .Hidden = Not .Hidden End With End Sub
'Cordialement.
'lSteph
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais de davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
AH60
Bonsoir
ceci peut être voir le lein http://cjoint.com/?drwqpe4m2J
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" And Target.Count = 1 Then Rows("1:1").Find(What:=Target.Value, LookIn:=xlValues).Offset(4).Select End If End Sub
Abed_H
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais de davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
Bonsoir
ceci peut être
voir le lein http://cjoint.com/?drwqpe4m2J
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" And Target.Count = 1 Then
Rows("1:1").Find(What:=Target.Value, LookIn:=xlValues).Offset(4).Select
End If
End Sub
Abed_H
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en
liste déroulante pour représenter une semaine. Cela me permetterais de davoir
une vue globale moin lorde par semaine et de pouvoir aller en détail par
jour.
ceci peut être voir le lein http://cjoint.com/?drwqpe4m2J
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" And Target.Count = 1 Then Rows("1:1").Find(What:=Target.Value, LookIn:=xlValues).Offset(4).Select End If End Sub
Abed_H
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais de davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
JB
Bonjour,
Affiche la colonne du jour choisi:
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Target = "" Then Columns("B:F").Hidden = False Else Columns("B:F").Hidden = True Columns(Application.Match(Target, [B1:H1], 0) + 1).Hidden = False End If End If End Sub
-Touche suppr pour toute la semaine
http://cjoint.com/?dsh3SkbTDA
JB
On 17 mar, 20:30, Michel Deslauriers <Michel wrote:
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais d e davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
Bonjour,
Affiche la colonne du jour choisi:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target = "" Then
Columns("B:F").Hidden = False
Else
Columns("B:F").Hidden = True
Columns(Application.Match(Target, [B1:H1], 0) + 1).Hidden =
False
End If
End If
End Sub
-Touche suppr pour toute la semaine
http://cjoint.com/?dsh3SkbTDA
JB
On 17 mar, 20:30, Michel Deslauriers <Michel
Deslauri...@discussions.microsoft.com> wrote:
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en
liste déroulante pour représenter une semaine. Cela me permetterais d e davoir
une vue globale moin lorde par semaine et de pouvoir aller en détail par
jour.
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Target = "" Then Columns("B:F").Hidden = False Else Columns("B:F").Hidden = True Columns(Application.Match(Target, [B1:H1], 0) + 1).Hidden = False End If End If End Sub
-Touche suppr pour toute la semaine
http://cjoint.com/?dsh3SkbTDA
JB
On 17 mar, 20:30, Michel Deslauriers <Michel wrote:
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais d e davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
JB
Variante:
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Target = "Tout" Then Columns("B:F").Hidden = False Else Columns("B:F").Hidden = True Columns(Application.Match(Target, [B1:H1], 0) + 1).Hidden = False End If End If End Sub
http://cjoint.com/?dsihmgQTRD
JB
On 17 mar, 20:30, Michel Deslauriers <Michel wrote:
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais d e davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
Variante:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target = "Tout" Then
Columns("B:F").Hidden = False
Else
Columns("B:F").Hidden = True
Columns(Application.Match(Target, [B1:H1], 0) + 1).Hidden =
False
End If
End If
End Sub
http://cjoint.com/?dsihmgQTRD
JB
On 17 mar, 20:30, Michel Deslauriers <Michel
Deslauri...@discussions.microsoft.com> wrote:
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en
liste déroulante pour représenter une semaine. Cela me permetterais d e davoir
une vue globale moin lorde par semaine et de pouvoir aller en détail par
jour.
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Target = "Tout" Then Columns("B:F").Hidden = False Else Columns("B:F").Hidden = True Columns(Application.Match(Target, [B1:H1], 0) + 1).Hidden = False End If End If End Sub
http://cjoint.com/?dsihmgQTRD
JB
On 17 mar, 20:30, Michel Deslauriers <Michel wrote:
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais d e davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
LSteph
Bojour, Sans VBA http://cjoint.com/?dskg3B8IZ4
Sélectionner ta semaine (mettre des petis 1 dans chaque jour et une sommeà droite) Menu données | Grouper et Créer un plan Plan automatique
Cordialement.
lSteph
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais de davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.
Merci d'avance Michel de Montéal
Bojour,
Sans VBA http://cjoint.com/?dskg3B8IZ4
Sélectionner ta semaine
(mettre des petis 1 dans chaque jour et une sommeà droite)
Menu données |
Grouper et Créer un plan
Plan automatique
Cordialement.
lSteph
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en
liste déroulante pour représenter une semaine. Cela me permetterais de davoir
une vue globale moin lorde par semaine et de pouvoir aller en détail par
jour.
Sélectionner ta semaine (mettre des petis 1 dans chaque jour et une sommeà droite) Menu données | Grouper et Créer un plan Plan automatique
Cordialement.
lSteph
J'aimerais créé 7 colonnes pour les jours de la sem. et les regrouper en liste déroulante pour représenter une semaine. Cela me permetterais de davoir une vue globale moin lorde par semaine et de pouvoir aller en détail par jour.