Forums XLPages

Tous les messages (kelly)

« 1 2 3 4 5 6 »
Re: Copie Donnée feuille 2 sur feuille1
#31
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 21-12-2008 21h27
Re myDearFriend,
Effectivement je parlais bien de la colonne N et non de la O ! Désolé!
Merci infiniment pour ton aide précieuse !
Je pense que pour ce fichier je vais en rester là !
Je vais m'atteler dès maintenant à comprendre quelques codes dont la dernière !!
Merci encore énormément !!!!!!!!!!!!!!!!!
Hors Ligne
Rapport   Haut 

Copie Donnée feuille 2 sur feuille1
#32
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 21-12-2008 17h55
Bonjour le forum,
Dans ma feuille 2 "liste paiement", je souhaiterais que le montant obtenu dans la colonne O "reste à payer subvention" se répercute directement dans ma feuille 1 "Liste" dans la colonne "N" ainsi que le résultat en colonne "R" de ma feuille "Liste paiement" se répercute directement dans ma colonne Q dans ma feuille "Liste".

J'ai essayé plusieurs codes mais rien de fonctionne.
Je vous joins mon fichier.
Merci d'avance.

Pièce jointe:
zip suivi.zip   [ Taille: 48.68 Ko - Téléchargements: 508 ]
Hors Ligne
Rapport   Haut 

Re: Formule case à cocher
#33
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 21-12-2008 17h29
Bonjour le forum,
Bonjour myDearFriend !
Je te remercie vivement pour ton aide ! C'est exactement ce que je voulais !
Cependant j'ai encore une petite question que je vais demander sur un autre sujet !
Merci encore.
Hors Ligne
Rapport   Haut 

Re: Formule case à cocher
#34
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 21-12-2008 00h00
Bonsoir,
J'ai enfin pu récupérer mon fichier !
Comme convenu, voici mon fichier.
J'ai besoin de votre aide et vos conseils :
J'ai plusieurs feuilles dans mon classeur et je souhaiterais lorsque je remplis mon tableau via mon userform de ma 1ere feuille que les données inscrites dans "convention", "montant des travaux", "montant de l'aide Subvention" et "Montant de l'aide Avance" se répercute automatiquement dans ma 2e feuille et que le montant "reste à payer" de ma 2e feuille se répercute dans ma première feuille. Au départ, j'avais mélangé formule et code VBA mais apparemment ça ne fait pas bon ménage !
De plus, lorsque ce sont des montants, je voudrais en format "# ###".
Y-a-t-il un moyen quand je suis sur un n° de convention d'aller directement sur la 2eme feuille au meme n° de convention ?Comment pourrais-je faire ?J'espère avoir été assez claire.

Merci par avance de votre aide.
Pièce jointe:
zip exemple SUIVI.zip   [ Taille: 48.53 Ko - Téléchargements: 542 ]
Hors Ligne
Rapport   Haut 

Re: Formule case à cocher
#35
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 20-12-2008 16h27
Bonjour Skoobi
Je suis désespérée car je ne peux plus ouvrir mon fichier !!!!!
Quand je veux l'ouvrir, il me met "Impossible de charger les DLL". Pourquoi ?
Comment faire ????
Merci.
Hors Ligne
Rapport   Haut 

Re: Formule case à cocher
#36
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 19-12-2008 00h27
Bonsoir Skoobi,
J'ai rectifié le code mais malheureusement cela ne fonctionne pas !
ça me mets : "Erreur de compilation - Projet ou bibliothèque introuvable" ???
Qu'ai-je oublié ??
Merci.
Hors Ligne
Rapport   Haut 

Re: Formule case à cocher
#37
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 17-12-2008 23h16

Merci encore Skoobi!

Le problème c'est que les montants désirés sont dans une autre colonne.

J'ai donc essayé ceci (en gras) mais cela ne fonctionne pas !!

Private Sub Valider_Click()
Dim Derlig As Long
Derlig = Range("A700").End(xlUp).Offset(1, 0).Row
Range("A" & Derlig).Value = NumConvention
Range("B" & Derlig).Value = ChargeOperations
Range("C" & Derlig).Value = Nom
Range("D" & Derlig).Value = NumAttributaire
Range("E" & Derlig).Value = Dept
Range("F" & Derlig).Value = Travaux
Range("G" & Derlig).Value = Nature
Range("H" & Derlig).Value = DateDecision
Range("K" & Derlig).Value = NumberFormat("# ###", MontantTrav.Value)
Range("L" & Derlig).Value = NumberFormat("# ###", MontantAide.Value)
Range("M" & Derlig).Value = TauxAide
Range("O" & Derlig).Value = NumberFormat("# ###", MontantAvance.Value)
Range("P" & Derlig).Value = TauxAvance

If IsDate(DateDecision.Value) Then
    If opt24.Value Then
    Range("J" & Derlig).Value = DateAdd("m", 24, DateDecision.Value)
  ElseIf opt36.Value Then
    Range("J" & Derlig).Value = DateAdd("m", 36, DateDecision.Value)
  ElseIf opt48.Value Then
    Range("J" & Derlig).Value = DateAdd("m", 48, DateDecision.Value)
  End If
End If
 
et dans ma feuille, j'ai ceci :

Private Sub Nouvconvention_Click()
'Ouvrir un formulaire de saisie
With UserForm1
    .NumConvention.Text = ""
    .Nature.Text = ""
    .Nom.Text = ""
    .ChargeOperations.Text = ""
    .NumAttributaire.Text = ""
    .Dept.Text = ""
    .DateDecision.Text = ""
    .Travaux.Text = ""
    .MontantTrav.Text = ""
    .MontantAide.Text = ""
    .TauxAide.Text = ""
    .MontantAvance.Text = ""
    .TauxAvance.Text = ""
    End With
UserForm1.Show
End Sub

et dans ma colonne "A" ce sont également des chiffres !

Que me manque t-il ? Qu'est-ce qui bloque ???
Merci d'avance.

Hors Ligne
Rapport   Haut 

Re: Formule case à cocher
#38
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 17-12-2008 18h43

Bonjour et merci beaucoup Skoobi !

J'ai encore une petite question : mes montants se mettent bien dans la colonne cependant, ça ne met pas automatiquement en format "# ###". Il faut à chaque fois que je sélectionne "format + cellule" et m'inscrit "nombre stocké sous forme de texte" ! Y a t-il un moyen pour que cela se fasse automatiquement ????
Merci encore !

Hors Ligne
Rapport   Haut 

Formule case à cocher
#39
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 17-12-2008 15h05
Bonjour,
Dans mon userform, j'ai des cases à cocher 24 mois et 36 mois.
Cependant, je souhaiterais maintenant ajouter 48 mois.

Comment faire ? Que dois-je ajouter dans ma formule ???

If IsDate(DateDécision.Value) Then
    Range("M" & Derlig).Value = DateAdd("m", IIf(opt24.Value, 24, 36), DateDécision.Value)
End If

Merci d'avance.
Hors Ligne
Rapport   Haut 

Re: Case à cocher et msgBox
#40
Régulier XLPages

Inscription: 05/11/2008

Messages: 53

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 07-12-2008 01h27
Bonsoir myDearFriend !
Merci de m'avoir aidé et merci pour tes conseils qui sont les bienvenus !
J'ai changé mes noms d'objets avec les accents !
Demain je vais lire l'article VBA et variables !!!!
Merci encore !
Cordialement,
Hors Ligne
Rapport   Haut 

« 1 2 3 4 5 6 »