Aide

Bonjour,

J'ai créé un petit tableau qui calcule automatiquement les heures de mes employés.

Jusque la pas de souci les formules sont bonnes, je rencontre juste un souci que je ne parviens pas à résoudre dans mon tableau récapitulatif j'ai l'erreur #value qui s'affiche quand il n'y a pas de donnée dans le tableau principal.

J'avais essayé d'utiliser la formule =IF(ISBLANK(C17);" ";E6+J6+O6+T6+Y6+AD6) mais cela ne fonctionne pas non plus pouvez-vous m'aider.

J'utilise office 2016 en anglais.

Merci

2copy-of-villa.xlsx (18.78 Ko)

Bonjour zepe, le forum,

As-tu essayé:

=SOMME(E6;J6;O6;T6;Y6;AD6)

?

3copy-of-villa.xlsx (19.13 Ko)

Cordialement,

Bonjour,

Ci-joint ton fichier ...

En espèrant que cela t'aide

3copy-of-villa.xlsx (18.61 Ko)

Merci à vous deux les deux solutions fonctionnent

bonne leçon pour la prochaine fois

Re,

Merci pour tes remerciements ...

Salut xorsankukai

Re,

Ravi que te ton problème soit résolu,

Salut James007,

4villa-test.xlsm (23.89 Ko)

Bonjour

J'ai achevé mon tableau, je viens de remarquer (voir exemple) que si les heures dépassaient 24h il affichait un résultat négatif ce qui n'est pas normal.

Je pense avoir formaté les cellules comme il le faut mais cela ne fonctionne pas ?

Merci

Re,

Est-ce-que tu fais référence à ta cellule D6 ...???

3villa-test.xlsm (22.73 Ko)

Bonjour

Oui c'est bien cela, la le calcul est bon, mais il reste un problème quand je tire la cellule et que les cases ne sont pas remplies il met d'office -0800

Voir fichier joint

merci

Re,

Correction jointe ...

En espèrant que cela t'aide

C'est parfait

Merci beaucoup à tous

Content que tout fonctionne ...

Merci pour tes remerciements

Bonjour

Oui, c'est très bon.

j' ai encore une question j'ai créer une macro qui efface mon tableau, est-il possible en code d'effectuer ceci : quand je clique sur le bouton effacer il copie automatiquement la case total dans la case RD et ce pour chaque Personne.

Merci

Re,

A priori ce que tu demandes doit être possible ...

La destination est la plage B17:B22 ...

Mais où se trouve la Source des données ...?

e17 vers b17

e18 vers b18 etc jusque e22 vers b22

Je ne sais pas si je me suis bien exprimé

merci

Re,

Tu peux tester l'instruction suivante :

Sub Test()
  Range("B17:B22").Value = Range("E17:E22").Value
End Sub

En espèant que cela t'aide

Bonsoir

Jj'ai donc inclus la commande dans mon module mais quand je fais effacer il efface bien mais ne copie pas les données de e17 vers b 17 et ainsi de suite

merci

Bonjour,

Plus simple ... que de dire " çà ne marche pas ... "

Peux-tu au moins poster la macro que tu viens d' utiliser ...?

Bonjour

Voila la macro que j'ai testée avec le peu de notions que je possède.

Merci

Sub EFFACER()

Range("B6", "C11").ClearContents

Range("F6", "F11").ClearContents

Range("L6", "M11").ClearContents

Range("G6", "H11").ClearContents

Range("K6", "K11").ClearContents

Range("L6", "M11").ClearContents

Range("P6", "P11").ClearContents

Range("Q6", "R11").ClearContents

Range("U6", "U11").ClearContents

Range("V6", "W11").ClearContents

Range("Z6", "Z11").ClearContents

Range("AA6", "AB11").ClearContents

Range("B17:B22").Value = Range("E17:E22").Value

End Sub

Ok j'ai mis la commande en premier cela fonctionne hier j'étais un peu fatigué je continue à améliorer mon programme

Merci

Rechercher des sujets similaires à "aide"