Modifier un petit bout de code VBA...

wilfried_42

XLDnaute Barbatruc

• 22 Octobre 2007

• #2

Re : Modifier un petit bout de code VBA...

Bonjour christian

ton code

Code:

Private Sub Worksheet_Change(ByVal Target As Range)

  Application.EnableEvents = False
  If Target.Address <> "$C$8" Then Exit Sub
    If IsNumeric(Target.Value) Then
      Target.Value = Target.Value / 24
    End If
  Application.EnableEvents = True
End Sub

 

Vote positif 0 Vote négatif

Luki

XLDnaute Accro

• 22 Octobre 2007

• #3

Re : Modifier un petit bout de code VBA...

Bonjour,
Tu peux essayer ainsi :

If Target.Column = 3 And Target.Row = 8 Then

A+

Edit, encore plus propre de la part de Wilfried 🙂 !

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 22 Octobre 2007

• #4

Re : Modifier un petit bout de code VBA...

Re le forum, Wilfried,


Merci, Wilfried, pour ton code, c'est impec.

à+
Bien amicalement,
Christian

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 22 Octobre 2007

• #5

Re : Modifier un petit bout de code VBA...

Re, le forum, Wilfried, Luki,


Merci à vous pour vos solutions.

J'ai toutefois un truc bizarre..

Fichier joint...

Encore merci,
Christian.

 

Pièces jointes

• modifCodeV02.zip

  5.5 KB · Affichages: 12

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 22 Octobre 2007

• #6

Re : Modifier un petit bout de code VBA...

re:

ton fichier en retour

 

Pièces jointes

• modifCodeV02.xls

  38 KB · Affichages: 35

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 22 Octobre 2007

• #7

Re : Modifier un petit bout de code VBA...

Re,

Wilfried, merci pour ton aide.

Mais comment obtenir
expl :12h00 si je tape 12 (et non 288h00) ?

fichier joint

Merci pour le temps que vous me consacrez.

à+
Christian

 

Pièces jointes

• modifCodeV03.zip

  5.3 KB · Affichages: 7

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 22 Octobre 2007

• #8

Re : Modifier un petit bout de code VBA...

Re,

Problème résolu, dans option, calcul, ne pas cocher itération.

Merci à vous.
à+
Christian

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 22 Octobre 2007

• #9

Re : Modifier un petit bout de code VBA...

re:

cela n'a rien à voir, ta procedure d'interruption de saisie n'est plus en cours, donc il concidere que tu tapes des jours et non des heures, il te les tansforme automatiquement en heures (nb * 24)

Je t'ai mis une macro, en dessous init, qui remet ton interrupteur d'evennement en marche,

tu te positionnes dessus (dans la procedure init) et en haut tu as une icone (un triangle (lecture)), tu cliques dessus et tu essaies
ca devrait fonctionner

 

Vote positif 0 Vote négatif