aide sur ComboBox

la croisée des pains

XLDnaute Occasionnel
bonjour le forum,

1ere question:

voila d'après un ComboBox comment faire qu'il recherche le mois sur les feuilles mensuelles

2 e question)

d'après 2 autres ComboBox comment faire la recherche de données sur la feuille mensuelle du 1er ComboBox entre deux dates


merci de votre aide

laurent :eek: [file name=Classeur1_20051102182447.zip size=39842]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20051102182447.zip[/file]
 

Pièces jointes

  • Classeur1_20051102182447.zip
    38.9 KB · Affichages: 44

laurent45

XLDnaute Occasionnel
Bonsoir Laurent,

Pour ta première question :

Code:
Private Sub UserForm_Initialize()
Dim i As Integer
For i = 1 To 12
    ComboBox4.AddItem NomMois(i)
Next i
Me.ComboBox4.Value = 'Mois ?'
End Sub
Pour la Fonction de nom de mois, tu peux utiliser MONTHNAME().
Chez moi avec Excel97, ça ne fonctionne pas, donc :
Code:
Public Function NomMois(NbMois As Integer) As String
    Select Case NbMois
    Case Is = 1
        NomMois = 'JANVIER'
    Case Is = 2
        NomMois = 'FEVRIER'
    Case Is = 3
        NomMois = 'MARS'
    Case Is = 4
        NomMois = 'AVRIL'
    Case Is = 5
        NomMois = 'MAI'
    Case Is = 6
        NomMois = 'JUIN'
    Case Is = 7
        NomMois = 'JUILLET'
    Case Is = 8
        NomMois = 'AOÛT'
    Case Is = 9
        NomMois = 'SEPTEMBRE'
    Case Is = 10
        NomMois = 'OCTOBRE'
    Case Is = 11
        NomMois = 'NOVEMBRE'
    Case Is = 12
        NomMois = 'DECEMBRE'
    End Select
End Function
Pour ta deuxième question, ça dépends des info que tu veux récupérer.
Merci de nous éclairer.

@+
 

la croisée des pains

XLDnaute Occasionnel
bonsoir le forum,
bonsoir Laurent45

merci pour ton aide,je vais essayé ton code;pour la 2e question, tu vois quand je rentre les deux dates et recherche je veux qu'il cherche la somme de recettes journalieres espèces et chèques et au moment du report qu'il se mette dans la feuille encaissement.

je me rends compte que je n'ai pas créer la case recette chèques et son nombre

merci pour ta futur aide.

ps: je vais me coucher

bye laurent
 

ChTi160

XLDnaute Barbatruc
salut Laurent
bonsoir Laurent45

on peut dans un soucis de simplification,alimenter le Combobox avec cette procèdure


Code:
Private Sub UserForm_Initialize()
Dim maDate As Date
Dim i As Integer
For i = 1 To 12
 maDate = DateSerial(Year(Date), i, 1)
    ComboBox4.AddItem Format(maDate, 'mmmm')
Next i

End Sub
 

laurent45

XLDnaute Occasionnel
Damned et cuillère en bois (juron de Cuisto) ;)

J'ai retiré les module et les USF qui ne concerne pas le programme :eek:

Et le fichier va passer

@+ [file name=Classeur1_20051103024010.zip size=40567]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20051103024010.zip[/file]
 

Pièces jointes

  • Classeur1_20051103024010.zip
    39.6 KB · Affichages: 47

ChTi160

XLDnaute Barbatruc
re Laurent
bonjour le Forum
bonjour le Fil

en pièce jointe une interprétation à améliorer surement



j'ai travaillé sur la feuille Février là où j'ai mis des données lol tu testes
tiens nous au coutant

bonne Journée [file name=MoisV1.zip size=45104]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/MoisV1.zip[/file]
 

Pièces jointes

  • MoisV1.zip
    4.4 KB · Affichages: 48
  • MoisV1.zip
    4.4 KB · Affichages: 42
  • MoisV1.zip
    4.4 KB · Affichages: 40

la croisée des pains

XLDnaute Occasionnel
bonjour le forum,
bonjour ChTi,

super travailles que tu as excuté la ,j'ai essayé et j'adopte.

un ptit plus sur au moment de choisir le mois , la fauille du mois se mets, si cela est possible il faudrait que la fenaitre d'encaissement se minimize un peu pour que l'on puisse voir les dates de la feuille de saisie de caisse

j'en demandes peut-etre un peu trop

merci encore beaucoup pour votre travailles

laurent
:silly:
 

laurent45

XLDnaute Occasionnel
Bonjour le fil, le Forum,

J'ai craqué :) :silly: :lol:
[file name=MoisV2.zip size=38296]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/MoisV2.zip[/file]
En fait je voulais le dernier mot lol :eek:

J'ai enlevé le Select qui affichait la feuille du mois.
Et lors de la sélection de la date de début, la date de fin enlève les dates précédentes. Une gestion d'erreur comme une autre...

Je ne veux pas me battre à coup de version contre ChTi. Je ne fais pas le poids. Mais je voulais juste faire celui là. :whistle: :eek:

@+
 

Pièces jointes

  • MoisV2.zip
    37.4 KB · Affichages: 35

laurent45

XLDnaute Occasionnel
Re Laurent,

Je travaille depuis quelques temps sur une Appli (CaissesV2.xls) de ce style, entièrement géré par USF, pour la gestion de caisse. Saisie des CA, ticket restau, cartes bleues, chèques, plus tout plein de petites choses (achat caisse, client différé, accompte, vacation...).

Si tu as des Tickets restaurant à gérer, j'ai une partie de mon Appli qui gère ça. Tu rentres les montants, les quantités. CaissesV2.xls te fait les calculs par service (je travaille en restaurant) et te fait un récapitulatif pour fin de semaine, prêt à saisir (à la main) sur le bordereau des CRT.
Si tu es intéressé, je verais à te le mettre en privé (il est trop gros >50ko).

@+
 

la croisée des pains

XLDnaute Occasionnel
re Laurent45,
re ChTi 160,

j'espère pas, abuser de votre contribution.

je te remercie beaucoup de ton aide,ta proposition est très gentille,
je ne gères pas les tickets restaurants, merci comme même,
j'ai modifié les feuilles de saisie et le module encaissement avec intégration des cartes bleues.

si tu as quelques instants à consacrer pour les intégrer,j'en serais heureux.

je pense de rien n'avoir oublier,je pense que le classeur sera fini après ces modifications, je le mettrais le final sur le site .

laurent :)
@+
 

ChTi160

XLDnaute Barbatruc
Salut Les Laurents lol
Bonjour le Forum

Alors moi je pars en voyage à Montpellier et à mon retour je m'apercois que les petits Lutins ont fait avancer le Chimilimblick Lol c'est super et c'est comme celà que l'on conçoit L'aide et le partage sur XLD chacun tente à son niveau de faire avancer le projet.

je viens de charger la V3 et je vais y regarder pour visualiser tout celà
à très bientôt
 

Discussions similaires

Statistiques des forums

Discussions
312 922
Messages
2 093 644
Membres
105 775
dernier inscrit
assen