Formule VBA

bonjour

voila et par avance merci pour toute l'aide que vous m'apporté.

Je maîtrise pas vba.

j'ai besoin du formule qui gere le calcule et affichage des combobox

Private Sub CalcGRAISSAGE_Click()
Application.ScreenUpdating = False
        For i = 6 To 58 Step 2
        Range("E" & i) = Range("E" & i + 1) - Range("B" & i)
        Next i
End Sub

Private Sub CALCLAVAGE_Click()
Application.ScreenUpdating = False
        For i = 6 To 58 Step 2
        Range("D" & i) = Range("D" & i + 1) - Range("B" & i)
        Next i
End Sub

merci

bonjour

je suis debutant en vba

je fais un essai mes ca marche pas

Option Explicit

Dim Ws As Worksheet

Private Sub UserForm_Initialize()
Dim i As Long
Application.ScreenUpdating = False
With Sheets("Feuil1")
  For i = 6 To 58 Step 2
      cbbmachine.AddItem .Cells(i, 1)
      'TbxMoteur.AddItem .Cells(i, 1)
  Next i
End With

       ' Range("E" & i) = Range("E" & i + 1) - Range("B" & i)

End Sub

aide moi svp

Bonjour

Il faut être précis

richi2casa a écrit :

j'ai besoin du formule qui gere le calcule et affichage des combobox

Tu as déjà eu une réponse pour le calcul ?

Pour les combobox ( il n'y en a qu'une) que veux tu afficher si on sélectionne Machine 1 ?

Indiques bien pour le H.Lavage et pour H.Graissage quelles sont les cellules à afficher ?

A te lire

bonjour

pour afficher les éléments du userform

si je clic sur machine (cbbmachine) il m' affiche le nom du machine (machine1 ou machine23 extr .........)

et affiche le N° SÉRIE (TbxMoteur) ;H.F Machine (textbox2);H. LAVAGE(txtbox3);H. GRAISSAGE(textbox4)

qui sont trouvent au mm ligne

mm chose pour le bouton ajouter et modifier

merci bien de tes réponses

bonjour

je rectifie userform.pardon je fais un erreur

pour afficher les éléments du userform

si je clic sur machine (cbbmachine) il m' affiche le nom du machine (machine1 ou machine23 extr .........)

et affiche le N° SÉRIE (TbxMoteur) ;H.F Machine (textbox2);H. LAVAGE(txtbox3);H. GRAISSAGE(textbox4)

qui sont trouvent en mm ligne "Feuil1"

pour le bouton ajouter et modifier ( ( ligne=i) for i=6 to 59)

si je clic sur machine (cbbmachine) il affiche le nom du machine (machine1 ou machine23 extr .........)

et affiche le N° SÉRIE (TbxMoteur) ;H.F Machine (textbox2)

mais au H. LAVAGE(txtbox3) je saisie dans la cellule D qui se trouve a la ligne (i-1) c a d cel(i-1,4)

mm chose pour H. GRAISSAGE(textbox4) je saisie dans la range ( E) qui se trouve a la ligne (i-1) c a d cel(i-1,5)

merci bien de vous compréhension

amicalement

Bonjour

Je croyais avoir compris mais ce n'est pas le cas

En plus tu modifies l'userform

Dernière demande et réponds le plus clairement possible

Si Je choisis Machine1 qu'est ce que je dois trouver dans les TextBox ?

Ta réponse doit être du type

Exemple

TextBox2 = A6

TextBox.... = ...6

etc....

A toi de mettre les bons TextBox et les bonnes cellules

bonjour

Si Je choisis Machine1

cbbmachine=A6

TbxMoteur = C6

TextBox2 = B6

TextBox3 = D6 avec (D6 = D7- B6)

TextBox4 = E6 avec (E6 = E7 - B6)

TextBox5 = D7

TextBox6 = E7

je suis désolé ( dérangement)

merci de votre aide

Bonsoir

Il faut être précis dans les réponses

richi2casa a écrit :

TextBox6 = E7

A tester

Bonjour

je ne sais pas et ne trouverai certes pas

les meilleurs mots pour vous dire simplement

MERCI