T
toutti
Guest
Bonjour g besoin d’une aide pour cette formule
J’ai créé une boite de dialogue qui fait appel a + de 250 tex box.
J’ai donc fait une macro général. Qui marche bien, sauf au niveau de la formule. (Sub control_général())
Private Sub Heure_froid_AfterUpdate()
Activité = "Coupe A"
Activité1 = "C123_9"
control_actif = Heurfroid
Call control_général_heures
End Sub
Sub control_général()
Dim ctl As TextBox
Le problème é ici, quand je mais un nombre a décimal. Pour la première fois je dois utiliser le point sur le pavé numérique, si je le reprends, je dois mettre une virgule sinon cela ne fonctionne plus. Pourquoi pouvez-vous me donner un coup de main pour ce probléme merci d’avance pour ceux qui pourrons me donner la solution ?
ActiveCell.Value = ActiveCell.Value + control_actif
If ActiveCell.Value = "0" Then
ActiveCell.Value = ""
End If
End Sub
Sub control_général_heures()
Call recherche_opé_activité
Call control_général
Call compteur_horaire
Call recherche_opé_hprod
Call control_général
Call retour_fichier_activité
Call recherche_semaine_opé
Call control_général
End Sub
J’ai créé une boite de dialogue qui fait appel a + de 250 tex box.
J’ai donc fait une macro général. Qui marche bien, sauf au niveau de la formule. (Sub control_général())
Private Sub Heure_froid_AfterUpdate()
Activité = "Coupe A"
Activité1 = "C123_9"
control_actif = Heurfroid
Call control_général_heures
End Sub
Sub control_général()
Dim ctl As TextBox
Le problème é ici, quand je mais un nombre a décimal. Pour la première fois je dois utiliser le point sur le pavé numérique, si je le reprends, je dois mettre une virgule sinon cela ne fonctionne plus. Pourquoi pouvez-vous me donner un coup de main pour ce probléme merci d’avance pour ceux qui pourrons me donner la solution ?
ActiveCell.Value = ActiveCell.Value + control_actif
If ActiveCell.Value = "0" Then
ActiveCell.Value = ""
End If
End Sub
Sub control_général_heures()
Call recherche_opé_activité
Call control_général
Call compteur_horaire
Call recherche_opé_hprod
Call control_général
Call retour_fichier_activité
Call recherche_semaine_opé
Call control_général
End Sub