Résultats de la recherche

  1. D

    Addition cellules decimales dans variable

    Re : Addition cellules decimales dans variable Merci de ton suivi Modeste, grace à vous tout fonctionne et j'ai testé sur 2 de mes fichiers Excel sur 2 ordi differents au cas ou ... Encore merci pour votre promptitude et votre temps passé. Amicalement
  2. D

    Addition cellules decimales dans variable

    Re : Addition cellules decimales dans variable EUREKA !!! Votre correction est bonne et moi, j'ai recopié sans refléchir , la boucle: For i = 6 To 130 If Cells(i, 10) = chantier(K) Then For J = 1 To 5 If Cells(Y + 1, 1) <> " " Then data(J) = data(J) + Cells(i, J + 3) Next J End If...
  3. D

    Addition cellules decimales dans variable

    Re : Addition cellules decimales dans variable Bonjour Fo_rum et Modeste. Suite aux recommandations de Fo_rum, j'ai effectué les changements mais j'obtiens l'erreur 13 sur la selection "en gras" dans la boucle For i For i = 6 To 130 If Cells(i, 10) = chantier(K) Then For J...
  4. D

    Addition cellules decimales dans variable

    Re : Addition cellules decimales dans variable Voila le fichier (épuré) car des valeurs nominatives. Amicalement PS: de retour dès 18 heures
  5. D

    Addition cellules decimales dans variable

    Re : Addition cellules decimales dans variable Merci de ta reponse, mais meme en data(5) as double, l'erreur est identique. The myster ? J'ai meme essayé data(5) currency
  6. D

    Addition cellules decimales dans variable

    Re : Addition cellules decimales dans variable Voici le fichier incriminé Sub ventilation1() Dim i As Integer, J As Integer, K As Integer, X As Integer, Y As Integer Dim data(5) As Integer, chantier(12) As String Application.DisplayAlerts = False Application.ScreenUpdating = False...
  7. D

    Addition cellules decimales dans variable

    Re : Addition cellules decimales dans variable Merci de votre réponse. Avec Data(J) = Data(J) + Cells(i, J + 3).Value, j'obtiens l'erreur 13 c-a-d incompatibilite de type. C'est la première chose que j'avais fais et a la vue de cette erreur, je cherche toujours une solution. Pourtant mes...
  8. D

    Addition cellules decimales dans variable

    Re : Addition cellules decimales dans variable Merci pour ce debut de reponse. Non, la fonction VAL n'est pas indispensable, puisque j'ai des valeurs numeriques (entiers et decimales) mais je teste avec val au cas ou... Mais si je mets CDbl ) la place de VAL, j'ai une erreur 13...
  9. D

    Addition cellules decimales dans variable

    Bonjour à tous, Je vous expose mon problème, très simple mais qui me bloque pour non connaissance basique sur ce cas. Je desire recuperer (en VBA) sur une feuille, des cellules (valeurs entieres et (ou) decimales) que je vais totaliser dans une variable et afficher ainsi, la somme pour...
  10. D

    declarer plusieurs SpinButton

    Re : declarer plusieurs SpinButton OK, GENIAL !!! Encore merci a tous et j'espère que ce petit probleme aidera bien d'autres comme moi. Cela fonctionne outre un petit débogage pour ma part. Et oui, merci à l'option TAG que je ne maitrisais pas et que je n'utilisais pas non plus. On en...
  11. D

    declarer plusieurs SpinButton

    Re : declarer plusieurs SpinButton OK avec toi wilfried_42 ils sont décaler dans ma boucle. for I= 1 to 40 controls("textbox" & i+1) = controls("spinbutton" & i) next Jusqu'à là pas de probleme mais comment affecter l'option du Private Sub SpinButton1_Change() afin que cela fonctionne ...
  12. D

    declarer plusieurs SpinButton

    Re : declarer plusieurs SpinButton Pierrot, Suite à la compréhension du fichier joint, mon probleme est que mes couples ne sont pas identiques. Private Sub SpinButton1_Change() Me.TextBox2 = Me.SpinButton1.Value End Sub Private Sub SpinButton2_Change() Me.TextBox3 = Me.SpinButton2.Value...
  13. D

    declarer plusieurs SpinButton

    Re : declarer plusieurs SpinButton Merci Pierrot93, je regarde cela avec attention et vous tiens informé de la suite. Je vais m'interresser aux class et décortiquer cela pour bien comprendre ce module. Amicalement
  14. D

    declarer plusieurs SpinButton

    Re : declarer plusieurs SpinButton Merci de ta celerité Banzai64 L'idée parait bonne mais comment appliquer le Private Sub SpinButton1_Change() afin que cela fonctionne ? L'ideal serait peut etre une fonction ? Dans ce contexte étant donné que je n'ai pas le Private Sub...
  15. D

    The big plaisir

    Merci a toute l'équipe pour votre travail. Je debute en VBA sous excel et desire apporter ma pierre à votre edifice. Fidele lecteur, je suis toujours présent pour toutes les nouveautés sur ce forum. Encore merci
  16. D

    declarer plusieurs SpinButton

    Bonjour a tous Fidele lecteur du forum, je n'arrive pas a trouver une astuce permettant de declarer plusieurs SpinButtons (par une boucle ?) sous excel 2003 Je m'explique: Devant declarer de nombreux SpinButton (40) , associés chacun à un textbox je voudrais savoir comment indexer ces...