Contenu récent par youguybass

Bonjour et merci pour votre retour le 40 et le 41 sont bien inversés, c'est normal J'ai déja intégré le 1° code envoyé et vérifié a mon fichier, Celui-ci m'a l'air correct également Merci la démarche

Parfait ça marche correctement maintenant merci Et de plus sans fichiers bravo Encore merci

Cela fonctionne pour E=37 et C de 10 à 164 Mais par contre Pour E=39/40/41/42 et C de 12 à 166 / 14 à 168 .... cela ne fonctionne pas et je ne comprends pas pourquoi

Bonjour et merci Après essai Ce code ne copie dans mon tableau que le 'Remplissage des références les 'Remplissage des désignations Op/Clients/désignations Pièces/Ref clients ne sont pas complétés Slts

Je cherche à simplifier ces boucles en 1 seule Merci pour votre aide 'Remplissage des références E = 37 For C = 10 To 164 Step 11 If Me.Controls("TextBox" & C).Value <> "" Then Cells(L, E).Value = Me.Controls("TextBox" & C).Value E = E + 6 End If Next 'Remplissage des désignations Op E = 39...

Merci

Bonjour et merci peux-tu juste m'expliquer le : Const fmt As String * 10 = "dd/mm/yyyy" pourquoi "String *10"

Bonjour Je cherche à simplifier : ActiveSheet.ListObjects("TabGlobaleFicheIntervention").ListColumns(2).DataBodyRange.Select Selection.NumberFormat = "dd/mm/yyyy" ActiveSheet.ListObjects("TabGlobaleFicheIntervention").ListColumns(30).DataBodyRange.Select Selection.NumberFormat = "dd/mm/yyyy"...

Parfait, Merci

ou je lai essayé ton du#6, il ne prend pas les chiffres à virgule

Effectivement la partie décimale disparait quelle serait la combine pour que les chiffres après la virgule soient pris en compte

C'est bon Phil J'ai réussi avec : D = 0 For E = 200 To 220 Step 2 D = (Val(Me.Controls("TextBox" & E)) * Val(Me.Controls("TextBox" & E + 1))) + D Next TxtTotalMaintenance.Value = D avec avec "Val" et des parenthèses bien positionnées. Merci

D = 0 For E = 200 To 220 Step 2 D = (Val(Me.Controls("TextBox" & E)) * Val(Me.Controls("TextBox" & E + 1))) + D Next TxtTotalMaintenance.Value = D J'ai réussi avec "Val et des parenthèses bien positionnées

un peu de politesse de ma part! Merci quand même!

Bonjour Ta solution ne fonctionne pas Ci-joint une petite partie du fichier Slts