Finalisation de mon tableau Sortie VELO

Philo

XLDnaute Occasionnel
bonjour le forum et phlaurent55

je reviens vers vous pour une dernière petite modification par rapport a mon userform et mon tableau, serait-il possible que l'on puisse me rajouter les formules adéquat pour que cela soit incorporer a mon tableau c'est a dire pour mes sortie mixte pour moi cela devient impossible

merci de voir ce que vous pouvez faire

PS (pour excel 2007 & 2010)
amicalement votre
 

Pièces jointes

  • Test.xlsm
    563.7 KB · Affichages: 435
  • Test.xlsm
    563.7 KB · Affichages: 490
  • Test.xlsm
    563.7 KB · Affichages: 499
Dernière édition:

Philo

XLDnaute Occasionnel
Re : Finalisation de mon tableau Sortie VELO

c'est avec joie que je excuses

croyez vous que je puisse, quand je clique sur afficher feuille paramètre avec le togglebutton on peut ce retrouver sur cette feuille paramètre, peut-on justement pouvoir modifier les kms en cellule G1 et après des que je reclique sur masquer la feuille on peut revenir au mois ou on etait

merci de me dire si le problème et réalisable
 
Dernière édition:

Philo

XLDnaute Occasionnel
Re : Finalisation de mon tableau Sortie VELO

c'est avec joie que je excuses

croyez vous que je puisse, quand je clique sur afficher feuille paramètre avec le togglebutton on peut ce retrouver sur cette feuille paramètre, et peut-on justement pouvoir modifier les kms en cellule G1 et après des que je reclique sur masquer la feuille on peut revenir au mois ou on etait

merci de me dire si le problème et réalisable
 

JCGL

XLDnaute Barbatruc
Re : Finalisation de mon tableau Sortie VELO

Bonjour,

Copie / Colle ces lignes en lieu et place de celles présentes :

VB:
Private Sub ToggleButton1_Click()
If ToggleButton1 = True Then
        Sheets("Paramètre").Visible = True
        ToggleButton1.Caption = "Masquer la feuille Paramètre"
        ToggleButton1.BackColor = &HFF&
        ToggleButton1.ForeColor = &HFFFF&
        Sheets("Paramètre").Activate
    End If
    If ToggleButton1 = False Then
        Sheets("Paramètre").Visible = False
        ToggleButton1.Caption = "Afficher la feuille Paramètre"
        ToggleButton1.BackColor = &HFF&
        ToggleButton1.ForeColor = &HFFFF&
        Sheets(Month(Date)).Activate
    End If
End Sub

A+ à tous
 

Philo

XLDnaute Occasionnel
Re : Finalisation de mon tableau Sortie VELO

juste une petite précision
pourquoi je ne peut pas avoir accès a la cellule G1 de ma feuille paramètre alors que j'ai recopier le code tel quel post#34

merci de me dire ou j'ai fait l'erreur
 

Pièces jointes

  • Maquette Officiel Suivi Kms Vélo.xlsm
    549.4 KB · Affichages: 67
  • Maquette Officiel Suivi Kms Vélo.xlsm
    549.4 KB · Affichages: 67
  • Maquette Officiel Suivi Kms Vélo.xlsm
    549.4 KB · Affichages: 69
Dernière édition:

Philo

XLDnaute Occasionnel
Re : Finalisation de mon tableau Sortie VELO

Bonjour le forum
et mes respect JCGL je vois qu'il et même pas 8 heures et déjà une réponse a mon problème(mais non je plaisante)

merci encore une fois pour cette réponse rapide et ce merveilleux travail

amicalement
 

Philo

XLDnaute Occasionnel
Re : Finalisation de mon tableau Sortie VELO

bonjour le forum

luste une petite precision

est ce que quelqu'un peut me dire pourquoi je n'arrive pas a afficher dans mon userform1 mes sortie mini dans mon code VBA cela correspond a la ligne ---> Label31.Caption = CStr(Sheets("Paramètre").[H1]) & ".000" 'Sortie mini

alors que j'ai reussi a faire afficher la ligne Label32.Caption = CStr(Sheets("Paramètre").[I1]) & ".000" 'Sortie Maxi


merci de me dire ou ce trouve cette erreur

PS je pense que le souci viens de la feuille parametre cellule H1
 

Pièces jointes

  • JC Maquettes Test.xlsm
    618.6 KB · Affichages: 67
  • JC Maquettes Test.xlsm
    618.6 KB · Affichages: 71
  • JC Maquettes Test.xlsm
    618.6 KB · Affichages: 72

Discussions similaires

Réponses
4
Affichages
317

Statistiques des forums

Discussions
312 196
Messages
2 086 101
Membres
103 116
dernier inscrit
kutobi87